Cyclone Scheme  0.20

◆ continue_or_gc6

#define continue_or_gc6 (   td,
  clo,
  a1,
  a2,
  a3,
  a4,
  a5,
  a6 
)
Value:
{ \
char *top = alloca(sizeof(char)); \
if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
object buf[6]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;buf[5] = a6;\
GC(td, clo, buf, 6); \
return; \
} else {\
continue;\
} \
}
Definition: types.h:321
#define stack_overflow(x, y)
Definition: types.h:516