Structure.st
changeset 3628 febf865a3ca9
parent 3627 4638af476fae
child 3898 e0ad3862c271
--- a/Structure.st	Fri May 08 00:29:14 2015 +0200
+++ b/Structure.st	Mon May 11 15:20:01 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1996 by Claus Gittinger
               All Rights Reserved
@@ -169,6 +167,7 @@
             add:(Object compiledMethodAt:#dependents:);
             add:(Object compiledMethodAt:#perform:);
             add:(Object compiledMethodAt:#perform:with:);
+            add:(Object compiledMethodAt:#respondsTo:);
             add:(Object compiledMethodAt:#isBoolean).
         OtherMethods := OtherMethods asArray.
 
@@ -178,6 +177,7 @@
                             #printString #printOn: #basicPrintOn:
                             #addDependent: #removeDependent: #dependents #dependents:
                             #perform: #perform:with:
+                            #respondsTo:
                             #isBoolean).
     ].
 
@@ -1443,10 +1443,10 @@
 !Structure class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Structure.st,v 1.28 2015-05-07 22:29:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Structure.st,v 1.29 2015-05-11 13:20:01 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Structure.st,v 1.28 2015-05-07 22:29:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Structure.st,v 1.29 2015-05-11 13:20:01 cg Exp $'
 ! !