X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/e0808c472145fc81e52898bc9ac289e10c4f4f41..7aa55c1174f170016d970a3f5e86d5115f02611c:/src/module-proto.lisp diff --git a/src/module-proto.lisp b/src/module-proto.lisp index a79069a..7e42a5b 100644 --- a/src/module-proto.lisp +++ b/src/module-proto.lisp @@ -148,11 +148,13 @@ (defgeneric finalize-module (module) ;;;-------------------------------------------------------------------------- ;;; Module objects. -(export '(module module-name module-pset module-items module-dependencies)) +(export '(module module-name module-pset module-errors + module-items module-dependencies)) (defclass module () ((name :initarg :name :type pathname :reader module-name) (%pset :initarg :pset :initform (make-pset) :type pset :reader module-pset) + (errors :initarg :errors :initform 0 :type fixnum :reader module-errors) (items :initarg :items :initform nil :type list :accessor module-items) (dependencies :initarg :dependencies :initform nil :type list :accessor module-dependencies)