From 080694ae82635e76992158591b39a06af7363da0 Mon Sep 17 00:00:00 2001
From: "Arnold D. Robbins" <arnold@skeeve.com>
Date: Tue, 24 Mar 2015 22:15:31 +0200
Subject: Further progress on indirect calls of builtins.

---
 node.c | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'node.c')

diff --git a/node.c b/node.c
index 9fd4c7b9..179d272e 100644
--- a/node.c
+++ b/node.c
@@ -431,6 +431,13 @@ r_unref(NODE *tmp)
 #ifdef GAWKDEBUG
 	if (tmp == NULL)
 		return;
+	if (tmp->type == Node_regex) {
+		if (tmp->re_reg != NULL)
+			refree(tmp->re_reg);
+		if (tmp->re_text != NULL)
+			unref(tmp->re_text);
+		goto free_the_node;
+	}
 	if ((tmp->flags & MALLOC) != 0) {
 		if (tmp->valref > 1) {
 			tmp->valref--;
@@ -447,6 +454,7 @@ r_unref(NODE *tmp)
 	mpfr_unset(tmp);
 
 	free_wstr(tmp);
+free_the_node:
 	freenode(tmp);
 }
 
-- 
cgit v1.2.3