MiniDebugger.st
changeset 18681 8844866e1a4b
parent 16626 bbf6b95f092f
child 18682 d64774633094
child 19144 2f3d50c4e256
--- a/MiniDebugger.st	Sat Aug 08 04:48:28 2015 +0200
+++ b/MiniDebugger.st	Mon Aug 10 10:40:44 2015 +0200
@@ -826,6 +826,7 @@
 
 	cmd := Character fromUser.
 	cmd isNil ifTrue:[
+	    '<EOF>' errorPrintCR.
 	    "
 	     mhmh end-of-file;
 	     return a 'c' (for continue); hope thats ok.
@@ -843,6 +844,7 @@
 	    [cmd notNil and:[cmd == Character space]] whileTrue:[
 		cmd := Character fromUser
 	    ].
+	    cmd isNil ifTrue:[ '<EOF>' errorPrintCR ].
 	].
 
 	"
@@ -853,6 +855,7 @@
 	[c isNil or:[c isEndOfLineCharacter]] whileFalse: [
 	    arg := arg copyWith:c.
 	    c := Character fromUser.
+	    c isNil ifTrue:[ '<EOF>' errorPrintCR ].
 	].
 	commandArg := (arg copyFrom:2) withoutSeparators.
 	command := cmd.
@@ -1057,10 +1060,10 @@
 !MiniDebugger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.103 2014-06-25 07:43:51 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.103 2014-06-25 07:43:51 stefan Exp $'
+    ^ '$Header$'
 ! !