diff options
Diffstat (limited to 'module/ice-9/psyntax.scm')
-rw-r--r-- | module/ice-9/psyntax.scm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/module/ice-9/psyntax.scm b/module/ice-9/psyntax.scm index e522f5467..4fec91719 100644 --- a/module/ice-9/psyntax.scm +++ b/module/ice-9/psyntax.scm @@ -1204,7 +1204,12 @@ ((call) (expand-application (expand (car e) r w mod) e r w s mod)) ((begin-form) (syntax-case e () - ((_ e1 e2 ...) (expand-sequence #'(e1 e2 ...) r w s mod)))) + ((_ e1 e2 ...) (expand-sequence #'(e1 e2 ...) r w s mod)) + ((_) + (begin + (issue-deprecation-warning + "Sequences of zero expressions are deprecated. Use *unspecified*.") + (expand-void))))) ((local-syntax-form) (expand-local-syntax value e r w s mod expand-sequence)) ((eval-when-form) |