--- a/CompiledCode.st	Fri Oct 07 13:56:19 2011 +0200
+++ b/CompiledCode.st	Fri Oct 07 13:58:26 2011 +0200
@@ -1059,7 +1059,7 @@
             goto badArgs;
         }
         nargs = 0;
-        ap = NULL;
+        ap = (OBJ *)0;
     }
 
 #ifdef F_NARGS
@@ -1334,7 +1334,7 @@
         valueWithReceiver:false arguments:#() 
     "
 
-    "Modified: / 07-10-2011 / 13:56:11 / cg"
+    "Modified: / 07-10-2011 / 13:58:21 / cg"
 ! !
 
 !CompiledCode methodsFor:'private-accessing'!
@@ -1826,8 +1826,12 @@
 
 !CompiledCode class methodsFor:'documentation'!
 
+version
+    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.112 2011-10-07 11:58:26 cg Exp $'
+!
+
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.111 2011-10-07 11:56:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.112 2011-10-07 11:58:26 cg Exp $'
 !
 
 version_SVN