5 lines
158 B
Smalltalk
5 lines
158 B
Smalltalk
|
accessing
|
||
|
|
printOn: aStream
|
||
|
|
super printOn: aStream.
|
||
|
|
aStream
|
||
|
|
nextPutAll: '( size: ', self data size asString, ' | next token: ', self nextTokenPreview, ' )'
|