Process.st
changeset 1728 827231681803
parent 1531 2a61dad6c7ce
child 1784 af6446feffae
--- a/Process.st	Mon Oct 14 12:11:45 1996 +0200
+++ b/Process.st	Mon Oct 14 12:12:00 1996 +0200
@@ -551,12 +551,12 @@
     "helper entry for debugger. Force a stepInterrupt whenever aContext
      returns either directly or via an unwind."
 
-    aContext markForUnwind.
+    aContext markForInterruptOnUnwind.
 %{
     OBJ i;
 
     if (__isSmallInteger(i = __INST(id))) {
-	__threadContextStepInterrupt(__intVal(i), 1);
+        __threadContextStepInterrupt(__intVal(i), 1);
     }
 %}
     
@@ -1080,6 +1080,6 @@
 !Process  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Process.st,v 1.59 1996-07-08 12:10:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Process.st,v 1.60 1996-10-14 10:12:00 cg Exp $'
 ! !
 Process initialize!