ByteArray.st
changeset 1384 ab9536f4f998
parent 1335 2de29ef6d91e
child 1456 a544a722ec32
--- a/ByteArray.st	Sun May 12 17:54:09 1996 +0200
+++ b/ByteArray.st	Sun May 12 18:16:39 1996 +0200
@@ -241,8 +241,8 @@
 	indx = __intVal(index) - 1;
 	slf = self;
 	if ((cls = __qClass(slf)) != @global(ByteArray)) {
-	    if (((INT)__ClassInstPtr(cls)->c_flags & _MASKSMALLINT(ARRAYMASK))
-		!= _MASKSMALLINT(BYTEARRAY)) {
+	    if (((INT)__ClassInstPtr(cls)->c_flags & __MASKSMALLINT(ARRAYMASK))
+		!= __MASKSMALLINT(BYTEARRAY)) {
 		goto fail;
 	    }
 	    indx += __OBJS2BYTES__(__intVal(__ClassInstPtr(cls)->c_ninstvars));
@@ -277,8 +277,8 @@
             indx = __intVal(index) - 1;
             slf = self;
             if ((cls = __qClass(slf)) != @global(ByteArray)) {
-                if (((INT)__ClassInstPtr(cls)->c_flags & _MASKSMALLINT(ARRAYMASK))
-                    != _MASKSMALLINT(BYTEARRAY)) {
+                if (((INT)__ClassInstPtr(cls)->c_flags & __MASKSMALLINT(ARRAYMASK))
+                    != __MASKSMALLINT(BYTEARRAY)) {
                     goto fail;
                 }
                 indx += __OBJS2BYTES__(__intVal(__ClassInstPtr(cls)->c_ninstvars));
@@ -2176,5 +2176,5 @@
 !ByteArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.60 1996-05-07 06:33:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.61 1996-05-12 16:16:39 cg Exp $'
 ! !