1 Developed in-house but accepted upstream.

     2 

     3 --- tcsh-6.18.01/sh.sem.c.orig	Sat Oct 31 10:58:21 2015

     4 +++ tcsh-6.18.01/sh.sem.c	Sat Oct 31 10:59:42 2015

     5 @@ -212,8 +212,14 @@

     6  	 * If noexec then this is all we do.

     7  	 */

     8  	if (t->t_dflg & F_READ) {

     9 +	    int	old_pintr_disabled;

    10 +	    

    11  	    xclose(0);

    12 +	    if (setintr)

    13 +	        pintr_push_enable(&old_pintr_disabled);

    14  	    heredoc(t->t_dlef);

    15 +	    if (setintr)

    16 +	        cleanup_until(&old_pintr_disabled);

    17  	    if (noexec)

    18  		xclose(0);

    19  	}