File tree Expand file tree Collapse file tree 4 files changed +8
-8
lines changed
Grease-Squeak5-Core.package
GRSqueakPlatform.class/instance
Grease-Squeak6-Core.package
GRSqueakPlatform.class/instance Expand file tree Collapse file tree 4 files changed +8
-8
lines changed Original file line number Diff line number Diff line change 1- as yet unclassified
1+ files
22writeFileStreamOn: aString do: aBlock binary: aBoolean
33 | stream |
44 stream := aBoolean
5- ifTrue: [ (MultiByteFileStream fileNamed: aString) ascii; wantsLineEndConversion: true ; yourself ]
6- ifFalse: [ (FileStream fileNamed: aString) binary ].
5+ ifTrue: [ (FileStream fileNamed: aString) binary ]
6+ ifFalse: [ (MultiByteFileStream fileNamed: aString) ascii; wantsLineEndConversion: true ; yourself ].
77 [ aBlock value: stream ]
88 ensure : [ stream close ]
Original file line number Diff line number Diff line change 1- SystemOrganization addCategory :' Grease-Squeak5-Core'
1+ self packageOrganizer ensurePackage :' Grease-Squeak5-Core' withTags: #() !
Original file line number Diff line number Diff line change 1- as yet unclassified
1+ files
22writeFileStreamOn: aString do: aBlock binary: aBoolean
33 | stream |
44 stream := aBoolean
5- ifTrue: [ (MultiByteFileStream fileNamed: aString) ascii; wantsLineEndConversion: true ; yourself ]
6- ifFalse: [ (FileStream fileNamed: aString) binary ].
5+ ifTrue: [ (FileStream fileNamed: aString) binary ]
6+ ifFalse: [ (MultiByteFileStream fileNamed: aString) ascii; wantsLineEndConversion: true ; yourself ].
77 [ aBlock value: stream ]
88 ensure : [ stream close ]
Original file line number Diff line number Diff line change 1- SystemOrganization addCategory :' Grease-Squeak6-Core'
1+ self packageOrganizer ensurePackage :' Grease-Squeak6-Core' withTags: #() !
You can’t perform that action at this time.
0 commit comments