remove #ifdef HAVE_CONFIG_Hs

[libfirm] / ir / common / firm.c

diff --git a/ir/common/firm.c b/ir/common/firm.c
index 2aefe17..2084a0b 100644 (file)
--- a/ir/common/firm.c
+++ b/ir/common/firm.c
@@ -1,16 +1,32 @@
 /*
- * Project:     libFIRM
- * File name:   ir/common/firm.c
- * Purpose:     Central firm functionality.
- * Author:      Martin Trapp, Christian Schaefer
- * Modified by: Goetz Lindenmaier
- * Created:
- * CVS-ID:      $Id$
- * Copyright:   (c) 1998-2003 Universität Karlsruhe
- * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ * Copyright (C) 1995-2008 University of Karlsruhe.  All right reserved.
+ *
+ * This file is part of libFirm.
+ *
+ * This file may be distributed and/or modified under the terms of the
+ * GNU General Public License version 2 as published by the Free Software
+ * Foundation and appearing in the file LICENSE.GPL included in the
+ * packaging of this file.
+ *
+ * Licensees holding valid libFirm Professional Edition licenses may use
+ * this file in accordance with the libFirm Commercial License.
+ * Agreement provided with the Software.
+ *
+ * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+ * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+ * PURPOSE.
  */
-#ifdef HAVE_CONFIG_H
-# include "config.h"
+
+/**
+ * @file
+ * @brief     Central firm functionality.
+ * @author    Martin Trapp, Christian Schaefer, Goetz Lindenmaier
+ * @version   $Id$
+ */
+#include "config.h"
+
+#ifdef HAVE_FIRM_REVISION_H
+# include "firm_revision.h"
 #endif
 
 #ifdef HAVE_STRING_H
@@ -20,14 +36,11 @@
 # include <stdio.h>
 #endif
 
-#ifdef WITH_LIBCORE
-# include <libcore/lc_opts.h>
-#endif
+#include "lc_opts.h"
 
 #include "ident_t.h"
 #include "firm.h"
 #include "irflag_t.h"
-#include "mangle.h"
 /* init functions are not public */
 #include "tv_t.h"
 #include "tpop_t.h"
@@ -38,20 +51,23 @@
 #include "irgraph_t.h"
 #include "type_t.h"
 #include "entity_t.h"
-#include "type_identify.h"
+#include "opt_inline_t.h"
+#include "scalar_replace.h"
 #include "firmstat.h"
-#include "irreflect_t.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 "debugger.h"
+#include "be_t.h"
 
-#ifdef WITH_LIBCORE
 /* returns the firm root */
 lc_opt_entry_t *firm_opt_get_root(void) {
        static lc_opt_entry_t *grp = NULL;
-       if(!grp)
+       if (!grp)
                grp = lc_opt_get_grp(lc_opt_root_grp(), "firm");
        return grp;
 }
@@ -60,13 +76,15 @@ void firm_init_options(const char *arg_prefix, int argc, const char **argv) {
        /* parse any init files for firm */
        lc_opts_init("firm", firm_opt_get_root(), arg_prefix, argc, argv);
 }
-#endif /* WITH_LIBCORE */
 
 void init_firm(const firm_parameter_t *param)
 {
        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) {
@@ -93,7 +111,7 @@ void init_firm(const firm_parameter_t *param)
        /* create the type kinds. */
        init_tpop();
        /* create an obstack and put all tarvals in a pdeq */
-       init_tarval_1(0l);
+       init_tarval_1(0l, /* support_quad_precision */0);
        /* Builds a basic program representation, so modes can be added. */
        init_irprog_1();
        /* initialize all modes an ir node can consist of */
@@ -107,24 +125,32 @@ void init_firm(const firm_parameter_t *param)
        /* initialize all op codes an irnode can consist of */
        init_op();
        /* called once for each run of this library */
-       init_cons(def_params.initialize_local_func);
+       firm_init_cons(def_params.initialize_local_func);
        /* initialize reassociation */
        firm_init_reassociation();
+       /* initialize function call optimization */
+       firm_init_funccalls();
+       /* initialize function inlining */
+       firm_init_inline();
+       /* initialize scalar replacement */
+       firm_init_scalar_replace();
        /* Builds a construct allowing to access all information to be constructed
           later. */
        init_irprog_2();
-       /* Initialize the type module ancd cr   d construct some idents needed. */
+       /* 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);
-       /* Init reflection facility. */
-       firm_init_rflct();
+       /* class cast optimization */
+       firm_init_class_casts_opt();
+       /* memory disambiguation */
+       firm_init_memory_disambiguator();
 
        /* Init architecture dependent optimizations. */
        arch_dep_init(arch_dep_default_factory);
-       arch_dep_set_opts(arch_dep_mul_to_shift | arch_dep_div_by_const | arch_dep_mod_by_const);
+       arch_dep_set_opts(0);
 
        firm_archops_init(def_params.arch_op_settings);
 
@@ -147,17 +173,24 @@ void free_firm(void) {
        for (i = get_irp_n_types() - 1; i >= 0; --i)
                free_type(get_irp_type(i));
 
-       finish_op();
        free_ir_prog();
 
        finish_tarval();
        finish_mode();
        finish_tpop();
        finish_ident();
+
+       firm_be_finish();
 }
 
 /* Returns the libFirm version number. */
 void firm_get_version(firm_version_t *version) {
-       version->major = libFirm_VERSION_MAJOR;
-       version->minor = libFirm_VERSION_MINOR;
+       version->major    = libfirm_VERSION_MAJOR;
+       version->minor    = libfirm_VERSION_MINOR;
+#ifdef libfirm_VERSION_REVISION
+       version->revision = libfirm_VERSION_REVISION;
+#else
+       version->revision = "";
+#endif
+       version->build    = "";
 }