--- a/RegressionTests__IntegerTest.st	Mon Dec 02 10:04:03 2019 +0100
+++ b/RegressionTests__IntegerTest.st	Mon Dec 02 11:16:24 2019 +0100
@@ -4522,6 +4522,9 @@
     self assert:(( 16r10000000000000000 bitOr: 16r10000000000000000) lowBit = 65).
     self assert:(( (1 bitShift:1000) bitOr: (1 bitShift:1001)) lowBit = 1001).
 
+    self assert:2r00101000 lowBit == 4.
+    "/ self assert:2r-00101000 lowBit == 4.  -- not really
+
     "
      self basicNew testHighBitLowBit
     "