scsh-conservatory
/
scsh-0.6
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Use flush-all-ports-no-threads on exit.

This commit is contained in:
mainzelm 2002-06-27 12:26:23 +00:00
parent 1aadf4e87f
commit b951e1c933
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scsh/top.scm
View File

@ -408,7 +408,7 @@
(call-narrowed-exit-hooks) (call-narrowed-exit-hooks)
(scheme-exit-now status)))) (scheme-exit-now status))))
(add-narrowed-exit-hook! flush-all-ports) (add-narrowed-exit-hook! flush-all-ports-no-threads)
(define (load-library-file file lib-dirs script-file) (define (load-library-file file lib-dirs script-file)
; (format (error-output-port) "Load-library-file: ~a ~s\n" file lib-dirs) ; (format (error-output-port) "Load-library-file: ~a ~s\n" file lib-dirs)