src/{builtin,final,frontent}.lisp: `clear-the-decks' makes builtin module.

[sod] / src / builtin.lisp

diff --git a/src/builtin.lisp b/src/builtin.lisp
index 696bcf6c646d37766d1fb9a5605ab120e7384a2b..5aad5f54f985fe1c2f97edfea7548cea25715484 100644 (file)
--- a/src/builtin.lisp
+++ b/src/builtin.lisp
@@ -332,4 +332,7 @@ (defun make-builtin-module ()
       (bootstrap-classes module))
     (setf *builtin-module* module)))
 
+(define-clear-the-decks builtin-module
+  (unless *builtin-module* (make-builtin-module)))
+
 ;;;----- That's all, folks --------------------------------------------------