X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fcommon%2Ffirm.c;h=df3ef9cf87dc8d39dc84778930962d52007ac3c1;hb=12aaa3fc53618991634823a6738f50360a54633b;hp=6fb9d8491c5bce440d1938445d8ff15990672c01;hpb=bafc1c783b2078719ba2d96bb35afa1bd6984eca;p=libfirm

diff --git a/ir/common/firm.c b/ir/common/firm.c
index 6fb9d8491..df3ef9cf8 100644
--- a/ir/common/firm.c
+++ b/ir/common/firm.c
@@ -1,5 +1,5 @@
 /*
- * Copyright (C) 1995-2008 University of Karlsruhe.  All right reserved.
+ * Copyright (C) 1995-2011 University of Karlsruhe.  All right reserved.
  *
  * This file is part of libFirm.
  *
@@ -21,7 +21,6 @@
  * @file
  * @brief     Central firm functionality.
  * @author    Martin Trapp, Christian Schaefer, Goetz Lindenmaier
- * @version   $Id$
  */
 #include "config.h"
 
@@ -37,7 +36,6 @@
 #include "ident_t.h"
 #include "firm.h"
 #include "irflag_t.h"
-/* init functions are not public */
 #include "tv_t.h"
 #include "tpop_t.h"
 #include "irprog_t.h"
@@ -47,54 +45,36 @@
 #include "irgraph_t.h"
 #include "type_t.h"
 #include "entity_t.h"
-#include "opt_inline_t.h"
-#include "scalar_replace.h"
 #include "firmstat.h"
 #include "irarch.h"
-#include "reassoc_t.h"
-#include "funccall_t.h"
 #include "irhooks.h"
 #include "iredges_t.h"
 #include "irmemory_t.h"
-#include "tropt.h"
+#include "opt_init.h"
 #include "debugger.h"
 #include "be_t.h"
+#include "irtools.h"
+#include "execfreq_t.h"
+#include "firmstat_t.h"
 
 /* returns the firm root */
-lc_opt_entry_t *firm_opt_get_root(void) {
+lc_opt_entry_t *firm_opt_get_root(void)
+{
 	static lc_opt_entry_t *grp = NULL;
 	if (!grp)
 		grp = lc_opt_get_grp(lc_opt_root_grp(), "firm");
 	return grp;
 }
 
-void ir_init(const firm_parameter_t *param)
+void ir_init(void)
 {
-	firm_parameter_t def_params;
-	unsigned int     size;
-
 	/* for historical reasons be_init must be run first */
 	firm_be_init();
 
-	memset(&def_params, 0, sizeof(def_params));
-
-	if (param) {
-		/* check for reasonable size */
-		assert(param->size <= sizeof(def_params) && (param->size & 3) == 0 &&
-				"parameter struct not initialized ???");
-		size = sizeof(def_params);
-		if (param->size < size)
-			size = param->size;
-
-		memcpy(&def_params, param, size);
-	}
-
 	/* initialize firm flags */
 	firm_init_flags();
 	/* initialize all ident stuff */
-	init_ident(def_params.id_if, 1024);
-	/* enhanced statistics, need idents and hooks */
-	firm_init_stat(def_params.enable_statistics);
+	init_ident();
 	/* Edges need hooks. */
 	init_edges();
 	/* create the type kinds. */
@@ -107,14 +87,12 @@ void ir_init(const firm_parameter_t *param)
 	init_mode();
 	/* initialize tarvals, and floating point arithmetic */
 	init_tarval_2();
+	/* initialize node opcodes */
+	firm_init_op();
 	/* init graph construction */
 	firm_init_irgraph();
 	/* kind of obstack initialization */
 	firm_init_mangle();
-	/* initialize all op codes an irnode can consist of */
-	init_op();
-	/* called once for each run of this library */
-	firm_init_cons(def_params.initialize_local_func);
 	/* initialize reassociation */
 	firm_init_reassociation();
 	/* initialize function call optimization */
@@ -126,20 +104,18 @@ void ir_init(const firm_parameter_t *param)
 	/* Builds a construct allowing to access all information to be constructed
 	   later. */
 	init_irprog_2();
-	/* Initialize the type module and construct some idents needed. */
-	firm_init_type(def_params.builtin_dbg, def_params.cc_mask);
-	/* initialize the entity module */
-	firm_init_entity();
-	/* allocate a hash table. */
-	init_type_identify(def_params.ti_if);
 	/* class cast optimization */
 	firm_init_class_casts_opt();
 	/* memory disambiguation */
 	firm_init_memory_disambiguator();
+	firm_init_loop_opt();
 
 	/* Init architecture dependent optimizations. */
-	arch_dep_init(arch_dep_default_factory);
-	arch_dep_set_opts(0);
+	arch_dep_set_opts(arch_dep_none);
+
+	init_execfreq();
+
+	init_stat();
 
 #ifdef DEBUG_libfirm
 	/* integrated debugger extension */
@@ -149,28 +125,19 @@ void ir_init(const firm_parameter_t *param)
 
 void ir_finish(void)
 {
-	int i;
-
-	for (i = get_irp_n_irgs() - 1; i >= 0; --i)
-		free_ir_graph(get_irp_irg(i));
-	for (i = get_irp_n_pseudo_irgs() - 1; i >= 0; --i)
-		free_ir_graph(get_irp_pseudo_irg(i));
-
-	free_type_entities(get_glob_type());
-	for (i = get_irp_n_types() - 1; i >= 0; --i)
-		free_type_entities(get_irp_type(i));
-
-	for (i = get_irp_n_types() - 1; i >= 0; --i)
-		free_type(get_irp_type(i));
+#ifdef DEBUG_libfirm
+	firm_finish_debugger();
+#endif
+	exit_execfreq();
+	firm_be_finish();
 
 	free_ir_prog();
-
+	firm_finish_op();
 	finish_tarval();
 	finish_mode();
 	finish_tpop();
+	firm_finish_mangle();
 	finish_ident();
-
-	firm_be_finish();
 }
 
 unsigned ir_get_version_major(void)