diff --git a/src/code/x86-vm.lisp b/src/code/x86-vm.lisp index 961dacbb02d1e8aedaa3b32454c662c19aaefc63..6b7c8816ffc9052d9dd93ac2d2f3cf9e7cbabba0 100644 --- a/src/code/x86-vm.lisp +++ b/src/code/x86-vm.lisp @@ -26,10 +26,12 @@ (intl:textdomain "cmucl-x86-vm") +(eval-when (:compile-toplevel :load-toplevel :execute) (export '(fixup-code-object internal-error-arguments sigcontext-program-counter sigcontext-register sigcontext-float-register sigcontext-floating-point-modes extern-alien-name sanctify-for-execution)) +) #+complex-fp-vops (sys:register-lisp-feature :complex-fp-vops)