Date: Thu, 26 Apr 2012 14:28:34 +0200
   From: <cra...@gmx.net>

   (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

This is a bug which illustrates how little anyone has ever hammered on
the thread system...  I'm not sure exactly what the right thing to do
here is, but basically, the default `create thread continuation'
should be inherited by threads -- it's just not clear how to make that
happen without also inheriting all other dynamic state by default,
which is wrong.

_______________________________________________
MIT-Scheme-devel mailing list
MIT-Scheme-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/mit-scheme-devel

Reply via email to