From 2357df8934e585ff4d0ccf1be4f8e7b1c4e84c76 Mon Sep 17 00:00:00 2001
From: toy <toy>
Date: Tue, 4 Dec 2001 22:25:02 +0000
Subject: [PATCH] This causes problems when building on x86, so arrange it
 better for sparc only.  Problem and solution from Eric Marsden.

---
 bootfiles/18c/boot6.lisp | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/bootfiles/18c/boot6.lisp b/bootfiles/18c/boot6.lisp
index d95d21221..8e6d19844 100644
--- a/bootfiles/18c/boot6.lisp
+++ b/bootfiles/18c/boot6.lisp
@@ -1,10 +1,8 @@
 ;; Bootstrap the pseudo-atomic trap genesis change to put
 ;; trap_PseudoAtomic into internals.h.
 #+sparc
-(load "target:code/exports.lisp")
-
-(in-package :sparc)
-
-#+sparc
-(defconstant pseudo-atomic-trap 16)
+(progn
+  (load "target:code/exports.lisp")
+  (in-package :sparc)
+  (defconstant pseudo-atomic-trap 16))
 
-- 
GitLab