--- a/RegressionTests__CharacterEncoderTests.st Wed Jun 29 21:40:53 2016 +0100
+++ b/RegressionTests__CharacterEncoderTests.st Thu Jun 30 09:02:08 2016 +0100
@@ -222,8 +222,8 @@
s1 := (Character value:eachCodePoint) asString.
s2 := encoder encodeString:s1.
self assert:(s2 size == 2).
- self assert:((s2 first codePoint bitAnd:2r11100000) == 2r11000000).
- self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 first codePoint bitAnd:2r11100000) == 2r11000000).
+ self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
s3 := encoder decodeString:s2.
self assert:(s1 = s3).
].
@@ -237,9 +237,9 @@
s1 := (Character value:eachCodePoint) asString.
s2 := encoder encodeString:s1.
self assert:(s2 size == 3).
- self assert:((s2 first codePoint bitAnd:2r11110000) == 2r11100000).
- self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 third codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 first codePoint bitAnd:2r11110000) == 2r11100000).
+ self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 third codePoint bitAnd:2r11000000) == 2r10000000).
s3 := encoder decodeString:s2.
self assert:(s1 = s3).
].
@@ -253,10 +253,10 @@
s1 := (Character value:eachCodePoint) asString.
s2 := encoder encodeString:s1.
self assert:(s2 size == 4).
- self assert:((s2 first codePoint bitAnd:2r11111000) == 2r11110000).
- self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 third codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 fourth codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 first codePoint bitAnd:2r11111000) == 2r11110000).
+ self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 third codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 fourth codePoint bitAnd:2r11000000) == 2r10000000).
s3 := encoder decodeString:s2.
self assert:(s1 = s3).
].
@@ -270,11 +270,11 @@
s1 := (Character value:eachCodePoint) asString.
s2 := encoder encodeString:s1.
self assert:(s2 size == 5).
- self assert:((s2 first codePoint bitAnd:2r11111100) == 2r11111000).
- self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 third codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 fourth codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 fifth codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 first codePoint bitAnd:2r11111100) == 2r11111000).
+ self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 third codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 fourth codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 fifth codePoint bitAnd:2r11000000) == 2r10000000).
s3 := encoder decodeString:s2.
self assert:(s1 = s3).
].
@@ -290,12 +290,12 @@
s1 := (Character value:eachCodePoint) asString.
s2 := encoder encodeString:s1.
self assert:(s2 size == 6).
- self assert:((s2 first codePoint bitAnd:2r11111110) == 2r11111100).
- self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 third codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 fourth codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 fifth codePoint bitAnd:2r11000000) == 2r10000000).
- self assert:((s2 sixth codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 first codePoint bitAnd:2r11111110) == 2r11111100).
+ self assert:((s2 second codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 third codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 fourth codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 fifth codePoint bitAnd:2r11000000) == 2r10000000).
+ self assert:((s2 sixth codePoint bitAnd:2r11000000) == 2r10000000).
s3 := encoder decodeString:s2.
self assert:(s1 = s3).
].
@@ -310,3 +310,4 @@
version
^ '$Header$'
! !
+