diff options
-rw-r--r-- | scheme/plt/geiser/autodoc.ss | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/scheme/plt/geiser/autodoc.ss b/scheme/plt/geiser/autodoc.ss index 65e095f..7e64c89 100644 --- a/scheme/plt/geiser/autodoc.ss +++ b/scheme/plt/geiser/autodoc.ss @@ -80,6 +80,8 @@ (match datum (`(module ,name ,lang (#%module-begin . ,forms)) (for-each (lambda (f) (parse-datum! f store)) forms)) + (`(module ,name ,lang . ,forms) + (for-each (lambda (f) (parse-datum! f store)) forms)) (`(define ((,name . ,formals) . ,_) . ,_) (add-signature! name formals store)) (`(define (,name . ,formals) . ,_) |