--- a/CharacterEncoderImplementations__MS_Ansi.st	Mon Mar 13 17:06:39 2006 +0100
+++ b/CharacterEncoderImplementations__MS_Ansi.st	Mon Mar 13 17:07:07 2006 +0100
@@ -587,10 +587,22 @@
         ^ unicode
     ].
     ^  "16r2122" 16r0099 " TRADE MARK SIGN " 
+!
+
+encodeString:aStringOrUnicodeString
+    "redefined to speedup simple 8 bit strings"
+
+    aStringOrUnicodeString bitsPerCharacter == 8 ifTrue:[
+        "/ all between 0 and FF
+        (aStringOrUnicodeString contains8BitCharacters) ifFalse:[
+             ^ aStringOrUnicodeString
+        ]
+    ].
+    ^ super encodeString:aStringOrUnicodeString
 ! !
 
 !MS_Ansi class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__MS_Ansi.st,v 1.5 2005-03-31 18:48:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__MS_Ansi.st,v 1.6 2006-03-13 16:07:07 cg Exp $'
 ! !