Read a file character by character/UTF8: Difference between revisions
Content deleted Content added
Line 1,304: | Line 1,304: | ||
{{works with|Smalltalk/X}} |
{{works with|Smalltalk/X}} |
||
<lang smalltalk>|utfStream| |
<lang smalltalk>|utfStream| |
||
utfStream := 'input' asFilename asUTF8EncodedStream. |
utfStream := 'input' asFilename readStream asUTF8EncodedStream. |
||
[utfStream atEnd] whileFalse:[ |
[utfStream atEnd] whileFalse:[ |
||
Transcript showCR:'got char ',utfStream next. |
Transcript showCR:'got char ',utfStream next. |