mirror of
https://github.com/carp-lang/Carp.git
synced 2024-10-26 13:51:50 +03:00
macros: add until
This commit is contained in:
parent
6954642cad
commit
6bf45e16a6
@ -342,3 +342,8 @@ The expression must be evaluable at compile time.")
|
||||
(doc gensym "generates symbols dynamically as needed.")
|
||||
(defndynamic gensym []
|
||||
(gensym-with 'gensym-generated))
|
||||
|
||||
(doc until "executes `body` until the condition `cnd` is true.")
|
||||
(defmacro until [cnd body]
|
||||
(list 'while (list 'not cnd)
|
||||
body))
|
||||
|
Loading…
Reference in New Issue
Block a user