ConstantNode.st
changeset 3503 53d41ce411e1
parent 3246 d0c8d1d6bad7
child 3811 ebeffc3fcf61
equal deleted inserted replaced
3502:4002c7b6b01d 3503:53d41ce411e1
   339               and:[otherValue = value]
   339               and:[otherValue = value]
   340         ].
   340         ].
   341         (value isMemberOf:Symbol) ifTrue:[
   341         (value isMemberOf:Symbol) ifTrue:[
   342             ^ otherValue == value
   342             ^ otherValue == value
   343         ].
   343         ].
   344         (value isMemberOf:String) ifTrue:[
   344         (value isSingleByteString) ifTrue:[
   345             ^ (otherValue isMemberOf:String)
   345             ^ (otherValue isSingleByteString)
   346               and:[otherValue = value]
   346               and:[otherValue = value]
   347         ].
   347         ].
   348     ].
   348     ].
   349     ^ false
   349     ^ false
   350 
   350 
   378 ! !
   378 ! !
   379 
   379 
   380 !ConstantNode class methodsFor:'documentation'!
   380 !ConstantNode class methodsFor:'documentation'!
   381 
   381 
   382 version_CVS
   382 version_CVS
   383     ^ '$Header: /cvs/stx/stx/libcomp/ConstantNode.st,v 1.51 2013-07-31 15:47:01 cg Exp $'
   383     ^ '$Header: /cvs/stx/stx/libcomp/ConstantNode.st,v 1.52 2014-07-12 05:41:49 cg Exp $'
   384 !
   384 !
   385 
   385 
   386 version_SVN
   386 version_SVN
   387     ^ '$ Id $'
   387     ^ '$ Id $'
   388 ! !
   388 ! !