use disjoint sets for struct and lang-el identifiers

Using disjoint sets allows us to verify at runtime that we are not mixing trees
and structs. Some of this is still left over from when we used trees for
streams and lists and things. Need to build up some internal consistency
checks.

1 files changed, 1 insertions, 1 deletions

diff --git a/src/list.c b/src/list.c
index ebcc4618..245e3331 100644
--- a/src/list.c
+++ b/src/list.c
@@ -205,7 +205,7 @@ list_t *colm_list_new( struct colm_program *prg )
 	struct colm_list *list = (struct colm_list*) malloc( memsize );
 	memset( list, 0, memsize );
 	colm_struct_add( prg, (struct colm_struct *)list );
-	list->id = STRUCT_INBUILT_ID;
+	list->id = prg->rtd->struct_inbuilt_id;
 	list->destructor = &colm_list_destroy;
 	return list;
 }