--- a/ReadEvalPrintLoop.st	Tue Nov 08 18:58:47 2016 +0100
+++ b/ReadEvalPrintLoop.st	Tue Nov 08 19:05:11 2016 +0100
@@ -575,15 +575,23 @@
 
     cmd := s nextAlphaNumericWord.
     cmd notNil ifTrue:[
-        self
-            perform:('cmd_',cmd) asMutator with:s
-            ifNotUnderstood:[
-                self errorStream
-                    nextPutAll:'?? invalid command: ';
-                    nextPutAll:cmd;
-                    nextPutAll:'. Type "#help" for help.';
-                    cr.
+        AbortAllOperationRequest handle:[:ex |
+            self errorStream nextPutLine:('Directive aborted: ', ex description)
+        ] do:[
+            (Error, ControlInterrupt) handle:[:ex |
+                self errorStream nextPutLine:('Ignored in directive: ', ex description).
+            ] do:[    
+                self
+                    perform:('cmd_',cmd) asMutator with:s
+                    ifNotUnderstood:[
+                        self errorStream
+                            nextPutAll:'?? invalid command: ';
+                            nextPutAll:cmd;
+                            nextPutAll:'. Type "#help" for help.';
+                            cr.
+                    ].
             ].
+        ].
     ].
 
     "Created: / 07-12-2006 / 18:49:17 / cg"