[MIT-Scheme-devel] multi-threading problem: Unassigned variable: root-continuation-default

[craven]

Hello fellow Schemers!

I've been playing around with multiple threads in GNU/MIT-Scheme. I've
tried the following code:

(let ((socket (open-tcp-server-socket 54321)))
  (create-thread #f (lambda ()
                       (let ((sock (tcp-server-connection-accept socket #t #f)))
                         (create-thread #f (lambda ()
                                              (format #t "ok~%")
                                              (close-port sock)))))))

then I try to connect to port 54321 locally (with "nc localhost 54321"
for example), which produces the following output:

;Value 13: #[thread 13]

1 ]=> 
;The thread #[thread 13] signalled an error: Unassigned variable: 
root-continuation-default
;To continue, call RESTART with an option number:
; (RESTART 3) => Specify a value to use instead of root-continuation-default.
; (RESTART 2) => Set root-continuation-default to a given value.
; (RESTART 1) => Return to read-eval-print level 1.

2 error> 

My system is 64 bit Arch Linux, the GNU/MIT-Scheme version is
Release 9.1.1 || Microcode 15.3 || Runtime 15.7 || SF 4.41 || LIAR/x86-64 4.118 
|| Edwin 3.116

I'd be glad about any help you might provide in getting this fixed, I'm
trying to get a server running in the background while I can still
update definitions and whatnot in the foreground.

Thanks for all the hard work on GNU/MIT-Scheme!

Peter