X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/c2438e62e7c3cf1b7006522cef61e8c6f797600b..e417fab55d827640e10b832b85978847a1bfe5d5:/src/builtin.lisp?ds=inline

diff --git a/src/builtin.lisp b/src/builtin.lisp
index 696bcf6..5aad5f5 100644
--- a/src/builtin.lisp
+++ b/src/builtin.lisp
@@ -332,4 +332,7 @@ static const SodClass *const ~A__cpl[] = {
       (bootstrap-classes module))
     (setf *builtin-module* module)))
 
+(define-clear-the-decks builtin-module
+  (unless *builtin-module* (make-builtin-module)))
+
 ;;;----- That's all, folks --------------------------------------------------