--- a/Smalltalk.st	Sat Oct 08 23:15:08 2016 +0200
+++ b/Smalltalk.st	Sun Oct 09 00:49:54 2016 +0200
@@ -4795,6 +4795,7 @@
         self exit:statusInteger
     ] ifFalse:[
         self warn:'Application asks Smalltalk to exit (suppressed in IDE).'.
+        AbortOperationRequest raise.
     ]
 
     "