diff --git a/src/error.c b/src/error.c index 94b74888672c4c63197e1f57570fc75d46f4eb2e..5f43c3ef456832623072eedb579ad82965293897 100644 --- a/src/error.c +++ b/src/error.c @@ -11,6 +11,7 @@ #include "builtin_functions.h" #include "array.h" #include "object.h" +#include "main.h" #undef ATTRIBUTE #define ATTRIBUTE(X) @@ -34,9 +35,12 @@ void throw(void) ATTRIBUTE((noreturn)) fatal("No error recovery context.\n"); #ifdef DEBUG + if (t_flag) { + fprintf(stderr, "throw(X)\n"); + } if(sp - evaluator_stack < recoveries->sp) fatal("Stack error in error.\n"); -#endif +#endif /* DEBUG */ while(fp != recoveries->fp) {