X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fcommon%2Ffirm.c;h=3d906dd8fbf16f3a09dea840be4bea3135b9b181;hb=4d7bf718a50ed7bc1f1dbbeb8fb2b4abbc1950ee;hp=3f1cd91ec310016de8e39bf1abc80968ac29ff24;hpb=87f73fef92b9a1904f4dc989e758b5ce3bbc02f7;p=libfirm diff --git a/ir/common/firm.c b/ir/common/firm.c index 3f1cd91ec..3d906dd8f 100644 --- a/ir/common/firm.c +++ b/ir/common/firm.c @@ -1,8 +1,8 @@ /* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe -** All rights reserved. -** -** Authors: Martin Trapp, Christian Schaefer -** +* All rights reserved. +* +* Authors: Martin Trapp, Christian Schaefer +* */ /* $Id$ */ @@ -15,39 +15,35 @@ # include "ident_t.h" # include "firm.h" # include "mangle.h" -# include "xp_help.h" +//# include "xp_help.h" # include "tv_t.h" /* init functions are not public */ # include "tpop_t.h" # include "irnode_t.h" # include "irmode_t.h" +# include "irgraph_t.h" void -init_firm (void) +init_firm (default_initialize_local_variable_func_t *func) { - /* register the character 'I' as variable for ident outputs. */ - xprintf_register ('I', ident_print); - /* register the character 'v' as variable for tarval outputs. */ - xprintf_register ('v', tarval_print); - /* register the character 'R' as variable for ir node outputs. */ - xprintf_register ('R', ir_node_print); - /* initialize all ident stuff */ id_init (); /* create the type kinds. */ init_tpop (); /* create an obstack and put all tarvals in a pdeq */ - tarval_init_1 (); + init_tarval_1 (); /* initialize all modes an ir node can consist of */ init_mode (); /* initialize tarvals, and floating point arithmetic */ - tarval_init_2 (); + init_tarval_2 (); + /* init graph construction */ + init_irgraph(); /* kind of obstack initialization */ init_mangle (); /* initalize all op codes an irnode can consist of */ init_op (); - /* called once for each run of this library, empty right now... @@@!!! - init_cons (); */ + /* called once for each run of this library */ + init_cons (func); /* Builds a construct allowing to access all information to be constructed later. */ init_irprog ();