equal
deleted
inserted
replaced
64 !TwoByteEncoder methodsFor:'stream support'! |
64 !TwoByteEncoder methodsFor:'stream support'! |
65 |
65 |
66 readNextCharacterFrom:aStream |
66 readNextCharacterFrom:aStream |
67 | c | |
67 | c | |
68 |
68 |
69 c := aStream nextUnsignedShortMSB:false. |
69 c := aStream nextUnsignedInt16MSB:false. |
70 ^ c isNil |
70 ^ c isNil |
71 ifTrue: [nil] |
71 ifTrue: [nil] |
72 ifFalse: [(self decode:c) asCharacter] |
72 ifFalse: [(self decode:c) asCharacter] |
73 ! |
73 ! |
74 |
74 |
75 readNextInputCharacterFrom:aStream |
75 readNextInputCharacterFrom:aStream |
76 ^ aStream nextUnsignedShortMSB:false |
76 ^ aStream nextUnsignedInt16MSB:false |
77 ! ! |
77 ! ! |
78 |
78 |
79 !TwoByteEncoder class methodsFor:'documentation'! |
79 !TwoByteEncoder class methodsFor:'documentation'! |
80 |
80 |
81 version |
81 version |
82 ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__TwoByteEncoder.st,v 1.6 2009-11-04 00:47:35 cg Exp $' |
82 ^ '$Header$' |
83 ! |
83 ! |
84 |
84 |
85 version_CVS |
85 version_CVS |
86 ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__TwoByteEncoder.st,v 1.6 2009-11-04 00:47:35 cg Exp $' |
86 ^ '$Header$' |
87 ! ! |
87 ! ! |
|
88 |