--- a/Integer.st Thu Mar 28 09:34:43 2019 +0100
+++ b/Integer.st Thu Mar 28 09:35:12 2019 +0100
@@ -802,8 +802,6 @@
"Modified: / 15.11.1999 / 20:35:20 / cg"
! !
-
-
!Integer class methodsFor:'class initialization'!
initialize
@@ -1957,7 +1955,7 @@
bitReversed16
"swap (i.e. reverse) the low 16 bits in an integer
- the high bits are ignored and clear in the result
+ the high bits are ignored and cleared in the result
i.e. xxx.a.b.c.d....x.y.z -> 000.z.y.x...b.a.d.c."
|rslt|
@@ -1973,11 +1971,12 @@
"
"Created: / 01-11-2018 / 11:34:51 / Stefan Vogel"
+ "Modified (comment): / 27-03-2019 / 15:14:45 / stefan"
!
bitReversed32
"swap (i.e. reverse) the low 32 bits in an integer
- the high bits are ignored and clear in the result
+ the high bits are ignored and cleared in the result
i.e. xxx.a.b.c.d....x.y.z -> 000.z.y.x...b.a.d.c."
|rslt|
@@ -1995,11 +1994,12 @@
"
"Created: / 01-11-2018 / 11:35:54 / Stefan Vogel"
+ "Modified (comment): / 27-03-2019 / 15:14:39 / stefan"
!
bitReversed64
- "swap (i.e. reverse) the low 32 bits in an integer
- the high bits are ignored and clear in the result
+ "swap (i.e. reverse) the low 64 bits in an integer
+ the high bits are ignored and cleared in the result
i.e. xxx.a.b.c.d....x.y.z -> 000.z.y.x...b.a.d.c."
|rslt|
@@ -2023,11 +2023,12 @@
"
"Created: / 01-11-2018 / 11:35:54 / Stefan Vogel"
+ "Modified (comment): / 27-03-2019 / 15:14:33 / stefan"
!
bitReversed8
"swap (i.e. reverse) the low 8 bits in an integer
- the high bits are ignored and clear in the result
+ the high bits are ignored and cleared in the result
i.e. xxx.a.b.c.d....x.y.z -> 000.z.y.x...b.a.d.c."
^ (self digitAt:1) bitReversed8.
@@ -2041,6 +2042,7 @@
"
"Created: / 01-11-2018 / 11:32:58 / Stefan Vogel"
+ "Modified (comment): / 27-03-2019 / 15:14:54 / stefan"
!
bitShift:shiftCount