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

Pass optional arguments from FORK-THREAD to SPAWN.

This commit is contained in:
sperber 2002-02-04 11:34:17 +00:00
parent 67c3a9114c
commit baf1dbbf76
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
scheme/big/thread-fluid.scm
View File

@ -67,5 +67,5 @@
(lambda () (lambda ()
(apply let-thread-fluids args)))) (apply let-thread-fluids args))))
(define (fork-thread thunk) (define (fork-thread thunk . rest)
(spawn (preserve-thread-fluids thunk))) (apply spawn (preserve-thread-fluids thunk) rest))