Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-06 12:46:35 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Reverting temporarily

Browse source
This commit is contained in:
Justin Ethier 2017-07-29 19:21:43 -04:00
parent be9d68c3f1
commit 06d7eb1e7e
1 changed files with 19 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
include/cyclone/types.h
View file

@ -1002,8 +1002,26 @@ typedef closure0_type *macro;
c.fn = f; \ c.fn = f; \
c.num_args = -1; c.num_args = -1;
/*
#define mclosure0(c, f) \ #define mclosure0(c, f) \
static closure0_type c = { .hdr.mark = gc_color_red, .hdr.grayed = 0, .tag = closure0_tag, .fn = f, .num_args = -1 }; / * TODO: need a new macro that initializes num_args * / static closure0_type c = { .hdr.mark = gc_color_red, .hdr.grayed = 0, .tag = closure0_tag, .fn = f, .num_args = -1 }; / * TODO: need a new macro that initializes num_args * /
*/
#define mclosure0(c,f) \
closure0_type c; \
c.hdr.mark = gc_color_red; \
c.hdr.grayed = 0; \
c.tag = closure0_tag; \
c.fn = f; \
c.num_args = -1;
#define maclosure0(c,f,na) \
closure0_type c; \
c.hdr.mark = gc_color_red; \
c.hdr.grayed = 0; \
c.tag = closure0_tag; \
c.fn = f; \
c.num_args = na;
#define mclosure1(c,f,a) \ #define mclosure1(c,f,a) \
closure1_type c; \ closure1_type c; \