carp-lang/Carp
1
1
Fork 0
mirror of https://github.com/carp-lang/Carp.git synced 2024-09-11 05:25:28 +03:00
Code Issues Projects Releases Wiki Activity

Readded inline-c as a macro of deftemplate.

Browse Source
This commit is contained in:
Nils 'Linkie Pi' Reid 2020-05-08 15:17:34 +02:00
parent 9772bc20f9
commit a8032f3b72
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/Macros.carp
View File

@ -709,3 +709,7 @@ The expression must be evaluable at compile time.")
(defmacro comp [:rest fns]
(let [x (gensym)]
(list 'fn [x] (comp-internal x fns))))
(doc inline-c "inlines some custom C code.")
(defmacro inline-c [name def decl]
(list 'deftemplate name (list) (eval def) (eval decl)))