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.
#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Sun, 10 Apr 2016 11:50:09 +0200
changeset 19560 691fcc4fe7c6
parent 19558 2636649cfaab
child 19561 6899c1d8af66
#REFACTORING by cg class: ReadStream comment/format in: #nextUnicode16Characters:MSB: changed: #nextUnicode16CharacterMSB: (send #nextUnsignedInt16MSB: instead of #nextUnsignedShortMSB:)
ReadStream.st file | annotate | diff | comparison | revisions 
--- a/ReadStream.st	Thu Apr 07 19:45:17 2016 +0200
+++ b/ReadStream.st	Sun Apr 10 11:50:09 2016 +0200
@@ -583,7 +583,7 @@
 !
 
 nextUnicode16CharacterMSB:msb
-    ^ Character value:(self nextUnsignedShortMSB:msb)
+    ^ Character value:(self nextUnsignedInt16MSB:msb)
 
     "
      #[16r00 16r51] readStream nextUnicode16CharacterMSB:true
@@ -592,6 +592,8 @@
 !
 
 nextUnicode16Characters:count MSB:msb
+    "easily tuned, if heavily used"
+    
     ^ (1 to:count) 
         collect:[:i | self nextUnicode16CharacterMSB:msb]
         as:Unicode16String
hg/stx-libbasic