~ chicken-core (chicken-5) 3c56a5665cf9fe6522b4f435b543f34da5e8d3c4
commit 3c56a5665cf9fe6522b4f435b543f34da5e8d3c4
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Mon Feb 22 09:24:07 2010 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Mon Feb 22 09:24:07 2010 +0100
bugfixes in srfi-18.scm
diff --git a/srfi-18.scm b/srfi-18.scm
index 2b290468..43c0cf51 100644
--- a/srfi-18.scm
+++ b/srfi-18.scm
@@ -484,7 +484,7 @@ EOF
(lambda ()
(##sys#signal exn)
(old) ) )
- (##sys#setislot thread 3 blocked)
+ (##sys#setslot thread 3 'blocked)
(##sys#thread-unblock! thread) ) ) )
Trap