SmallInteger.st
changeset 5782 dcc037e5bdbf
parent 5496 338c81a04468
child 5930 d7728046c2e1
equal deleted inserted replaced
5781:8ef02575cad6 5782:dcc037e5bdbf
   936     ].
   936     ].
   937     ^ self bitShift:(shiftCount coerce:1)
   937     ^ self bitShift:(shiftCount coerce:1)
   938 !
   938 !
   939 
   939 
   940 bitTest:aMask
   940 bitTest:aMask
   941     "return true, if any bit from aMask is set in the receiver"
   941     "return true, if any bit from aMask is set in the receiver.
       
   942      I.e. true, if the bitwise-AND of the receiver and the argument, anInteger
       
   943      is non-0, false otherwise."
   942 
   944 
   943 %{  /* NOCONTEXT */
   945 %{  /* NOCONTEXT */
   944 
   946 
   945     /* and all bits except tag */
   947     /* and all bits except tag */
   946     if (__isSmallInteger(aMask)) {
   948     if (__isSmallInteger(aMask)) {
  3254 ! !
  3256 ! !
  3255 
  3257 
  3256 !SmallInteger class methodsFor:'documentation'!
  3258 !SmallInteger class methodsFor:'documentation'!
  3257 
  3259 
  3258 version
  3260 version
  3259     ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.132 2000-08-03 17:48:44 cg Exp $'
  3261     ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.133 2001-01-16 11:28:52 cg Exp $'
  3260 ! !
  3262 ! !