--- a/RunArray.st Wed Feb 22 17:32:09 2017 +0100
+++ b/RunArray.st Wed Feb 22 19:01:56 2017 +0100
@@ -935,7 +935,7 @@
an object similar to the receiver."
"/ what a kludge - Dolphin and Squeak mean: printOn: a stream;
- "/ ST/X (and some old ST80's) mean: draw-yourself on a GC.
+ "/ old ST80 means: draw-yourself on a GC.
(aGCOrStream isStream) ifTrue:[
aGCOrStream nextPutAll: '(RunArray new'.
contentsArray notNil ifTrue:[
@@ -965,6 +965,8 @@
RunArray new displayString
"
+
+ "Modified (comment): / 22-02-2017 / 16:49:50 / cg"
!
storeOn:aStream