forked from cadence/breezewiki
indie wikis: add Wapopedia/Drawn To Life
This commit is contained in:
parent
501dcaa3fc
commit
155a277f26
2 changed files with 16 additions and 11 deletions
|
@ -60,11 +60,11 @@
|
|||
(if (null? rest)
|
||||
`(cond ,@els)
|
||||
`(cond
|
||||
,@els
|
||||
[#t
|
||||
(let ,(for/list ([var vars])
|
||||
(cdr var))
|
||||
,(transform-cond/var rest))]))))
|
||||
,@els
|
||||
[#t
|
||||
(let* ,(for/list ([var vars])
|
||||
(cdr var))
|
||||
,(transform-cond/var rest))]))))
|
||||
|
||||
;; the syntax definitions and their tests go below here
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue