--- a/String.st Fri Jul 08 22:30:32 2005 +0200
+++ b/String.st Fri Jul 08 22:42:36 2005 +0200
@@ -2989,7 +2989,7 @@
if ((cls = __qClass(self)) != String) {
cp += __OBJS2BYTES__(__intVal(__ClassInstPtr(cls)->c_ninstvars));
}
- while ((cp+4) < last) {
+ while ((cp+4) <= last) {
if (*(int *)cp & 0x80808080) {
RETURN ( true );
}
@@ -3412,5 +3412,5 @@
!String class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.216 2005-07-08 20:30:32 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.217 2005-07-08 20:42:36 cg Exp $'
! !