lib/keyword.c (kw_parseempty): Use correct variable scanning `kwval' list.

[sod] / src / module-proto.lisp

diff --git a/src/module-proto.lisp b/src/module-proto.lisp
index ca0d511..64dab86 100644 (file)
--- a/src/module-proto.lisp
+++ b/src/module-proto.lisp
@@ -151,7 +151,7 @@
 (export '(module module-name module-pset module-errors
          module-items module-files module-dependencies module-state))
 (defclass module ()
-  ((name :initarg :name :type pathname :reader module-name)
+  ((name :initarg :name :type (or pathname (eql :stdin)) :reader module-name)
    (%pset :initarg :pset :initform (make-pset)
          :type pset :reader module-pset)
    (errors :initarg :errors :initform 0 :type fixnum :reader module-errors)