X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/e05aabbb81cddec46b3d9da802f632c3b20c67d1..15ad30aaab6e48abcae0f1ecd1e2073cc1827b50:/src/module-proto.lisp

diff --git a/src/module-proto.lisp b/src/module-proto.lisp
index ca0d511..64dab86 100644
--- 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)