fix bugs when exchanging nodes to projs in bepeephole
[libfirm] / ir / be / bespilloptions.c
1 /*
2  * Copyright (C) 1995-2007 University of Karlsruhe.  All right reserved.
3  *
4  * This file is part of libFirm.
5  *
6  * This file may be distributed and/or modified under the terms of the
7  * GNU General Public License version 2 as published by the Free Software
8  * Foundation and appearing in the file LICENSE.GPL included in the
9  * packaging of this file.
10  *
11  * Licensees holding valid libFirm Professional Edition licenses may use
12  * this file in accordance with the libFirm Commercial License.
13  * Agreement provided with the Software.
14  *
15  * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
16  * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
17  * PURPOSE.
18  */
19
20 /**
21  * @file
22  * @brief       Option handling for spiller.
23  * @author      Daniel Grund, Sebastian Hack, Matthias Braun
24  * @date        29.09.2005
25  * @version     $Id$
26  */
27 #ifdef HAVE_CONFIG_H
28 #include "config.h"
29 #endif
30
31 #include "irtools.h"
32
33 #include "bespilloptions.h"
34 #include "bemodule.h"
35 #include "be.h"
36
37 #include <libcore/lc_opts.h>
38 #include <libcore/lc_opts_enum.h>
39 #include <libcore/lc_timing.h>
40
41 int be_coalesce_spill_slots = 1;
42 int be_do_remats = 1;
43
44 static const lc_opt_table_entry_t be_spill_options[] = {
45         LC_OPT_ENT_BOOL ("coalesce_slots", "coalesce the spill slots", &be_coalesce_spill_slots),
46         LC_OPT_ENT_BOOL ("remat", "try to rematerialize values instead of reloading", &be_do_remats),
47         LC_OPT_LAST
48 };
49
50 static be_module_list_entry_t *spillers = NULL;
51 static be_spiller_t *selected_spiller = NULL;
52
53 void be_register_spiller(const char *name, be_spiller_t *spiller)
54 {
55         if(selected_spiller == NULL)
56                 selected_spiller = spiller;
57         be_add_module_to_list(&spillers, name, spiller);
58 }
59
60 void be_do_spill(be_irg_t *birg, const arch_register_class_t* cls)
61 {
62         assert(selected_spiller != NULL);
63         if(selected_spiller != NULL) {
64                 selected_spiller->spill(birg, cls);
65         }
66 }
67
68 void be_init_spilloptions(void)
69 {
70         lc_opt_entry_t *be_grp = lc_opt_get_grp(firm_opt_get_root(), "be");
71         lc_opt_entry_t *spill_grp = lc_opt_get_grp(be_grp, "spill");
72
73         lc_opt_add_table(spill_grp, be_spill_options);
74         be_add_module_list_opt(spill_grp, "spiller", "spill algorithm",
75                                &spillers, (void**) &selected_spiller);
76 }
77
78 BE_REGISTER_MODULE_CONSTRUCTOR(be_init_spilloptions);