diff options
Diffstat (limited to 'colm/program.c')
-rw-r--r-- | colm/program.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/colm/program.c b/colm/program.c index 09eba258..aececce1 100644 --- a/colm/program.c +++ b/colm/program.c @@ -36,9 +36,6 @@ void colmInit( long debugRealm ) { - /* Always on because because logging is controlled with ifdefs in\n" the - * runtime lib. */ - colmActiveRealm = debugRealm; } void clearGlobal( Program *prg, Tree **sp ) @@ -186,11 +183,13 @@ Tree *returnVal( struct ColmProgram *prg ) return prg->returnVal; } -Program *colmNewProgram( RuntimeData *rtd ) +Program *colmNewProgram( RuntimeData *rtd, long activeRealm ) { Program *prg = malloc(sizeof(Program)); memset( prg, 0, sizeof(Program) ); + prg->activeRealm = activeRealm; + assert( sizeof(Int) <= sizeof(Tree) ); assert( sizeof(Str) <= sizeof(Tree) ); assert( sizeof(Pointer) <= sizeof(Tree) ); |