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

Insure optional arg pairs are mutable

Browse source
This commit is contained in:
Justin Ethier 2019-05-16 17:46:42 -04:00
parent c9ae6cdf97
commit a29e731d94
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
include/cyclone/runtime.h
View file

@ -134,6 +134,7 @@ object Cyc_global_set(void *thd, object * glo, object value);
} \ } \
var[i].hdr.mark = gc_color_red; \ var[i].hdr.mark = gc_color_red; \
var[i].hdr.grayed = 0; \ var[i].hdr.grayed = 0; \
var[i].hdr.immutable = 0; \
var[i].tag = pair_tag; \ var[i].tag = pair_tag; \
var[i].pair_car = tmp; \ var[i].pair_car = tmp; \
var[i].pair_cdr = (i == (count-1)) ? NULL : &var[i + 1]; \ var[i].pair_cdr = (i == (count-1)) ? NULL : &var[i + 1]; \