equal
deleted
inserted
replaced
21 aString ifNotNil: [ comment := (aString collect: #asciiValue) asByteArray asString ]. |
21 aString ifNotNil: [ comment := (aString collect: #asciiValue) asByteArray asString ]. |
22 aString ifNil: [ comment := '' ] |
22 aString ifNil: [ comment := '' ] |
23 ! |
23 ! |
24 |
24 |
25 printOn: aStream |
25 printOn: aStream |
26 .^ aStream |
26 ^ aStream |
27 nextPutAll: 'EndOfLineComment value ==> '; |
27 nextPutAll: 'EndOfLineComment value ==> '; |
28 nextPutAll: self comment. |
28 nextPutAll: self comment. |
29 |
29 |
30 ! ! |
30 ! ! |
31 |
31 |