0.7.4.30:

[sbcl.git] / src / code / cross-make-load-form.lisp

diff --git a/src/code/cross-make-load-form.lisp b/src/code/cross-make-load-form.lisp
index 7e26e75..22bde12 100644 (file)
--- a/src/code/cross-make-load-form.lisp
+++ b/src/code/cross-make-load-form.lisp
@@ -31,6 +31,9 @@
 ;;;
 ;;; Also, something along these lines can remove the special case in
 ;;; EMIT-MAKE-LOAD-FORM in src/compiler/main.lisp.
+
+(in-package "SB!INT")
+
 (defun sb!xc:make-load-form-saving-slots (object &rest args
                                          &key slot-names environment)
   (declare (ignore environment))