LookupKey.st
changeset 15077 53dce8734409
parent 14119 26e51066f338
child 16747 52fd1ec02e85
child 18045 c0c600e0d3b3
equal deleted inserted replaced
15076:f4c814ed8258 15077:53dce8734409
    79 
    79 
    80     ^ key < aKey key
    80     ^ key < aKey key
    81 !
    81 !
    82 
    82 
    83 = aLookupKey
    83 = aLookupKey
    84     "return true if the receiver equals the argument.
    84     "return true if the receivers key equals the arguments key.
    85      Notice, that in contrast to the less/greater compares,
    85      The argument must be a kind of lookupKey."
    86      this compares both key AND value."
       
    87 
    86 
    88     ^ (self species == aLookupKey species) and:[key = aLookupKey key]
    87     ^ (self species == aLookupKey species) and:[key = aLookupKey key]
    89 !
    88 !
    90 
    89 
    91 > aKey
    90 > aKey
   134 
   133 
   135 
   134 
   136 !LookupKey class methodsFor:'documentation'!
   135 !LookupKey class methodsFor:'documentation'!
   137 
   136 
   138 version
   137 version
   139     ^ '$Header: /cvs/stx/stx/libbasic/LookupKey.st,v 1.10 2012-04-24 12:01:05 stefan Exp $'
   138     ^ '$Header: /cvs/stx/stx/libbasic/LookupKey.st,v 1.11 2013-04-11 12:22:45 stefan Exp $'
   140 ! !
   139 ! !
       
   140