--- a/UndefinedObject.st Tue Jan 22 11:11:10 2013 +0100
+++ b/UndefinedObject.st Tue Jan 22 14:08:06 2013 +0100
@@ -154,6 +154,8 @@
+
+
!UndefinedObject methodsFor:'converting'!
asBoolean
@@ -246,6 +248,7 @@
^ self notIndexed
! !
+
!UndefinedObject methodsFor:'printing & storing'!
printOn:aStream
@@ -356,6 +359,9 @@
"create a new class which has nil as superclass
- i.e. traps into #doesNotUnderstand: for all of its messages."
+ "this method allows fileIn of ST/V and V'Age classes
+ (which seem to have no category)"
+
^ self
subclass:nameSymbol
instanceVariableNames:instVarNameString
@@ -690,11 +696,12 @@
!UndefinedObject class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.72 2011-08-18 00:35:45 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.73 2013-01-22 13:08:06 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.72 2011-08-18 00:35:45 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.73 2013-01-22 13:08:06 cg Exp $'
! !
+
UndefinedObject initialize!