Nicolas Cellier uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-nice.579.mcz==================== Summary ====================
Name: Collections-nice.579
Author: nice
Time: 28 July 2014, 10:32:31.105 pm
UUID: ef7ba0ca-4d01-4aac-9236-a968a13d7eae
Ancestors: Collections-eem.578
Implement #peekLast in RWBinaryOrTextStream because it has to care whether isBinary or not.
=============== Diff against Collections-eem.578 ===============
Item was added:
+ ----- Method: RWBinaryOrTextStream>>peekLast (in category 'accessing') -----
+ peekLast
+ "Return that item just put at the end of the stream"
+
+ ^ position > 0
+ ifTrue: [self isBinary
+ ifTrue: [(collection at: position) asCharacter]
+ ifFalse: [(collection at: position) asInteger]]
+ ifFalse: [nil]!