ByteArray.st
changeset 834 c68ed1088b42
parent 829 fc386319f41c
child 835 8bd6f4aa8130
--- a/ByteArray.st	Thu Jan 04 12:12:03 1996 +0100
+++ b/ByteArray.st	Thu Jan 04 18:02:20 1996 +0100
@@ -146,9 +146,9 @@
 	    }
 	    nInstVars = _intVal(_ClassInstPtr(self)->c_ninstvars);
 	    instsize = OHDR_SIZE + __OBJS2BYTES__(nInstVars) + nindexedinstvars;
-	    PROTECT_CONTEXT
+	    __PROTECT_CONTEXT__
 	    _qNew(newobj, instsize, SENDER);
-	    UNPROTECT_CONTEXT
+	    __UNPROTECT_CONTEXT__
 	    if (newobj != nil) {
 		_InstPtr(newobj)->o_class = self;
 		__qSTORE(newobj, self);
@@ -1168,10 +1168,10 @@
 	if ((index1 <= index2) && (index1 > 0)) {
 	    if (index2 <= len) {
 		count = index2 - index1 + 1;
-		PROTECT_CONTEXT
+		__PROTECT_CONTEXT__
 		sz = OHDR_SIZE + count;
 		_qNew(newByteArray, sz, SENDER);
-		UNPROTECT_CONTEXT
+		__UNPROTECT_CONTEXT__
 		if (newByteArray != nil) {
 		    _InstPtr(newByteArray)->o_class = ByteArray;
 		    dstp = _ByteArrayInstPtr(newByteArray)->ba_element;
@@ -2008,5 +2008,5 @@
 !ByteArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.41 1996-01-04 01:22:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.42 1996-01-04 17:02:16 cg Exp $'
 ! !