*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 20 Sep 2004 16:27:04 +0200
changeset 8559 aca77c69cd91
parent 8558 09e2910c1e4f
child 8560 1211ac79c391
*** empty log message ***
Continuation.st
--- a/Continuation.st	Mon Sep 20 12:54:54 2004 +0200
+++ b/Continuation.st	Mon Sep 20 16:27:04 2004 +0200
@@ -65,8 +65,9 @@
     cont := super new.
 %{
     int __cId;
+    extern int __continuationCreate();
 
-    __cId = __threadContinuation(cont);
+    __cId = __continuationCreate(cont);
     if (__cId) {
         id = __MKSMALLINT(__cId);
     }
@@ -89,5 +90,5 @@
 !Continuation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Continuation.st,v 1.4 2004-09-20 10:54:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Continuation.st,v 1.5 2004-09-20 14:27:04 cg Exp $'
 ! !