Skip to content

Commit f7d355f

Browse files
author
Johan Brichau
committed
fix missing method in Squeak 6
1 parent 34bd7c3 commit f7d355f

1 file changed

Lines changed: 8 additions & 0 deletions

File tree

‎repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/writeFileStreamOn.do.binary..st‎

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,8 @@
1+
as yet unclassified
2+
writeFileStreamOn: aString do: aBlock binary: aBoolean
3+
| stream |
4+
stream := aBoolean
5+
ifTrue: [ (MultiByteFileStream fileNamed: aString) ascii; wantsLineEndConversion: true; yourself ]
6+
ifFalse: [ (FileStream fileNamed: aString) binary ].
7+
[ aBlock value: stream ]
8+
ensure: [ stream close ]

0 commit comments

Comments
 (0)