Array.st
changeset 325 46bca6125b93
parent 302 1f76060d58a4
child 328 7b542c0bf1dd
--- a/Array.st	Fri Mar 31 04:52:25 1995 +0200
+++ b/Array.st	Sun Apr 02 13:07:58 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/Array.st,v 1.22 1995-03-08 23:36:43 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Array.st,v 1.23 1995-04-02 11:05:39 claus Exp $
 '!
 
 !Array class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Array.st,v 1.22 1995-03-08 23:36:43 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Array.st,v 1.23 1995-04-02 11:05:39 claus Exp $
 "
 !
 
@@ -314,7 +314,7 @@
 	    /* sorry: must take care of stores ... */
 	    srcP = _ArrayInstPtr(self)->a_element;
 	    dstP = _ArrayInstPtr(nObj)->a_element;
-	    spc = _qSpace(nObj);
+	    spc = __qSpace(nObj);
 	    while (nIndex--) {
 		element = *srcP++;
 		*dstP++ = element;
@@ -434,7 +434,7 @@
 			} else {
 			    REGISTER int spc;
 
-			    spc = _qSpace(self);
+			    spc = __qSpace(self);
 			    while (count-- > 0) {
 				t = *src++;
 				*dst++ = t;
@@ -670,7 +670,7 @@
 #else
 	home = _BlockInstPtr(aBlock)->b_home;
 	rHome = home;
-	if ((rHome == nil) || (_qSpace(rHome) >= STACKSPACE)) {
+	if ((rHome == nil) || (__qSpace(rHome) >= STACKSPACE)) {
 	    /*
 	     * home will not move - keep in a fast register
 	     */
@@ -731,7 +731,7 @@
 #else
 	home = _BlockInstPtr(aBlock)->b_home;
 	rHome = home;
-	if ((rHome == nil) || (_qSpace(rHome) >= STACKSPACE)) {
+	if ((rHome == nil) || (__qSpace(rHome) >= STACKSPACE)) {
 	    /*
 	     * home will not move - keep in a fast register
 	     */
@@ -849,7 +849,7 @@
 #else
 		    home = _BlockInstPtr(aBlock)->b_home;
 		    rHome = home;
-		    if ((rHome == nil) || (_qSpace(rHome) >= STACKSPACE)) {
+		    if ((rHome == nil) || (__qSpace(rHome) >= STACKSPACE)) {
 			for (index=indexLow; index <= indexHigh; index++) {
 			    if (InterruptPending != nil) interruptL(__LINE__ COMMA_CON);
 			    (*codeVal)(rHome, CON_COMMA  _InstPtr(self)->i_instvars[index]);
@@ -918,7 +918,7 @@
 #else
 		    home = _BlockInstPtr(aBlock)->b_home;
 		    rHome = home;
-		    if ((rHome == nil) || (_qSpace(rHome) >= STACKSPACE)) {
+		    if ((rHome == nil) || (__qSpace(rHome) >= STACKSPACE)) {
 			for (index=indexHigh; index >= indexLow; index--) {
 			    if (InterruptPending != nil) interruptL(__LINE__ COMMA_CON);
 			    (*codeVal)(rHome, CON_COMMA  _InstPtr(self)->i_instvars[index]);
@@ -977,7 +977,7 @@
 #else
 	home = _BlockInstPtr(aBlock)->b_home;
         rHome = home;
-        if ((rHome == nil) || (_qSpace(rHome) >= STACKSPACE)) {
+        if ((rHome == nil) || (__qSpace(rHome) >= STACKSPACE)) {
             /*
              * home will not move - keep in in a register
              */