#UI_ENHANCEMENT
authorClaus Gittinger <cg@exept.de>
Sat, 21 Nov 2015 18:31:31 +0100
changeset 18943 133920e78771
parent 18941 474e82fb794a
child 18944 c8a1f76e1c16
#UI_ENHANCEMENT class: CompiledCode added: #isAbstract
CompiledCode.st
--- a/CompiledCode.st	Sat Nov 21 01:23:05 2015 +0100
+++ b/CompiledCode.st	Sat Nov 21 18:31:31 2015 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1994 by Claus Gittinger
 	      All Rights Reserved
@@ -119,6 +117,10 @@
 
 !CompiledCode class methodsFor:'queries'!
 
+isAbstract
+    ^ self == CompiledCode
+!
+
 isBuiltInClass
     "return true if this class is known by the run-time-system.
      Here, true is returned for myself, false for subclasses."
@@ -1995,11 +1997,11 @@
 !CompiledCode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.130 2015-06-05 16:09:24 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.130 2015-06-05 16:09:24 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_SVN