carl@CITHEX.CALTECH.EDU (07/06/88)
Under VMS 4.x, if you: 1) Enable CONTROL-T and CONTROL-Y; 2) Run the following program; 3) $ SPAWN; 4) $ LOGOUT 5) $ LOGOUT 6) $ WRITE SYS$OUTPUT F$ENVIRONMENT("CONTROL") 7) Try using CONTROL-T or try to interrupt a program with CONTROL-Y you'll find that the lexical function thinks that both CONTROL-T and CONTROL-Y are enabled, but that in fact neither of them works. They can be made to work again with the command $ SPAWN LOGOUT The problem doesn't seem worth SPRing unless it still happens under VMS 5.0. Could somebody out there running VMS 5.0 please test it on their system? Thanks. PROGRAM LOSE_ASTS CALL LIB$GET_EF(IEFN) I = IEFN IF (I .GT. 31) I = I - 32 MASK = ISHFT(1,I) CALL LIB$SPAWN(,,,1,,,,IEFN,,,,) CALL SYS$WFLOR(%VAL(IEFN),%VAL(MASK)) END