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