From a38fd95a908f2ac76027dcc3eaa09695131b8124 Mon Sep 17 00:00:00 2001
From: Dianne Skoll <dianne@skoll.ca>
Date: Mon, 16 Sep 2024 14:39:26 -0400
Subject: [PATCH] Add guard against double-free of expr_node.

---
 src/expr.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/expr.c b/src/expr.c
index 641778a7..706e469a 100644
--- a/src/expr.c
+++ b/src/expr.c
@@ -1698,7 +1698,7 @@ static int peek_expr_token(DynamicBuffer *buf, char const *in)
 /***************************************************************/
 expr_node * free_expr_tree(expr_node *node)
 {
-    if (node) {
+    if (node && (node->type != N_FREE)) {
         ExprNodesUsed--;
         if (node->type == N_CONSTANT ||
             node->type == N_VARIABLE ||