Cyclone Scheme
0.4
|
◆ return_direct4
Value:
{ \ char top; \ if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \ object buf[4]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4; \ mclosure0(c1, (function_type) _fn); \ GC(td, &c1, buf, 4); \ return; \ } else { \ (_fn)(td, 4, (closure)_fn,a1,a2,a3,a4); \ }}
Definition: types.h:256 |