forever-sleeping-thread is only started in interactive sessions since
it prevents the system from exiting. Fixed -i switch.
This commit is contained in:
parent
3bcabf36b5
commit
6d9e7de153
|
@ -237,7 +237,6 @@
|
|||
(environment-for-commands)
|
||||
(lambda ()
|
||||
(begin
|
||||
(spawn forever-sleeping-thread)
|
||||
(init-low-interrupt)
|
||||
(install-event-handlers!)
|
||||
(%install-scsh-handlers (not term-switch))
|
||||
|
@ -268,6 +267,7 @@
|
|||
args
|
||||
context
|
||||
(lambda ()
|
||||
(spawn forever-sleeping-thread)
|
||||
(display "welcome to scsh-0.6 alpha "
|
||||
(current-output-port))
|
||||
(newline (current-output-port))
|
||||
|
@ -275,8 +275,7 @@
|
|||
|
||||
|
||||
((eq? term-switch 'c)
|
||||
;;; JMG eval now needs expr represented as data
|
||||
(eval '(read-exactly-one-sexp-from-string term-val)
|
||||
(eval (read-exactly-one-sexp-from-string term-val)
|
||||
(interaction-environment))
|
||||
(exit 0))
|
||||
|
||||
|
|
Loading…
Reference in New Issue