Fix aand
This commit is contained in:
parent
32786eb456
commit
97e4d00fa0
4
aand.rkt
4
aand.rkt
|
@ -10,5 +10,5 @@
|
||||||
(syntax-parser
|
(syntax-parser
|
||||||
[(_) #'#true]
|
[(_) #'#true]
|
||||||
[(_ body:expr) #'body]
|
[(_ body:expr) #'body]
|
||||||
[(_ [variable:id condition:expr] rest ...+)
|
[(_ condition:expr rest ...+)
|
||||||
#'(aif condition (and-let rest ...) #false)]))
|
#'(aif condition (aand rest ...) #false)]))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user