EncodedStream.st
changeset 8165 d6446fc1ea3b
parent 8148 dbf64e3142d9
child 8175 3548845d3c09
equal deleted inserted replaced
8164:db7a658c7bfc 8165:d6446fc1ea3b
    59     stream := something.
    59     stream := something.
    60 ! !
    60 ! !
    61 
    61 
    62 !EncodedStream methodsFor:'stream protocol'!
    62 !EncodedStream methodsFor:'stream protocol'!
    63 
    63 
       
    64 close
       
    65     stream close
       
    66 !
       
    67 
    64 nextChunk
    68 nextChunk
    65     ^ encoder decodeString:(stream nextChunk)
    69     ^ encoder decodeString:(stream nextChunk)
    66 !
    70 !
    67 
    71 
    68 nextPut:aCharacter
    72 nextPut:aCharacter
    71 
    75 
    72 nextPutAll:aCollection
    76 nextPutAll:aCollection
    73     stream nextPutAll:(encoder encodeString:aCollection).
    77     stream nextPutAll:(encoder encodeString:aCollection).
    74 !
    78 !
    75 
    79 
       
    80 position
       
    81     ^ stream position
       
    82 !
       
    83 
    76 position1Based:newPosition
    84 position1Based:newPosition
    77     stream position1Based:newPosition
    85     stream position1Based:newPosition
    78 ! !
    86 ! !
    79 
    87 
    80 !EncodedStream class methodsFor:'documentation'!
    88 !EncodedStream class methodsFor:'documentation'!
    81 
    89 
    82 version
    90 version
    83     ^ '$Header: /cvs/stx/stx/libbasic/EncodedStream.st,v 1.3 2004-03-09 21:57:33 cg Exp $'
    91     ^ '$Header: /cvs/stx/stx/libbasic/EncodedStream.st,v 1.4 2004-03-12 09:15:58 ca Exp $'
    84 ! !
    92 ! !