Text <-> StringCollection
authorclaus
Sat, 11 Feb 1995 15:10:16 +0100
changeset 53 7db773565e01
parent 52 dd11c2abdac5
child 54 56f86b58edb0
Text <-> StringCollection
StrColl.st
VarString.st
VariableString.st
--- a/StrColl.st	Wed Feb 08 04:16:39 1995 +0100
+++ b/StrColl.st	Sat Feb 11 15:10:16 1995 +0100
@@ -10,21 +10,21 @@
  hereby transferred.
 "
 
-VariableArray subclass:#Text
+VariableArray subclass:#StringCollection
        instanceVariableNames:''
        classVariableNames:''
        poolDictionaries:''
        category:'Collections-Text'
 !
 
-Text comment:'
+StringCollection comment:'
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic2/Attic/StrColl.st,v 1.11 1995-02-05 23:38:42 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/Attic/StrColl.st,v 1.12 1995-02-11 14:10:11 claus Exp $
 '!
 
-!Text class methodsFor:'documentation'!
+!StringCollection class methodsFor:'documentation'!
 
 copyright
 "
@@ -42,27 +42,27 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic2/Attic/StrColl.st,v 1.11 1995-02-05 23:38:42 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/Attic/StrColl.st,v 1.12 1995-02-11 14:10:11 claus Exp $
 "
 !
 
 documentation
 "
-    Text is an array of lines which are strings.
+    StringCollection is an array of lines which are strings.
     WARNING:
 	This class is temporary (a historic leftover) - it may change or
 	even vanish in the future. Use OrderedCollections or other standard
 	classes to represent collections of strings.
 
-    Also, Text is a very bad name - there is something totally different 
-    also named Text in ST-80 ...
+    Also, StringCollection is a very bad name - there is something totally different 
+    also named StringCollection in ST-80 ...
 
     So, even if kept, it will be definitely be renamed to something like
     StringCollection in one of the next versions.
 "
 ! !
 
-!Text class methodsFor:'instance creation'!
+!StringCollection class methodsFor:'instance creation'!
 
 from:aString
     "return a new text object with lines taken from the argument, aString"
@@ -74,18 +74,18 @@
     "return a new text object with lines taken from the argument, an array
      of strings"
 
-    |newText
+    |newStringCollection
      size "{ Class: SmallInteger }" |
 
     size := anArray size.
-    newText := self new:size.
+    newStringCollection := self new:size.
     1 to:size do:[:line |
-	newText at:line put:(anArray at:line)
+	newStringCollection at:line put:(anArray at:line)
     ].
-    ^ newText
+    ^ newStringCollection
 ! !
 
-!Text methodsFor:'growing'!
+!StringCollection methodsFor:'growing'!
 
 grow:newSize
     "grow to newsize - new elements are initialized with empty strings -
@@ -112,7 +112,7 @@
     contentsArray at:tally put:aString
 ! !
 
-!Text methodsFor:'converting'!
+!StringCollection methodsFor:'converting'!
 
 asString
     "return myself as a string with embedded cr's"
@@ -236,17 +236,17 @@
     ]
 !
 
-asText
+asStringCollection
     ^ self
 ! !
 
-!Text methodsFor:'printing'!
+!StringCollection methodsFor:'printing'!
 
 printString
     ^ self asString
 ! !
 
-!Text methodsFor:'searching'!
+!StringCollection methodsFor:'searching'!
 
 indexOfLineStartingWith:aString
     "return the index of the first line starting with the argument, aString"
--- a/VarString.st	Wed Feb 08 04:16:39 1995 +0100
+++ b/VarString.st	Sat Feb 11 15:10:16 1995 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1990 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic2/Attic/VarString.st,v 1.9 1994-10-10 00:52:52 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/Attic/VarString.st,v 1.10 1995-02-11 14:10:16 claus Exp $
 '!
 
 !VariableString class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic2/Attic/VarString.st,v 1.9 1994-10-10 00:52:52 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/Attic/VarString.st,v 1.10 1995-02-11 14:10:16 claus Exp $
 "
 !
 
@@ -137,8 +137,8 @@
 
 !VariableString methodsFor:'converting'!
 
-asText
-    ^ contents asText
+asStringCollection
+    ^ contents asStringCollection
 ! !
 
 !VariableString methodsFor:'copying'!
--- a/VariableString.st	Wed Feb 08 04:16:39 1995 +0100
+++ b/VariableString.st	Sat Feb 11 15:10:16 1995 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1990 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic2/VariableString.st,v 1.9 1994-10-10 00:52:52 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/VariableString.st,v 1.10 1995-02-11 14:10:16 claus Exp $
 '!
 
 !VariableString class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic2/VariableString.st,v 1.9 1994-10-10 00:52:52 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/VariableString.st,v 1.10 1995-02-11 14:10:16 claus Exp $
 "
 !
 
@@ -137,8 +137,8 @@
 
 !VariableString methodsFor:'converting'!
 
-asText
-    ^ contents asText
+asStringCollection
+    ^ contents asStringCollection
 ! !
 
 !VariableString methodsFor:'copying'!