src/lsp/top.lsp: in multithreaded ECL, when interrupting a process via Ctrl-C, and then using the interrupt-process restart, the interrupted thread did not set up a continue restart.

src/CHANGELOG

@@ -12,6 +12,9 @@ ECL 9.10.3:
    deactivating the foreign function interface when the compiler does not
    support inline assembly with the GCC syntax and libffi is not available.
 
+ - In a multithreaded ECL, when handling a Ctr-C/SIGINT asynchronous interrupt,
+   there was not always a CONTINUE restart available.
+
 ECL 9.10.2:
 ===========
 

src/lsp/top.lsp

@@ -544,7 +544,7 @@ Use special code 0 to cancel this operation.")
         do (mp:process-resume process))
      (when break-process
        (mp:interrupt-process break-process
-			     #'simple-terminal-interrupt))))
+			     #'single-threaded-terminal-interrupt))))
   #-threads
   (single-threaded-terminal-interrupt))