From 7c74dc337b200f257a726efa38811bd851135435 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Sun, 24 May 1992 15:57:52 +0000
Subject: [PATCH] Moved number-stack-displacement to parms, since it is used
 elsewhere.

---
 compiler/sparc/call.lisp | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/compiler/sparc/call.lisp b/compiler/sparc/call.lisp
index ea529cde6..957843254 100644
--- a/compiler/sparc/call.lisp
+++ b/compiler/sparc/call.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/call.lisp,v 1.17 1992/05/21 22:35:27 wlott Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/call.lisp,v 1.18 1992/05/24 15:57:52 ram Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -143,13 +143,6 @@
   (* (logandc2 (1+ (sb-allocated-size 'non-descriptor-stack)) 1)
      vm:word-bytes))
 
-;;; NUMBER-STACK-DISPLACEMENT
-;;;
-;;; The number of bytes reserved above the number stack pointer.  These
-;;; slots are required by architecture for a place to spill register windows.
-;;; 
-(defconstant number-stack-displacement
-  (* 16 vm:word-bytes))
 
 ;;; Used for setting up the Old-FP in local call.
 ;;;
-- 
GitLab