From 9603ce3dc7ea8fc2110b8b2d2a690cde019fe82d Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Thu, 1 Nov 1990 01:22:07 +0000
Subject: [PATCH] Oops, forgot to remove some of the arguments from
 GENERATE-CALL-SEQUENCE now that they are no longer used.

---
 assembly/mips/support.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/assembly/mips/support.lisp b/assembly/mips/support.lisp
index 46985f73f..cbda9e1e2 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
-- 
GitLab