--- a/RegressionTests__IntegerTest.st Wed Nov 27 11:16:27 2019 +0100
+++ b/RegressionTests__IntegerTest.st Wed Nov 27 22:47:15 2019 +0100
@@ -4232,12 +4232,16 @@
"/ 1 0 1 0
self assert:(2r0011 bitInterleaveWith:2r1010) == 2r10001101.
self assert:(2r10001101 bitDeinterleave:2) = #(2r0011 2r1010).
+ self assert:(2r00110011 bitInterleaveWith:2r10101010) == 2r1000110110001101.
+ self assert:(2r0011001100110011 bitInterleaveWith:2r1010101010101010) = 2r10001101100011011000110110001101.
"/ 0 0 1 1
"/ 1 0 1 0
"/ 1 1 0 1
self assert:(2r0011 bitInterleaveWith:2r1010 and:2r1101) == 2r110100011101.
self assert:(2r110100011101 bitDeinterleave:3) = #(2r0011 2r1010 2r1101).
+ self assert:(2r00110011 bitInterleaveWith:2r10101010 and:2r11011101) == 2r110100011101110100011101.
+ self assert:(2r0011001100110011 bitInterleaveWith:2r1010101010101010 and:2r1101110111011101) = 2r110100011101110100011101110100011101110100011101.
"Created: / 04-06-2019 / 01:16:09 / Claus Gittinger"
!