--- a/UndefinedObject.st Mon Mar 06 21:58:35 2006 +0100
+++ b/UndefinedObject.st Wed Mar 08 19:25:46 2006 +0100
@@ -357,6 +357,18 @@
"Modified: / 18.3.1999 / 18:29:58 / stefan"
!
+subclass:nameSymbol instanceVariableNames:instVarNameString classVariableNames:classVarString poolDictionaries:pool
+ "create a new class which has nil as superclass
+ - i.e. traps into #doesNotUnderstand: for all of its messages."
+
+ ^ self
+ subclass:nameSymbol
+ instanceVariableNames:instVarNameString
+ classVariableNames:classVarString
+ poolDictionaries:pool
+ category:(Class defaultCategoryForSTVorVAGEClasses).
+!
+
subclass:nameSymbol instanceVariableNames:instVarNameString classVariableNames:classVarString poolDictionaries:pool category:cat
"create a new class which has nil as superclass
- i.e. traps into #doesNotUnderstand: for all of its messages."
@@ -683,7 +695,7 @@
!UndefinedObject class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.63 2006-03-06 08:57:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.64 2006-03-08 18:25:46 cg Exp $'
! !
UndefinedObject initialize!