run/collecting, not threads

[Emilio Lopes <eclig@gmx.net>]

After I defeated my last "bug report" with my own stupidity, here is
my second try.  I hope I got it right this time.


   Welcome to scsh 0.6.6 (King Conan)
   Type ,? for help.
   > (define my-ls/simple
     (lambda ()
       (display (run/string (ls)))
       (newline)))
   > (define my-ls/complex
     (lambda ()
       (receive
           (rc out err)
           (run/collecting (1 2) (ls))
         (display (port->string out))
         (newline))))
   > (my-ls/simple)
   big
   cig
   doc
   env
   libscsh.a
   libscshvm.a
   link
   misc
   opt
   rts
   scsh
   scsh.image
   scshvm.exe
   srfi
   stripped-scsh.image

   > (my-ls/complex)
   big
   cig
   doc
   env
   libscsh.a
   libscshvm.a
   link
   misc
   opt
   rts
   scsh
   scsh.image
   scshvm.exe
   srfi
   stripped-scsh.image

   > ,open threads
   > (spawn my-ls/simple)
   > big
   cig
   doc
   env
   libscsh.a
   libscshvm.a
   link
   misc
   opt
   rts
   scsh
   scsh.image
   scshvm.exe
   srfi
   stripped-scsh.image


   > (spawn my-ls/complex)
   > 
   > ;; no output!!!

If you substitute `ls' by something appropriate, like `touch /tmp/foobar',
you'll see that the command does not get executed at all.

Thanks for any insight.

-- 
Emílio C. Lopes
Munich, Germany