diff options
Diffstat (limited to 'src/interp.h')
| -rw-r--r-- | src/interp.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/interp.h b/src/interp.h index 74bb0dd..36fd1e0 100644 --- a/src/interp.h +++ b/src/interp.h @@ -53,6 +53,7 @@ SExpRef Interp_load_file(Interp *interp, const char *filename); #define EVAL(_x) (lisp_eval(interp, (_x), false)) #define EVALTAIL(_x) (lisp_eval(interp, (_x), true)) #define TRUEP(_x) (lisp_truep(interp, (_x))) +#define FOREACH(_x, _lst) for (SExpRef _x = _lst; !NILP(_x); _x = CDR(_x)) // control flow #define CTL_FL(_x) \ (REF((_x))->type == kErrSignal \ |