author | Claus Gittinger <cg@exept.de> |
Mon, 23 Apr 2018 22:42:08 +0200 | |
changeset 4236 | 89aa6c00833a |
parent 4235 | fa13c6aa5831 |
child 4237 | 7414f4311853 |
PrimaryNode.st | file | annotate | diff | comparison | revisions |
--- a/PrimaryNode.st Mon Apr 23 22:41:47 2018 +0200 +++ b/PrimaryNode.st Mon Apr 23 22:42:08 2018 +0200 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 1989 by Claus Gittinger All Rights Reserved @@ -88,6 +90,13 @@ ^ self subclassResponsibility ! ! +!PrimaryNode methodsFor:'enumeration'! + +allSubNodesDo:aBlock + "no subnodes" + + ^ self +! ! !PrimaryNode methodsFor:'evaluation'!