--- a/Method.st	Sun Jun 10 21:25:07 2012 +0200
+++ b/Method.st	Wed Jun 13 15:11:30 2012 +0200
@@ -377,6 +377,12 @@
 
 !Method methodsFor:'Compatibility-Squeak'!
 
+isCompiledMethod
+    ^ true
+
+    "Created: / 13-06-2012 / 14:51:19 / cg"
+!
+
 pragmaAt:aKey
     ^ self annotationAt:aKey
 
@@ -3610,11 +3616,11 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.384 2012-06-01 21:16:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.385 2012-06-13 13:11:30 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.384 2012-06-01 21:16:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.385 2012-06-13 13:11:30 cg Exp $'
 !
 
 version_SVN