define* in psyntax
* module/ice-9/optargs.scm: * module/ice-9/psyntax-pp.scm: * module/ice-9/psyntax.scm: Make define* available in the default environment, as lambda* is available there.
This commit is contained in:
parent
15ab466299
commit
97bc28b60a
3 changed files with 4934 additions and 4890 deletions
|
|
@ -2678,3 +2678,8 @@
|
|||
(syntax e))
|
||||
((_ x (... ...))
|
||||
(syntax (e x (... ...)))))))))))
|
||||
|
||||
(define-syntax define*
|
||||
(syntax-rules ()
|
||||
((_ (id . args) b0 b1 ...)
|
||||
(define id (lambda* args b0 b1 ...)))))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue