From: Robert P. Goldman <rpgoldman@real-time.com> --- asdf.lisp | 7 ++++++- 1 files changed, 6 insertions(+), 1 deletions(-) diff --git a/asdf.lisp b/asdf.lisp index 6cca99b..4660260 100644 --- a/asdf.lisp +++ b/asdf.lisp @@ -588,7 +588,12 @@ and NIL NAME and TYPE components" (defun make-defined-systems-table () (make-hash-table :test 'equal)) -(defvar *defined-systems* (make-defined-systems-table)) +(defvar *defined-systems* (make-defined-systems-table) + "This is a hash table whose keys are strings, being the +names of the systems, and whose values are pairs, the first +element of which is a universal-time indicating when the +system definition was last updated, and the second element +of which is a system object.") (defun coerce-name (name) (typecase name -- 1.6.5.3