ByteArray.st
changeset 835 8bd6f4aa8130
parent 834 c68ed1088b42
child 930 dd2ba4051d6a
--- a/ByteArray.st	Thu Jan 04 18:02:20 1996 +0100
+++ b/ByteArray.st	Fri Jan 05 13:33:18 1996 +0100
@@ -138,8 +138,8 @@
 		 * the most common case
 		 */
 		instsize = OHDR_SIZE + nindexedinstvars;
-		if (_CanDoQuickNew(instsize)) {
-		    _qCheckedNew(newobj, instsize);
+		if (__CanDoQuickNew(instsize)) {
+		    __qCheckedNew(newobj, instsize);
 		    _InstPtr(newobj)->o_class = self;
 		    RETURN (newobj );
 		}
@@ -147,7 +147,7 @@
 	    nInstVars = _intVal(_ClassInstPtr(self)->c_ninstvars);
 	    instsize = OHDR_SIZE + __OBJS2BYTES__(nInstVars) + nindexedinstvars;
 	    __PROTECT_CONTEXT__
-	    _qNew(newobj, instsize, SENDER);
+	    __qNew(newobj, instsize, SENDER);
 	    __UNPROTECT_CONTEXT__
 	    if (newobj != nil) {
 		_InstPtr(newobj)->o_class = self;
@@ -1170,7 +1170,7 @@
 		count = index2 - index1 + 1;
 		__PROTECT_CONTEXT__
 		sz = OHDR_SIZE + count;
-		_qNew(newByteArray, sz, SENDER);
+		__qNew(newByteArray, sz, SENDER);
 		__UNPROTECT_CONTEXT__
 		if (newByteArray != nil) {
 		    _InstPtr(newByteArray)->o_class = ByteArray;
@@ -2008,5 +2008,5 @@
 !ByteArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.42 1996-01-04 17:02:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.43 1996-01-05 12:33:08 cg Exp $'
 ! !