91 |
#define SCM_CONTREGS(x) ((scm_t_contregs *) SCM_CELL_WORD_1 (x)) |
#define SCM_CONTREGS(x) ((scm_t_contregs *) SCM_CELL_WORD_1 (x)) |
92 |
|
|
93 |
#define SCM_CONTINUATION_LENGTH(x) (SCM_CONTREGS (x)->num_stack_items) |
#define SCM_CONTINUATION_LENGTH(x) (SCM_CONTREGS (x)->num_stack_items) |
94 |
#define SCM_SET_CONTINUATION_LENGTH(x,n)\ |
#define SCM_SET_CONTINUATION_LENGTH(x, n)\ |
95 |
(SCM_CONTREGS (x)->num_stack_items = (n)) |
(SCM_CONTREGS (x)->num_stack_items = (n)) |
96 |
#define SCM_JMPBUF(x) ((SCM_CONTREGS (x))->jmpbuf) |
#define SCM_JMPBUF(x) ((SCM_CONTREGS (x))->jmpbuf) |
97 |
#define SCM_DYNENV(x) ((SCM_CONTREGS (x))->dynenv) |
#define SCM_DYNENV(x) ((SCM_CONTREGS (x))->dynenv) |