--- a/CharacterArray.st	Thu Sep 19 18:29:02 1996 +0200
+++ b/CharacterArray.st	Fri Sep 20 09:29:27 1996 +0200
@@ -405,7 +405,7 @@
      This is an experimental interface - unfinished"
 
     |table decoderTable unrepresentableCharacterCode 
-     unrepresentableISOCharacterCode x80Table|
+     unrepresentableISOCharacterCode|
 
     EncoderTables notNil ifTrue:[
         table := EncoderTables at:encoding ifAbsent:nil.
@@ -914,7 +914,6 @@
 
     |sz "{ Class: SmallInteger }"
      b1 "{ Class: SmallInteger }"
-     b2 "{ Class: SmallInteger }"
      val "{ Class: SmallInteger }"
      romans out|
 
@@ -1005,7 +1004,7 @@
 
     |sz "{ Class:SmallInteger }"
      b1 "{ Class:SmallInteger }"
-     b2 val romans out inSingleByteMode c kanji roman|
+     val romans out inSingleByteMode c kanji roman|
 
     inSingleByteMode := true.
     kanji := JISEncodedString jis7KanjiEscapeSequence.
@@ -3922,5 +3921,5 @@
 !CharacterArray  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.95 1996-07-26 17:11:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.96 1996-09-20 07:27:38 cg Exp $'
 ! !