hg/stx-libbasic: changeset 19214:2a21c945fba0

author	Claus Gittinger <cg@exept.de>
	Sun, 14 Feb 2016 00:14:12 +0100
changeset 19214	2a21c945fba0
parent 19213	b990f28738b2
child 19215	b20035967455

#BUGFIX class: Stream changed: #nextUnsigned:MSB: (send #nextUnsignedInt32MSB: instead of #nextUnsignedLongMSB:, send #nextUnsignedInt16MSB: instead of #nextUnsignedShortMSB:) removed remaining references to obsolete inhomogenous writers and readers.

--- a/Stream.st	Sat Feb 13 23:47:13 2016 +0100
+++ b/Stream.st	Sun Feb 14 00:14:12 2016 +0100
@@ -1254,17 +1254,17 @@
         ^ self nextByte
     ].
     numBytes == 2 ifTrue:[
-        ^ self nextUnsignedShortMSB:msbFlag
+        ^ self nextUnsignedInt16MSB:msbFlag
     ].
     numBytes == 3 ifTrue:[
-        val := self nextUnsignedShortMSB:msbFlag.
+        val := self nextUnsignedInt16MSB:msbFlag.
         msbFlag ifTrue:[
             ^ (val bitShift:8) + self nextByte
         ].
         ^ val + (self nextByte bitShift:16)
     ].
     numBytes == 4 ifTrue:[
-        ^ self nextUnsignedLongMSB:msbFlag
+        ^ self nextUnsignedInt32MSB:msbFlag
     ].
 
     val := 0.