--- 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!