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

Refactoring

Browse source
This commit is contained in:
Justin Ethier 2016-02-24 21:06:24 -05:00
parent dc19539bff
commit cef2abfb7e
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gc.c
View file

@ -1341,9 +1341,8 @@ void gc_mutator_thread_runnable(gc_thread_data *thd, object result)
} else { } else {
// Collector didn't do anything; make a normal continuation call // Collector didn't do anything; make a normal continuation call
if (type_of(thd->gc_cont) == cons_tag || prim(thd->gc_cont)) { if (type_of(thd->gc_cont) == cons_tag || prim(thd->gc_cont)) {
object buf[1]; thd->gc_args[0] = result;
buf[0] = result; Cyc_apply_from_buf(thd, 1, thd->gc_cont, thd->gc_args);
Cyc_apply_from_buf(thd, 1, thd->gc_cont, buf);
} else { } else {
(((closure)(thd->gc_cont))->fn)(thd, 1, thd->gc_cont, result); (((closure)(thd->gc_cont))->fn)(thd, 1, thd->gc_cont, result);
} }