--- a/ProcSched.st	Tue Feb 03 20:30:20 1998 +0100
+++ b/ProcSched.st	Thu Feb 05 01:06:54 1998 +0100
@@ -1561,12 +1561,13 @@
 
 resumeForSingleSend:aProcess
     "like resume, but let the process execute a single send only.
-     This will be used by the (new, not yet released) debugger 
-     for single stepping."
+     This will be used by the debugger for single stepping."
 
     (aProcess isNil or:[aProcess == activeProcess]) ifTrue:[^ self].
     aProcess singleStep:true.
     self resume:aProcess
+
+    "Modified: / 3.2.1998 / 01:08:08 / stefan"
 !
 
 suspend:aProcess
@@ -2634,6 +2635,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ProcSched.st,v 1.144 1998-02-03 19:30:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ProcSched.st,v 1.145 1998-02-05 00:06:54 stefan Exp $'
 ! !
 ProcessorScheduler initialize!

--- a/ProcessorScheduler.st	Tue Feb 03 20:30:20 1998 +0100
+++ b/ProcessorScheduler.st	Thu Feb 05 01:06:54 1998 +0100
@@ -1561,12 +1561,13 @@
 
 resumeForSingleSend:aProcess
     "like resume, but let the process execute a single send only.
-     This will be used by the (new, not yet released) debugger 
-     for single stepping."
+     This will be used by the debugger for single stepping."
 
     (aProcess isNil or:[aProcess == activeProcess]) ifTrue:[^ self].
     aProcess singleStep:true.
     self resume:aProcess
+
+    "Modified: / 3.2.1998 / 01:08:08 / stefan"
 !
 
 suspend:aProcess
@@ -2634,6 +2635,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.144 1998-02-03 19:30:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.145 1998-02-05 00:06:54 stefan Exp $'
 ! !
 ProcessorScheduler initialize!