diff options
author | Adrian Thurston <thurston@complang.org> | 2015-01-27 10:04:21 -0500 |
---|---|---|
committer | Adrian Thurston <thurston@complang.org> | 2015-01-27 10:04:21 -0500 |
commit | 680cdd650f327b28129f23bf027ca5fa79b44ae3 (patch) | |
tree | aed240b12154d39e989907de17957de7b48569ed /src/tree.c | |
parent | d97898e259de2165599818287132ba1ee80390a2 (diff) | |
download | colm-680cdd650f327b28129f23bf027ca5fa79b44ae3.tar.gz |
function name cleanup
Diffstat (limited to 'src/tree.c')
-rw-r--r-- | src/tree.c | 47 |
1 files changed, 0 insertions, 47 deletions
@@ -961,44 +961,6 @@ Tree *splitTree( Program *prg, Tree *tree ) return tree; } -Tree *constructGeneric( Program *prg, long genericId ) -{ - GenericInfo *genericInfo = &prg->rtd->genericInfo[genericId]; - Tree *newGeneric = 0; - switch ( genericInfo->type ) { - case GEN_MAP: { - Map *map = colm_map_new( prg ); - map->genericInfo = genericInfo; - newGeneric = (Tree*) map; - break; - } - case GEN_MAP_EL: { - break; - } - case GEN_LIST: { - List *list = colm_list_new( prg ); - list->genericInfo = genericInfo; - newGeneric = (Tree*) list; - break; - } - case GEN_LIST_EL: { - break; - } - case GEN_PARSER: { - Parser *parser = colm_parser_new( prg, genericInfo ); - parser->input = (Tree*)colm_stream_new( prg ); - newGeneric = (Tree*) parser; - break; - } - default: - assert(false); - return 0; - } - - return newGeneric; -} - - /* We can't make recursive calls here since the tree we are freeing may be * very large. Need the VM stack. */ void treeFreeRec( Program *prg, Tree **sp, Tree *tree ) @@ -1097,15 +1059,6 @@ free_tree: break; } // case LEL_ID_STREAM: { -// Stream *stream = (Stream*)tree; -// clearSourceStream( prg, sp, stream->in ); -// if ( stream->in->file != 0 ) -// fclose( stream->in->file ); -// else if ( stream->in->fd >= 0 ) -// close( stream->in->fd ); -// free( stream->in ); -// streamFree( prg, stream ); -// break; // } default: { if ( tree->id != LEL_ID_IGNORE ) |