From: Stephen Adams <edu/mit/csail/zurich/adams>
Date: Tue, 26 Nov 1996 14:46:17 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: 20090517-FFI~5322
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=74b389ebf3502597473c7fa788b44dcc15f96c77;p=mit-scheme.git

*** empty log message ***
---

diff --git a/v8/src/microcode/cmpauxmd/hppa.m4 b/v8/src/microcode/cmpauxmd/hppa.m4
index 06c0efbf3..842591347 100644
--- a/v8/src/microcode/cmpauxmd/hppa.m4
+++ b/v8/src/microcode/cmpauxmd/hppa.m4
@@ -1,6 +1,6 @@
 changecom(`;');;; -*-Midas-*-
 ;;;
-;;;	$Id: hppa.m4,v 1.42 1996/11/18 21:19:35 adams Exp $
+;;;	$Id: hppa.m4,v 1.43 1996/11/26 14:46:17 adams Exp $
 ;;;
 ;;;	Copyright (c) 1989-1996 Massachusetts Institute of Technology
 ;;;
@@ -2036,8 +2036,14 @@ copy_closure_pattern
 	FDC	0(0,rs_free)
 	SYNC
 	FIC	0(spr5,gr25)
-	BE	4(spr5,gr31)
 	SYNC
+	NOP
+	NOP
+	NOP
+	NOP
+	NOP
+	BE	4(spr5,gr31)
+	NOP
 
 ;; On arrival, 31 has a return address and 1 contains the number of
 ;; entries in the closure.  The word at the return address has the