From 379bd0c7af3805f1da3d1ed21b79dddc3b18f51e Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Tue, 27 Nov 1990 09:08:51 +0000
Subject: [PATCH] Oops, left several two-arg-mumbles in the exported static
 symbols.

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

diff --git a/compiler/mips/parms.lisp b/compiler/mips/parms.lisp
index f606e2ba5..669a42647 100644
--- a/compiler/mips/parms.lisp
+++ b/compiler/mips/parms.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman (FAHLMAN@CMUC). 
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/parms.lisp,v 1.83 1990/11/26 19:16:07 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/parms.lisp,v 1.84 1990/11/27 09:08:51 wlott Exp $
 ;;;
 ;;;    This file contains some parameterizations of various VM
 ;;; attributes for the MIPS.  This file is separate from other stuff so 
@@ -160,7 +160,7 @@
     ))
 
 (defparameter exported-static-symbols
-  (subseq static-symbols 0 (position 'length static-symbols)))
+  (subseq static-symbols 0 (position 'two-arg-+ static-symbols)))
 
 
 
-- 
GitLab