Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
oops - leftover prints
authorClaus Gittinger <cg@exept.de>
Wed, 17 Apr 1996 18:59:52 +0200
changeset 1204 977e83b2c166
parent 1203 a43528048cb8
child 1205 6f33a6e5b914
oops - leftover prints
CharArray.st file | annotate | diff | comparison | revisions
CharacterArray.st file | annotate | diff | comparison | revisions 
--- a/CharArray.st	Wed Apr 17 18:57:24 1996 +0200
+++ b/CharArray.st	Wed Apr 17 18:59:52 1996 +0200
@@ -287,11 +287,9 @@
     |newString|
 
     newString := BIG5EncodedString new:aString size.
-    newString := self decodeFromBIG5_or_GB:aString into:newString.
-'b5 (' print. aString print. ' -> ' print. newString printNL.
-    ^ newString
-
-    "Modified: 17.4.1996 / 18:30:29 / cg"
+    ^ self decodeFromBIG5_or_GB:aString into:newString.
+
+    "Modified: 17.4.1996 / 18:58:29 / cg"
 !
 
 decodeFromBIG5_or_GB:aString into:a16BitString
@@ -1976,7 +1974,7 @@
 
     |newString|
 
-self encoding storeString print. ' -> ' print. encodingSymbol storeString printNL.
+"/  self encoding storeString print. ' -> ' print. encodingSymbol storeString printNL.
 
     encodingSymbol isNil ifTrue:[^ self].
     encodingSymbol == self encoding ifTrue:[^ self].
@@ -2009,7 +2007,7 @@
     ^ newString
 
     "Created: 22.2.1996 / 15:07:31 / cg"
-    "Modified: 17.4.1996 / 18:32:09 / cg"
+    "Modified: 17.4.1996 / 18:59:12 / cg"
 !
 
 replaceFrom:aString decode:encoding 
@@ -3380,5 +3378,5 @@
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/CharArray.st,v 1.70 1996-04-17 16:57:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/CharArray.st,v 1.71 1996-04-17 16:59:52 cg Exp $'
 ! !
--- a/CharacterArray.st	Wed Apr 17 18:57:24 1996 +0200
+++ b/CharacterArray.st	Wed Apr 17 18:59:52 1996 +0200
@@ -287,11 +287,9 @@
     |newString|
 
     newString := BIG5EncodedString new:aString size.
-    newString := self decodeFromBIG5_or_GB:aString into:newString.
-'b5 (' print. aString print. ' -> ' print. newString printNL.
-    ^ newString
-
-    "Modified: 17.4.1996 / 18:30:29 / cg"
+    ^ self decodeFromBIG5_or_GB:aString into:newString.
+
+    "Modified: 17.4.1996 / 18:58:29 / cg"
 !
 
 decodeFromBIG5_or_GB:aString into:a16BitString
@@ -1976,7 +1974,7 @@
 
     |newString|
 
-self encoding storeString print. ' -> ' print. encodingSymbol storeString printNL.
+"/  self encoding storeString print. ' -> ' print. encodingSymbol storeString printNL.
 
     encodingSymbol isNil ifTrue:[^ self].
     encodingSymbol == self encoding ifTrue:[^ self].
@@ -2009,7 +2007,7 @@
     ^ newString
 
     "Created: 22.2.1996 / 15:07:31 / cg"
-    "Modified: 17.4.1996 / 18:32:09 / cg"
+    "Modified: 17.4.1996 / 18:59:12 / cg"
 !
 
 replaceFrom:aString decode:encoding 
@@ -3380,5 +3378,5 @@
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.70 1996-04-17 16:57:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.71 1996-04-17 16:59:52 cg Exp $'
 ! !
hg/stx-libbasic