class: Method
authorClaus Gittinger <cg@exept.de>
Tue, 25 Feb 2014 09:31:15 +0100
changeset 16128 53f6b79ce0f7
parent 16127 8d4d8584c504
child 16129 fe2f9ba21dd4
class: Method added: #initialPC
Method.st
--- a/Method.st	Mon Feb 24 21:02:31 2014 +0100
+++ b/Method.st	Tue Feb 25 09:31:15 2014 +0100
@@ -355,6 +355,10 @@
 
 !Method methodsFor:'Compatibility-Squeak'!
 
+initialPC
+    ^ 1
+!
+
 isCompiledMethod
     ^ true
 
@@ -3861,11 +3865,11 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.427 2014-02-05 17:17:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.428 2014-02-25 08:31:15 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.427 2014-02-05 17:17:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.428 2014-02-25 08:31:15 cg Exp $'
 !
 
 version_SVN