diff --git a/assembly/mips/support.lisp b/assembly/mips/support.lisp index 46985f73f190833b85a446059604c31ba117c3b3..cbda9e1e23198cbf45ec40b55d3037534d344a6f 100644 --- a/assembly/mips/support.lisp +++ b/assembly/mips/support.lisp @@ -7,14 +7,14 @@ ;;; Scott Fahlman (FAHLMAN@CMUC). ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/assembly/mips/support.lisp,v 1.2 1990/11/01 01:16:55 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/assembly/mips/support.lisp,v 1.3 1990/11/01 01:22:07 wlott Exp $ ;;; ;;; This file contains the machine specific support routines needed by ;;; the file assembler. ;;; (in-package "C") -(defun generate-call-sequence (name style vop temp nfp-save lra) +(defun generate-call-sequence (name style vop) (ecase style (:raw (values