--- a/Character.st	Wed Aug 23 16:06:18 2006 +0200
+++ b/Character.st	Wed Aug 23 16:06:21 2006 +0200
@@ -651,26 +651,6 @@
     ^ Character value:(asciivalue \\ aMagnitude asInteger \\ 16rFFFF)
 ! !
 
-!Character methodsFor:'binary storage'!
-
-hasSpecialBinaryRepresentation
-    "return true, if the receiver has a special binary representation"
-
-    ^ true
-!
-
-storeBinaryOn:stream manager:manager
-    "store a binary representation of the receiver on stream;
-     redefined, since single-byte characters are stored more compact
-     with a special type-code followed by the asciiValue."
-
-    (asciivalue < 256) ifTrue:[
-	stream nextPut:manager codeForCharacter; nextPut:asciivalue.
-    ] ifFalse:[
-	stream nextPut:manager codeForTwoByteCharacter.
-	stream nextPutShort:asciivalue MSB:true
-    ]
-! !
 
 !Character methodsFor:'comparing'!
 
@@ -2758,5 +2738,5 @@
 !Character class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.127 2006-03-06 08:59:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.128 2006-08-23 14:06:21 cg Exp $'
 ! !