Cyclone Scheme  0.20

◆ return_direct_with_clo2

#define return_direct_with_clo2 (   td,
  clo,
  _fn,
  a1,
  a2 
)
Value:
{ \
char top; \
if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
object buf[2]; buf[0] = a1;buf[1] = a2;\
GC(td, clo, buf, 2); \
return; \
} else { \
(_fn)(td, 2, (closure)(clo),a1,a2); \
}}
A closed-over function with no variables.
Definition: types.h:1384
Definition: types.h:321
#define stack_overflow(x, y)
Definition: types.h:516