summaryrefslogtreecommitdiff
path: root/src/loadcolm.cc
diff options
context:
space:
mode:
authorAdrian Thurston <thurston@complang.org>2016-03-16 16:41:29 +0100
committerAdrian Thurston <thurston@complang.org>2016-03-16 16:41:29 +0100
commitb0ec721d644d5f333048c7ccfbb0259cf0c27dbb (patch)
treeb56f7fe271f13821fc091dc43ef3ed79e7c865fd /src/loadcolm.cc
parentc64d1d965b47cac4376e5968b5dd88004a2e1a5d (diff)
downloadcolm-b0ec721d644d5f333048c7ccfbb0259cf0c27dbb.tar.gz
extract stream file names so we can use them after the colm program is deleted
Diffstat (limited to 'src/loadcolm.cc')
-rw-r--r--src/loadcolm.cc2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/loadcolm.cc b/src/loadcolm.cc
index e7bdbf2b..7d81e183 100644
--- a/src/loadcolm.cc
+++ b/src/loadcolm.cc
@@ -790,6 +790,7 @@ struct LoadColm
}
StmtList *stmtList = walkRootItemList( Start.RootItemList() );
+ pd->streamFileNames.append( colm_extract_fns( program ) );
colm_delete_program( program );
return stmtList;
}
@@ -2703,6 +2704,7 @@ void LoadColm::go( long activeRealm )
}
StmtList *stmtList = walkRootItemList( Start.RootItemList() );
+ pd->streamFileNames.append( colm_extract_fns( program ) );
colm_delete_program( program );
pd->rootCodeBlock = CodeBlock::cons( stmtList, 0 );