ByteCodeCompiler.st
changeset 1201 d38dbc8f2961
parent 1186 014c3db76517
child 1213 7914609d026d
--- a/ByteCodeCompiler.st	Tue Oct 09 09:41:57 2001 +0200
+++ b/ByteCodeCompiler.st	Wed Oct 10 18:48:41 2001 +0200
@@ -966,7 +966,7 @@
 
 compile:textOrStream in:aClass notifying:requestor ifFail:exceptionBlock
     "name alias for ST-80 compatibility.
-     Returns the new method, #Error or nil."
+     Returns the new method, or the value from exceptionBlock."
 
     |m|
 
@@ -982,7 +982,6 @@
         ^ exceptionBlock value
     ].
      ^ m
-
 ! !
 
 !ByteCodeCompiler class methodsFor:'constants'!
@@ -3758,6 +3757,6 @@
 !ByteCodeCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.189 2001-09-19 10:56:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.190 2001-10-10 16:48:41 cg Exp $'
 ! !
 ByteCodeCompiler initialize!