diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2016-04-26 07:26:43 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2016-04-26 07:26:43 -0700 |
commit | 7d0f84199ff2b5662f171135cc1f271f5a8b7ec1 (patch) | |
tree | 44081c43fe7e264b8ae204daedff6ba39b904ff0 /checkman.txr | |
parent | 5c9c19fd5e3dc428369f4a84d335c7a8e0bbc560 (diff) | |
download | txr-7d0f84199ff2b5662f171135cc1f271f5a8b7ec1.tar.gz txr-7d0f84199ff2b5662f171135cc1f271f5a8b7ec1.tar.bz2 txr-7d0f84199ff2b5662f171135cc1f271f5a8b7ec1.zip |
Change .meta to single-argument.
* checkman.txr: Check .meta similarly to .code.
* txr.1: Change .meta macro to take only one argument,
so that text with spaces must be quoted.
Errors found and fixed.
Diffstat (limited to 'checkman.txr')
-rw-r--r-- | checkman.txr | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/checkman.txr b/checkman.txr index a9c18835..e9c49348 100644 --- a/checkman.txr +++ b/checkman.txr @@ -63,9 +63,9 @@ @;; @(define check-code ()) @ (cases) -.code "@(assert bad ln `.code needs one argument`)@x"@(eol) +.@{type /code|meta/} "@(assert bad ln `.@type needs one argument`)@x"@(eol) @ (or) -.code @(assert bad ln `.code needs one argument`)@{x /\S+/}@(eol) +.@{type /code|meta/} @(assert bad ln `.@type needs one argument`)@{x /\S+/}@(eol) @ (or) .cod3 @(assert bad ln `.cod3 needs three arguments`)@x @y @{z /\S+/}@(eol) @ (or) |