--- a/Symbol.st Mon Mar 06 09:59:16 2006 +0100
+++ b/Symbol.st Mon Mar 06 09:59:24 2006 +0100
@@ -434,14 +434,14 @@
!
asSymbol
- "return the receiver as a symbol.
+ "Return a unique symbol with the name taken from the receivers characters.
Since I am a symbol - just return myself"
^ self
!
asSymbolIfInterned
- "return the receiver as a symbol if there is one.
+ "If a symbol with the receivers characters is already known, return it. Otherwise, return nil.
Since I am a symbol - just return myself"
^ self
@@ -734,5 +734,5 @@
!Symbol class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Symbol.st,v 1.80 2005-07-08 17:15:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Symbol.st,v 1.81 2006-03-06 08:59:24 cg Exp $'
! !