changed: #code
authorClaus Gittinger <cg@exept.de>
Mon, 12 Dec 2011 20:30:09 +0100
changeset 13868 d6d3b20ff871
parent 13867 ed5b71c6e589
child 13869 3a257617cdcb
changed: #code
ExternalFunctionCallback.st
--- a/ExternalFunctionCallback.st	Mon Dec 12 19:59:34 2011 +0100
+++ b/ExternalFunctionCallback.st	Mon Dec 12 20:30:09 2011 +0100
@@ -493,7 +493,7 @@
 
 code
     self hasCode ifFalse:[
-	self generate
+        self generateClosure
     ].
     ^ super code
 
@@ -829,9 +829,9 @@
 !ExternalFunctionCallback class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalFunctionCallback.st,v 1.17 2011-12-12 18:59:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalFunctionCallback.st,v 1.18 2011-12-12 19:30:09 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalFunctionCallback.st,v 1.17 2011-12-12 18:59:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalFunctionCallback.st,v 1.18 2011-12-12 19:30:09 cg Exp $'
 ! !