* (ikarus null-environment-5) is populated with the r5rs syntactic
forms.
This commit is contained in:
parent
f351cc9a5b
commit
21cdfd412b
BIN
src/ikarus.boot
BIN
src/ikarus.boot
Binary file not shown.
|
@ -211,50 +211,50 @@
|
||||||
|
|
||||||
|
|
||||||
(define ikarus-macros-map
|
(define ikarus-macros-map
|
||||||
'([define i r]
|
'([define i r ne]
|
||||||
[define-syntax i r]
|
[define-syntax i r ne]
|
||||||
[let-syntax i r]
|
[let-syntax i r ne]
|
||||||
[letrec-syntax i r]
|
[letrec-syntax i r ne]
|
||||||
[module i cm]
|
[module i cm]
|
||||||
[begin i r]
|
[begin i r ne]
|
||||||
[import i]
|
[import i]
|
||||||
[set! i r]
|
[set! i r ne]
|
||||||
[foreign-call i]
|
[foreign-call i]
|
||||||
[quote i r]
|
[quote i r ne]
|
||||||
[syntax-case i syncase]
|
[syntax-case i syncase]
|
||||||
[syntax i syncase]
|
[syntax i syncase]
|
||||||
[lambda i r]
|
[lambda i r ne]
|
||||||
[case-lambda i r]
|
[case-lambda i r]
|
||||||
[type-descriptor i ]
|
[type-descriptor i ]
|
||||||
[letrec i r]
|
[letrec i r ne]
|
||||||
[letrec* i r]
|
[letrec* i r]
|
||||||
[if i r]
|
[if i r ne]
|
||||||
[when i r]
|
[when i r]
|
||||||
[unless i r]
|
[unless i r]
|
||||||
[parameterize i parameters]
|
[parameterize i parameters]
|
||||||
[case i r]
|
[case i r ne]
|
||||||
[let-values i r]
|
[let-values i r]
|
||||||
[define-record i r]
|
[define-record i r]
|
||||||
[include i r]
|
[include i r]
|
||||||
[syntax-rules i r]
|
[syntax-rules i r ne]
|
||||||
[quasiquote i r]
|
[quasiquote i r ne]
|
||||||
[quasisyntax i syncase]
|
[quasisyntax i syncase]
|
||||||
[with-syntax i syncase]
|
[with-syntax i syncase]
|
||||||
[let i r]
|
[let i r ne]
|
||||||
[identifier-syntax i r]
|
[identifier-syntax i r]
|
||||||
[let* i r]
|
[let* i r ne]
|
||||||
[cond i r]
|
[cond i r ne]
|
||||||
[do i r]
|
[do i r ne]
|
||||||
[and i r]
|
[and i r ne]
|
||||||
[or i r]
|
[or i r ne]
|
||||||
[time i]
|
[time i]
|
||||||
[delay i]
|
[delay i ne]
|
||||||
[... i r]
|
[... i r ne]
|
||||||
[=> i r]
|
[=> i r ne]
|
||||||
[else i r]
|
[else i r ne]
|
||||||
[_ i r]
|
[_ i r ne]
|
||||||
[unquote i r]
|
[unquote i r ne]
|
||||||
[unquote-splicing i r]
|
[unquote-splicing i r ne]
|
||||||
[unsyntax i r]
|
[unsyntax i r]
|
||||||
[unsyntax-splicing i r]
|
[unsyntax-splicing i r]
|
||||||
))
|
))
|
||||||
|
|
Loading…
Reference in New Issue