mes: Add define-macro*.

* module/mes/optargs.mes (define-macro*): New macro.
This commit is contained in:
Jan Nieuwenhuizen 2018-01-06 11:09:10 +01:00
parent 5d68fc44ba
commit 6f81fe41b0
1 changed files with 3 additions and 0 deletions

View File

@ -34,3 +34,6 @@
(define-macro (define-module module . rest) #t)
(include-from-path "mes/optargs.scm")
(define-macro (define-macro* NAME+ARGLIST . BODY)
`(define-macro ,(car NAME+ARGLIST) #f (lambda* ,(cdr NAME+ARGLIST) ,@BODY)))