--- a/Array.st Wed Sep 01 22:01:33 1999 +0200
+++ b/Array.st Wed Sep 01 22:03:44 1999 +0200
@@ -1694,7 +1694,7 @@
!
isLiteral
- "return true, if the receiver can be used as a literal
+ "return true, if the receiver can be used as a literal constant in ST syntax
(i.e. can be used in constant arrays)"
"/ no, simply returning true here is a mistake:
@@ -1708,7 +1708,7 @@
"/
thisContext isRecursive ifTrue:[^ false].
self do:[:element |
- element isLiteral ifFalse:[^ false]
+ element isLiteral ifFalse:[^ false]
].
^ true
@@ -2384,5 +2384,5 @@
!Array class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.118 1999-07-31 12:45:01 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.119 1999-09-01 20:02:30 cg Exp $'
! !