BlockNode.st
changeset 148 ef0e604209ec
parent 140 1ef1d1395146
child 168 87497e19c7d5
equal deleted inserted replaced
147:9de6bea67dbf 148:ef0e604209ec
    36 
    36 
    37 documentation
    37 documentation
    38 "
    38 "
    39     node for parse-trees, representing blocks
    39     node for parse-trees, representing blocks
    40 "
    40 "
    41 !
       
    42 
       
    43 version
       
    44     ^ '$Header: /cvs/stx/stx/libcomp/BlockNode.st,v 1.19 1995-11-23 02:12:33 cg Exp $'
       
    45 ! !
    41 ! !
    46 
    42 
    47 !BlockNode class methodsFor:'instance creation'!
    43 !BlockNode class methodsFor:'instance creation'!
    48 
    44 
    49 arguments:argList home:h variables:vars
    45 arguments:argList home:h variables:vars
   548     "a kludge, to have blocknodes mimic blocks"
   544     "a kludge, to have blocknodes mimic blocks"
   549 
   545 
   550     ^ true
   546     ^ true
   551 ! !
   547 ! !
   552 
   548 
       
   549 !BlockNode class methodsFor:'documentation'!
       
   550 
       
   551 version
       
   552     ^ '$Header: /cvs/stx/stx/libcomp/BlockNode.st,v 1.20 1995-12-03 12:15:39 cg Exp $'
       
   553 ! !