--- a/CompiledCode.st	Tue Feb 25 09:31:15 2014 +0100
+++ b/CompiledCode.st	Tue Feb 25 09:32:11 2014 +0100
@@ -210,6 +210,10 @@
     "Modified: 19.6.1997 / 16:31:53 / cg"
 !
 
+initialPC
+    ^ 1
+!
+
 methodClass
     "return the class I am defined in"
 
@@ -1885,11 +1889,11 @@
 !CompiledCode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.121 2013-06-20 11:16:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.122 2014-02-25 08:32:11 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.121 2013-06-20 11:16:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.122 2014-02-25 08:32:11 cg Exp $'
 !
 
 version_SVN