summaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorOmar Rizwan <omar@omar.website>2023-08-16 13:50:32 +0000
committerOmar Rizwan <omar@omar.website>2023-08-16 13:50:32 +0000
commitb1c0ef9a2f5e412cda8a21b1efc1930101b088a0 (patch)
tree5992c8366e14cb005d963e1ceadfe83a08b876fc /lib
parentSimplify web-image (diff)
downloadfolk-b1c0ef9a2f5e412cda8a21b1efc1930101b088a0.tar.gz
folk-b1c0ef9a2f5e412cda8a21b1efc1930101b088a0.zip
Increase log size + some unmatch hacking
Diffstat (limited to 'lib')
-rw-r--r--lib/evaluator.tcl3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/evaluator.tcl b/lib/evaluator.tcl
index 02d87faa..73c6a353 100644
--- a/lib/evaluator.tcl
+++ b/lib/evaluator.tcl
@@ -1031,6 +1031,7 @@ namespace eval Evaluator {
if (unmatch->edges[j].type == PARENT) {
statement_handle_t unmatchWhenId = unmatch->edges[j].statement;
statement_t* unmatchWhen = get(unmatchWhenId);
+ if (unmatchWhen == NULL) continue;
for (int k = 0; k < unmatchWhen->n_edges; k++) {
if (unmatchWhen->edges[k].type == PARENT) {
unmatchId = unmatchWhen->edges[k].match;
@@ -1135,7 +1136,7 @@ namespace eval Evaluator {
};
} log_entry_t;
- log_entry_t evaluatorLog[1024] = {0};
+ log_entry_t evaluatorLog[4096] = {0};
#define EVALUATOR_LOG_CAPACITY (sizeof(evaluatorLog)/sizeof(evaluatorLog[1]))
int evaluatorLogReadIndex = EVALUATOR_LOG_CAPACITY - 1;
int evaluatorLogWriteIndex = 0;