| author | Mike Sullivan <Mike.Sullivan@Oracle.COM> |
| Mon, 02 Nov 2015 11:02:02 -0800 | |
| changeset 5040 | 6242a3f0012d |
| child 5271 | 195e24ffa71a |
| permissions | -rw-r--r-- |
|
5040
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
1 |
Developed in-house but accepted upstream. |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
2 |
|
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
3 |
--- tcsh-6.18.01/sh.sem.c.orig Sat Oct 31 10:58:21 2015 |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
4 |
+++ tcsh-6.18.01/sh.sem.c Sat Oct 31 10:59:42 2015 |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
5 |
@@ -212,8 +212,14 @@ |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
6 |
* If noexec then this is all we do. |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
7 |
*/ |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
8 |
if (t->t_dflg & F_READ) {
|
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
9 |
+ int old_pintr_disabled; |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
10 |
+ |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
11 |
xclose(0); |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
12 |
+ if (setintr) |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
13 |
+ pintr_push_enable(&old_pintr_disabled); |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
14 |
heredoc(t->t_dlef); |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
15 |
+ if (setintr) |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
16 |
+ cleanup_until(&old_pintr_disabled); |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
17 |
if (noexec) |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
18 |
xclose(0); |
|
6242a3f0012d
22124201 TCSH Latest Patch 126630-03 changes the behavior of Exit . You cannot exit .
Mike Sullivan <Mike.Sullivan@Oracle.COM>
parents:
diff
changeset
|
19 |
} |