option to disable stack entry omission

currently only settable via gdb
This commit is contained in:
dzaima 2025-05-11 13:43:28 +03:00
parent 516205321c
commit eca676bb3d

View File

@ -1415,13 +1415,14 @@ native_print:
} }
} }
bool omitStackEntries = true;
NOINLINE void vm_pst(Env* s, Env* e) { // e not included NOINLINE void vm_pst(Env* s, Env* e) { // e not included
assert(s<=e); assert(s<=e);
i64 l = e-s; i64 l = e-s;
i64 i = l-1; i64 i = l-1;
while (i>=0) { while (i>=0) {
Env* c = s+i; Env* c = s+i;
if (l>30 && i==l-10) { if (l>30 && i==l-10 && omitStackEntries) {
fprintf(stderr, "("N64d" entries omitted)\n", l-20); fprintf(stderr, "("N64d" entries omitted)\n", l-20);
i = 10; i = 10;
} }