From 03a24cd47b0d067110db1026e99e13e974409768 Mon Sep 17 00:00:00 2001
From: Guido van Rossum <guido@python.org>
Date: Sun, 18 Nov 1990 17:37:06 +0000
Subject: Add function to free an entire parse tree.

---
 Parser/node.c | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

(limited to 'Parser/node.c')

diff --git a/Parser/node.c b/Parser/node.c
index 86d607ab19..264fd9e8a1 100644
--- a/Parser/node.c
+++ b/Parser/node.c
@@ -45,3 +45,26 @@ addchild(n1, type, str)
 	n->n_child = NULL;
 	return n;
 }
+
+static void
+freechildren(n)
+	node *n;
+{
+	int i;
+	for (i = NCH(n); --i >= 0; )
+		freechildren(CHILD(n, i));
+	if (n->n_child != NULL)
+		DEL(n->n_child);
+	if (STR(n) != NULL)
+		DEL(STR(n));
+}
+
+void
+freenode(n)
+	node *n;
+{
+	if (n != NULL) {
+		freechildren(n);
+		DEL(n);
+	}
+}
-- 
cgit v1.2.1