Thanks for the quick patch. However, now scsh ignores pending interrupts
after control leaves the protected block. I changed the script for better
demonstration:
#!/tmp/bin/scsh \
-o low-interrupt -s
!#
; the struct LOW-INTERRUPT serves the proc REMOVE-INTERRUPT
(display (with-enabled-interrupts
(remove-interrupt interrupt/tstp (enabled-interrupts))
(read)))
(newline)
; eof
When I type ``anton^Ziter'' and enter, the script isn't suspended during
the READ, fine, but neither before the DISPLAY. It simply displays
``iter'' and finishes.
rthappe
|