Skip to content
Snippets Groups Projects
Commit 2028c675 authored by ram's avatar ram
Browse files

Moved NUMBER-STACK-DISPLACEMENT here from call, since it is used more than one

place.
parent 8dbaed74
No related branches found
No related tags found
No related merge requests found
......@@ -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/parms.lisp,v 1.16 1992/05/21 22:53:33 wlott Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/parms.lisp,v 1.17 1992/05/24 15:57:20 ram Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -122,6 +122,14 @@
); eval-when
;;; 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))
;;;; Description of the target address space.
......@@ -165,7 +173,6 @@
function-prologue
function-epilogue)
;;;; Static symbols.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment