X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/180bfa7ca8efeb1297a0bc3f0ff55b02b4e40f9b..67d1c5d2aeeac93be33f9e49671741944ecf1968:/src/final.lisp

diff --git a/src/final.lisp b/src/final.lisp
index 12b6294..fe07cc8 100644
--- a/src/final.lisp
+++ b/src/final.lisp
@@ -26,6 +26,13 @@
 (cl:in-package #:sod)
 
 ;;;--------------------------------------------------------------------------
+;;; Miscellaneous details.
+
+(export '*sod-version*)
+(defparameter *sod-version* sod-sysdef:*version*
+  "The version of the SOD translator system, as a string.")
+
+;;;--------------------------------------------------------------------------
 ;;; Debugging utilities.
 
 (export '*debugout-pathname*)
@@ -35,7 +42,6 @@
 (defun test-module (path reason)
   "Reset the translator's state, read a module from PATH and output it with
    REASON, returning the result as a string."
-  (unless *builtin-module* (make-builtin-module))
   (clear-the-decks)
   (setf *module-map* (make-hash-table :test #'equal))
   (with-open-file (out *debugout-pathname*