RunArray.st
changeset 1551 d590a6103055
parent 1451 2b4bb1522872
child 1752 54a31cc3fc2f
--- a/RunArray.st	Tue Apr 19 12:01:30 2005 +0200
+++ b/RunArray.st	Wed Apr 20 11:13:33 2005 +0200
@@ -1272,7 +1272,7 @@
 isEmpty
     "Am I empty or not. Returns a boolean"
 
-    ^ contentsArray notNil
+    ^ contentsArray size == 0
 
     "Modified: 11.5.1996 / 13:35:17 / cg"
 ! !
@@ -1291,5 +1291,5 @@
 !RunArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/RunArray.st,v 1.22 2004-05-13 18:57:02 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/RunArray.st,v 1.23 2005-04-20 09:13:33 cg Exp $'
 ! !