diff options
Diffstat (limited to 'share')
| -rw-r--r-- | share/txr/stdlib/txr-case.tl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/share/txr/stdlib/txr-case.tl b/share/txr/stdlib/txr-case.tl index 2e0c5979..e6d10eca 100644 --- a/share/txr/stdlib/txr-case.tl +++ b/share/txr/stdlib/txr-case.tl @@ -32,6 +32,7 @@ (error "txr-case: clauses after (t ...) clause ignored") ^(progn ,*rest)) (error "txr-case: bad syntax: ~s" (car clauses)))) + (() ()) (atom (error "txr-case: unexpected atom in syntax: ~s" atom)))) |