Use fork-thread in fork/thread.

2001-12-07 09:59:48 +00:00 · 2001-12-07 09:59:48 +00:00 · a1f17bb13d
parent 2fa5e3f693
commit a1f17bb13d
1 changed files with 1 additions and 1 deletions
--- a/scsh/threads.scm
+++ b/scsh/threads.scm
@ -1,6 +1,6 @@
 ;Thread nomenclature for scsh.

-(define fork/thread (structure-ref threads spawn))
+(define fork/thread (structure-ref thread-fluids fork-thread))

 (define fork/process (structure-ref scsh-level-0 fork))