UndefinedObject.st
changeset 6068 1d5ca1175f3f
parent 5796 6f5c56b1aca4
child 6069 9aff12a37f5e
--- a/UndefinedObject.st	Tue Oct 02 16:35:22 2001 +0200
+++ b/UndefinedObject.st	Tue Oct 02 17:22:46 2001 +0200
@@ -617,6 +617,12 @@
     ^ true
 !
 
+isNilOrEmptyCollection
+    "return true if I am nil or an empty collection - since I am nil, return true"
+
+    ^ true
+!
+
 notNil
     "return true if I am not nil - since I am nil, return false.
      Notice:
@@ -639,6 +645,6 @@
 !UndefinedObject class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.49 2001-01-29 13:55:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.50 2001-10-02 15:22:43 cg Exp $'
 ! !
 UndefinedObject initialize!