From 90bdefd5b7b6238678d67f3b16781edb9111d7d2 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Wed, 14 Nov 1990 17:33:51 +0000
Subject: [PATCH] Removed #+nil on the CONSTANT case for loading ARG-FUN in
 DEFINE-FULL-CALL. This really can happen when we compile a full call to a
 local function for some reason (arg count error, etc.)

---
 compiler/mips/call.lisp | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/compiler/mips/call.lisp b/compiler/mips/call.lisp
index 25f93ba2d..0b0ffca4e 100644
--- a/compiler/mips/call.lisp
+++ b/compiler/mips/call.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman (FAHLMAN@CMUC). 
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/call.lisp,v 1.33 1990/11/03 03:23:04 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/call.lisp,v 1.34 1990/11/14 17:33:51 ram Exp $
 ;;;
 ;;;    This file contains the VM definition of function call for the MIPS.
 ;;;
@@ -797,7 +797,6 @@ default-value-8
 		      (inst lw lexenv fp-tn
 			    (ash (tn-offset arg-fun) vm:word-shift))
 		      (do-next-filler))
-		     #+nil
 		     (constant
 		      (inst lw lexenv code-tn
 			    (- (ash (tn-offset arg-fun) vm:word-shift)
-- 
GitLab