diff options
| author | colin <colin@cicadas.surf> | 2023-08-08 07:03:58 -0700 |
|---|---|---|
| committer | colin <colin@cicadas.surf> | 2023-08-08 07:03:58 -0700 |
| commit | 0f42ae0e6d61e344e10604bc9b82f033fcdb91c9 (patch) | |
| tree | 6e451c7b80da9c04889f8b67a6324a3be586ba78 /docgen.lisp | |
| parent | 2cdb3b48802d904fe5ed85235fcd5bb3d58be15a (diff) | |
Added more documentation gen; deflangauge no longer uses defvar
Diffstat (limited to 'docgen.lisp')
| -rw-r--r-- | docgen.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/docgen.lisp b/docgen.lisp index cb43edc..49b0d34 100644 --- a/docgen.lisp +++ b/docgen.lisp @@ -4,7 +4,7 @@ (defun write-rule-doc (lhs pattern) (format *standard-output* "~15s ::= " lhs) - (write-pattern-doc pattern )) + (write-pattern-doc pattern)) (defun write-sequence-doc (args ) (loop :for (a . more) :on args @@ -36,7 +36,7 @@ (defun write-grammar-pattern-doc (grammar-name) (princ "{") (princ grammar-name) (princ "}")) -(defun write-pattern-doc (pattern ) +(defun write-pattern-doc (pattern) (cond ((nonterminal? pattern) (princ pattern)) ((atom pattern) |