X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2Fbeutil.c;h=ee4506ce8a926851c4f5c5d7a218506959d215d5;hb=d5975c9df2dee13abedf388f1d70397a2163b69f;hp=12b2fa161612f16a88106d6e30a1138c5c40fd1b;hpb=590ee347f24fa1dedb141278ac21717d01f13fcf;p=libfirm diff --git a/ir/be/beutil.c b/ir/be/beutil.c index 12b2fa161..ee4506ce8 100644 --- a/ir/be/beutil.c +++ b/ir/be/beutil.c @@ -1,7 +1,27 @@ +/* + * Copyright (C) 1995-2007 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. + */ + /** - * Contains some useful function for the backend. - * @author Sebastian Hack - * @cvsid $Id$ + * @file + * @brief Contains some useful function for the backend. + * @author Sebastian Hack + * @version $Id$ */ #ifdef HAVE_CONFIG_H #include "config.h" @@ -24,7 +44,7 @@ #include "beutil.h" #include "besched_t.h" -#include "bearch.h" +#include "bearch_t.h" /* Get an always empty set. */ pset *be_empty_set(void) @@ -194,19 +214,21 @@ unsigned get_num_reachable_nodes(ir_graph *irg) { * Sets all node inputs to BAD node. */ void be_kill_node(ir_node *irn) { - int i, first; - ir_graph *irg; + ir_graph *irg = get_irn_irg(irn); assert(!is_Bad(irn)); -DEBUG_ONLY( - irg = get_irn_irg(irn); +#ifdef DEBUG_libfirm + { + int i, first; first = 0 - ! is_Block(irn); for (i = get_irn_arity(irn) - 1; i >= first; --i) { set_irn_n(irn, i, get_irg_bad(irg)); } -) + } +#endif + edges_node_deleted(irn, irg); } @@ -247,3 +269,16 @@ ir_node *be_get_Proj_for_pn(const ir_node *irn, long pn) { return NULL; } + +FILE *be_ffopen(const char *base, const char *ext, const char *mode) { + FILE *out; + char buf[1024]; + + snprintf(buf, sizeof(buf), "%s.%s", base, ext); + buf[sizeof(buf) - 1] = '\0'; + if (! (out = fopen(buf, mode))) { + fprintf(stderr, "Cannot open file %s in mode %s\n", buf, mode); + return NULL; + } + return out; +}