From 558d10384c42ef22e7f15e947b05159f4b002a24 Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Sat, 21 Mar 1992 21:44:12 +0000
Subject: [PATCH] typo

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

diff --git a/compiler/sparc/macros.lisp b/compiler/sparc/macros.lisp
index cd114027c..9613f6d30 100644
--- a/compiler/sparc/macros.lisp
+++ b/compiler/sparc/macros.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman (FAHLMAN@CMUC). 
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/macros.lisp,v 1.5 1992/03/11 21:29:11 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/macros.lisp,v 1.6 1992/03/21 21:44:12 wlott Exp $
 ;;;
 ;;; This file contains various useful macros for generating SPARC code.
 ;;;
@@ -433,4 +433,4 @@
     `(let ((,n-extra ,extra))
        (inst add alloc-tn 4)
        ,@forms
-       (inst taddcctv alloc-tn (- ,extra 4)))))
+       (inst taddcctv alloc-tn (- ,n-extra 4)))))
-- 
GitLab