From: bal <none@none>
Date: Wed, 23 Jan 1985 16:23:15 +0000 (+0000)
Subject: Interface of tmplocal() changed: second parameter is a long now
X-Git-Tag: release-5-5~5718
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=d32d4e6ba0d2eaca025d3b181ebb8309220fb9b5;p=ack.git

Interface of tmplocal() changed: second parameter is a long now
---

diff --git a/util/ego/share/aux.c b/util/ego/share/aux.c
index d753ef5db..2e4c8b361 100644
--- a/util/ego/share/aux.c
+++ b/util/ego/share/aux.c
@@ -49,11 +49,11 @@ offset aoff(ap,n)
 
 offset tmplocal(p,size)
 	proc_p p;
-	int    size;
+	offset   size;
 {
 	/* Allocate a new local variable in the stack frame of p */
 
-	p->p_localbytes += (offset) size;
+	p->p_localbytes +=  size;
 	return -(p->p_localbytes);
 }
 
diff --git a/util/ego/share/aux.h b/util/ego/share/aux.h
index 451aa3966..6a5243abb 100644
--- a/util/ego/share/aux.h
+++ b/util/ego/share/aux.h
@@ -14,7 +14,7 @@ extern	offset aoff();		/* (arg_p list; int n)
 				 * n'th argument in the list (this argument
 				 * must have type ARGOFF). Start counting at 0.
 				 */
-extern	offset tmplocal();	/* (proc_p p, int size)
+extern	offset tmplocal();	/* (proc_p p, offset size)
 				 * Allocate a new local variable in the
 				 * stack frame of p.
 				 */
diff --git a/util/ego/sr/sr_reduce.c b/util/ego/sr/sr_reduce.c
index 42ca2eee3..35aec7654 100644
--- a/util/ego/sr/sr_reduce.c
+++ b/util/ego/sr/sr_reduce.c
@@ -431,7 +431,7 @@ STATIC reduce(code,vars)
 	} else {
 		make_header(code->co_loop);
 		/* make sure there's a header block */
-		tmp = tmplocal(curproc,code->co_tmpsize);
+		tmp = tmplocal(curproc,(offset) code->co_tmpsize);
 		code->co_temp = tmp;
 		/* create a new local variable in the stack frame
 		 * of current proc.