--- a/SmalltalkCodeGeneratorTool.st	Fri Jul 20 15:29:25 2012 +0200
+++ b/SmalltalkCodeGeneratorTool.st	Fri Jul 20 18:55:09 2012 +0200
@@ -2254,7 +2254,7 @@
     ] ifFalse:[
         self realMain:argv.
     ].
-    Smalltalk exit:0. 
+    "/ do not exit here; caller will go into event loop here
 '.
 
     "Created: / 19-08-2011 / 02:18:49 / cg"
@@ -2275,7 +2275,7 @@
 
     ^
 'realMain:argsToEcho
-    "just a dummy as example - does nothing but echo its arguments"
+    "just a dummy example - does nothing but echo its arguments"
 
     Stdout nextPutLine:''Hello World''.
     Stdout nextPutLine:(argsToEcho asStringWith:Character space)
@@ -2493,11 +2493,11 @@
 !SmalltalkCodeGeneratorTool class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkCodeGeneratorTool.st,v 1.13 2012-05-22 16:33:26 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkCodeGeneratorTool.st,v 1.14 2012-07-20 16:55:09 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkCodeGeneratorTool.st,v 1.13 2012-05-22 16:33:26 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkCodeGeneratorTool.st,v 1.14 2012-07-20 16:55:09 cg Exp $'
 !
 
 version_SVN