| 1735 | } |
| 1736 | |
| 1737 | void dumpexecutionstack(stream *f) |
| 1738 | { |
| 1739 | if(f && executionstack.length()) |
| 1740 | { |
| 1741 | f->printf("cubescript execution stack (%d levels)\n", executionstack.length()); |
| 1742 | if(curcontext) f->printf(" cubescript context: %s %s\n", curcontext, curinfo ? curinfo : ""); |
| 1743 | loopvrev(executionstack) f->printf("%4d: %s\n", i + 1, executionstack[i]); |
| 1744 | f->fflush(); |
| 1745 | } |
| 1746 | } |
| 1747 | |
| 1748 | void cslimiterr(const char*msg) |
| 1749 | { |