the flush needs to happen after the finished-complete-program happens
svn: r11374
This commit is contained in:
parent
6e674a9804
commit
607c13017f
|
@ -1106,9 +1106,9 @@ TODO
|
||||||
(set! in-evaluation? #f)
|
(set! in-evaluation? #f)
|
||||||
(update-running #f)
|
(update-running #f)
|
||||||
(cleanup)
|
(cleanup)
|
||||||
(flush-output (get-value-port))
|
|
||||||
(when complete-program?
|
(when complete-program?
|
||||||
(send lang front-end/finished-complete-program settings))
|
(send lang front-end/finished-complete-program settings))
|
||||||
|
(flush-output (get-value-port))
|
||||||
(queue-system-callback/sync
|
(queue-system-callback/sync
|
||||||
(get-user-thread)
|
(get-user-thread)
|
||||||
(λ () ; =Kernel=, =Handler=
|
(λ () ; =Kernel=, =Handler=
|
||||||
|
|
Loading…
Reference in New Issue
Block a user