extensions.st
branchcvs_MAIN
changeset 1038 5d66b7793f44
parent 987 4183da051c79
child 1068 a1ade1a529c8
equal deleted inserted replaced
1037:613a521b1adc 1038:5d66b7793f44
    20 ! !
    20 ! !
    21 
    21 
    22 !AssignmentNode methodsFor:'accessing-SmallSense'!
    22 !AssignmentNode methodsFor:'accessing-SmallSense'!
    23 
    23 
    24 inferedType: aSmallSenseType
    24 inferedType: aSmallSenseType
    25 
    25     "/ cg: why not????
    26     ^ self shouldNotImplement
    26 "/    ^ self shouldNotImplement
       
    27     ^ super inferedType: aSmallSenseType
    27 
    28 
    28     "Created: / 26-11-2011 / 12:37:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    29     "Created: / 26-11-2011 / 12:37:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
    30     "Modified: / 14-07-2017 / 13:37:28 / cg"
    29 ! !
    31 ! !
    30 
    32 
    31 !BlockNode methodsFor:'enumeration'!
    33 !BlockNode methodsFor:'enumeration'!
    32 
    34 
    33 childNamesAndValuesDo:aBlock
    35 childNamesAndValuesDo:aBlock