class: CompiledCode
authorClaus Gittinger <cg@exept.de>
Tue, 15 Apr 2014 01:03:35 +0200
changeset 16333 4828c2efceeb
parent 16332 a9aae7562d83
child 16334 41fddda3b611
class: CompiledCode added: #hasAnnotation:
CompiledCode.st
--- a/CompiledCode.st	Mon Apr 14 20:45:58 2014 +0200
+++ b/CompiledCode.st	Tue Apr 15 01:03:35 2014 +0200
@@ -1650,6 +1650,12 @@
     "Modified: 30.7.1997 / 16:37:14 / cg"
 !
 
+hasAnnotation: key
+    "Return false here, as a fallback"
+
+    ^ false
+!
+
 isChecked
     "return true, if this method has been analyzed for jitting"
 
@@ -1889,11 +1895,11 @@
 !CompiledCode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.122 2014-02-25 08:32:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.123 2014-04-14 23:03:35 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.122 2014-02-25 08:32:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.123 2014-04-14 23:03:35 cg Exp $'
 !
 
 version_SVN