SmallInteger.st
changeset 325 46bca6125b93
parent 324 290cfb34ec93
child 329 f14fc5ac11b7
--- a/SmallInteger.st	Fri Mar 31 04:52:25 1995 +0200
+++ b/SmallInteger.st	Sun Apr 02 13:07:58 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1988 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.26 1995-03-31 02:52:18 claus Exp $
+$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.27 1995-04-02 11:07:53 claus Exp $
 '!
 
 !SmallInteger class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.26 1995-03-31 02:52:18 claus Exp $
+$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.27 1995-04-02 11:07:53 claus Exp $
 "
 !
 
@@ -1427,7 +1427,7 @@
 	     */
 	    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
 		 */
@@ -1510,7 +1510,7 @@
 	    home = _BlockInstPtr(aBlock)->b_home;
 	    rHome = home;
 	    if (step < 0) {
-		if ((rHome == nil) || (_qSpace(rHome) >= STACKSPACE)) {
+		if ((rHome == nil) || (__qSpace(rHome) >= STACKSPACE)) {
 		    /*
 		     * home is on stack - will not move
 		     */
@@ -1527,7 +1527,7 @@
 		    }
 		}
 	    } else {
-		if ((rHome == nil) || (_qSpace(rHome) >= STACKSPACE)) {
+		if ((rHome == nil) || (__qSpace(rHome) >= STACKSPACE)) {
 		    /*
 		     * home is on stack - will not move
 		     */