--- a/SmallInteger.st	Wed Jul 13 17:17:37 2005 +0200
+++ b/SmallInteger.st	Tue Jul 26 16:24:31 2005 +0200
@@ -1023,7 +1023,7 @@
 !
 
 clearBit:anInteger
-    "return a new number where the specified bit is off.
+    "return a new integer where the specified bit is off.
      Bits are counted from 1 starting with the least significant.
      The methods name may be missleading: the receiver is not changed,
      but a new number is returned. Should be named #withBitCleared:"
@@ -1031,21 +1031,21 @@
 %{  /* NOCONTEXT */
 
     if (__isSmallInteger(anInteger)) {
-	int index = __intVal(anInteger);
-
-	if (index > 0) {
+        int index = __intVal(anInteger);
+
+        if (index > 0) {
 #if __POINTER_SIZE__ == 8
-	    if (index <= 62)
+            if (index <= 62)
 #else
-	    if (index <= 30)
+            if (index <= 30)
 #endif
-	    {
-		INT mask = __MASKSMALLINT(1 << (index-1));
-
-		RETURN ( ((OBJ) ((INT)self & ~(INT)mask)) );
-	    }
-	    RETURN (self);  /* nothing to do ... */
-	}
+            {
+                INT mask = __MASKSMALLINT(1 << (index-1));
+
+                RETURN ( ((OBJ) ((INT)self & ~(INT)mask)) );
+            }
+            RETURN (self);  /* nothing to do ... */
+        }
     }
 %}.
     ^ super clearBit:anInteger
@@ -1066,8 +1066,6 @@
      (16rF0000001 clearBit:31) hexPrintString
      (16rF0000001 clearBit:32) hexPrintString
     "
-
-
 !
 
 highBit
@@ -1311,7 +1309,7 @@
 !
 
 setBit:anInteger
-    "return a new number where the specified bit is on.
+    "return a new integer where the specified bit is on.
      Bits are counted from 1 starting with the least significant.
      The methods name may be missleading: the receiver is not changed,
      but a new number is returned. Should be named #withBitSet:"
@@ -1319,20 +1317,20 @@
 %{  /* NOCONTEXT */
 
     if (__isSmallInteger(anInteger)) {
-	int index = __intVal(anInteger);
-
-	if (index > 0) {
+        int index = __intVal(anInteger);
+
+        if (index > 0) {
 #if __POINTER_SIZE__ == 8
-	    if (index <= 62)
+            if (index <= 62)
 #else
-	    if (index <= 30)
+            if (index <= 30)
 #endif
-	    {
-		INT mask = __MASKSMALLINT(1 << (index-1));
-
-		RETURN ( ((OBJ) ((INT)self | (INT)mask)) );
-	    }
-	}
+            {
+                INT mask = __MASKSMALLINT(1 << (index-1));
+
+                RETURN ( ((OBJ) ((INT)self | (INT)mask)) );
+            }
+        }
     }
 %}.
     ^ super setBit:anInteger
@@ -1348,8 +1346,6 @@
      (16r0 setBit:33) hexPrintString
      (16r0 setBit:100) hexPrintString
     "
-
-
 ! !
 
 !SmallInteger methodsFor:'bit operators-32bit'!
@@ -3580,5 +3576,5 @@
 !SmallInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.166 2005-07-08 21:13:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.167 2005-07-26 14:24:24 cg Exp $'
 ! !