~mdw
/
sod
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
src/lexer-proto.lisp: New parser `must'.
[sod]
/
src
/
module-impl.lisp
diff --git
a/src/module-impl.lisp
b/src/module-impl.lisp
index
3ca4411
..
2626726
100644
(file)
--- a/
src/module-impl.lisp
+++ b/
src/module-impl.lisp
@@
-56,8
+56,10
@@
;;;--------------------------------------------------------------------------
;;; Module objects.
;;;--------------------------------------------------------------------------
;;; Module objects.
-(def
parameter *module-map* (make-hash-table :test #'equal)
+(def
var-unbound *module-map*
"Hash table mapping true names to module objects.")
"Hash table mapping true names to module objects.")
+(define-clear-the-decks reset-module-map
+ (setf *module-map* (make-hash-table :test #'equal)))
(defun build-module
(name thunk &key (truename (probe-file name)) location)
(defun build-module
(name thunk &key (truename (probe-file name)) location)