extract stream file names so we can use them after the colm program is deleted

1 files changed, 9 insertions, 0 deletions

diff --git a/src/compiler.cc b/src/compiler.cc
index 3020d7f5..808c6e95 100644
--- a/src/compiler.cc
+++ b/src/compiler.cc
@@ -415,6 +415,15 @@ Compiler::~Compiler()
 	/* Delete all the nodes in the action list. Will cause all the
 	 * string data that represents the actions to be deallocated. */
 	actionList.empty();
+
+	for ( CharVectVect::Iter fns = streamFileNames; fns.lte(); fns++ ) {
+		const char **ptr = *fns;
+		while ( *ptr != 0 ) {
+			::free( (void*)*ptr );
+			ptr += 1;
+		}
+		free( (void*) *fns );
+	}
 }
 
 ostream &operator<<( ostream &out, const Token &token )