From: Stephen Adams <edu/mit/csail/zurich/adams>
Date: Tue, 15 Aug 1995 00:12:17 +0000 (+0000)
Subject: Undoen previous `fix'.
X-Git-Tag: 20090517-FFI~6037
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=d4080e2fd164181469954bdb09beb8a765ea6421;p=mit-scheme.git

Undoen previous `fix'.
The problem was in hppa.m4.
---

diff --git a/v8/src/compiler/machines/spectrum/rulflo.scm b/v8/src/compiler/machines/spectrum/rulflo.scm
index c42f4c80d..a28b5560a 100644
--- a/v8/src/compiler/machines/spectrum/rulflo.scm
+++ b/v8/src/compiler/machines/spectrum/rulflo.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: rulflo.scm,v 1.3 1995/08/14 21:54:09 adams Exp $
+$Id: rulflo.scm,v 1.4 1995/08/15 00:12:17 adams Exp $
 
 Copyright (c) 1989-1994 Massachusetts Institute of Technology
 
@@ -446,7 +446,7 @@ MIT in each case. |#
    fp4 fp5 fp6 fp7 fp8 fp9 fp10 fp11))
 
 (define registers-to-preserve-around-special-calls
-  (append (list g2 g14 g15 g16 g17)
+  (append (list g14 g15 g16 g17)
 	  caller-saves-registers))
 
 (define (flonum/1-arg/special hook target source)