in-thread fix

slava 2006-12-04 05:45:40 +00:00
parent 91a87c6fbe
commit 502c32b1f7
1 changed files with 2 additions and 1 deletions

View File

@ -42,7 +42,8 @@ namespaces queues sequences vectors ;
V{ } set-catchstack
V{ } set-callstack
V{ } set-retainstack
try stop
[ print-error ] recover
stop
] callcc0 drop ;
: (idle-thread) ( fast? -- )