--- a/RegressionTests__IntegerTest.st	Wed Sep 16 23:43:08 2009 +0200
+++ b/RegressionTests__IntegerTest.st	Wed Sep 16 23:54:58 2009 +0200
@@ -1748,6 +1748,12 @@
      self assert:(16rFFEEDDCCBBAA998877665544332211 bitOr:16rFFFFFFFFFFFFFFFFFFFFFF) hexPrintString = 'FFEEDDCCFFFFFFFFFFFFFFFFFFFFFF'.
      self assert:(16rFFEEDDCCBBAA998877665544332211 bitOr:16rFFFFFFFFFFFFFFFFFFFFFFFF) hexPrintString = 'FFEEDDFFFFFFFFFFFFFFFFFFFFFFFF'.
 
+    Time millisecondsToRun:[
+        100000 timesRepeat:[
+            (16rFFEEDDCCBBAA998877665544332211 bitAnd:16rFFFFFFFFFFFFFFFFFFFFFFFF)
+        ]
+    ]
+
     "
      self basicNew testLargeBitOperations
     "