/*
- * Project: libFIRM
- * File name: ir/ir/irgwalk_blk.c
- * Purpose:
- * Author: Michael Beck
- * Modified by:
- * Created:
- * CVS-ID: $Id$
- * Copyright: (c) 1999-2004 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.
+ */
+
+/**
+ * @file
+ * @brief Blockwise walker implementation
+ * @author Michael Beck
+ * @version $Id$
*/
#ifdef HAVE_CONFIG_H
# include "config.h"
ir_node *pred = _get_walk_irn_n(env, node, i);
ir_node *blk = get_nodes_block(pred);
- if (irn_not_visited(pred)) {
+ if (!irn_visited(pred)) {
collect_walk(pred, env);
/* control flow predecessors are always block inputs */
else {
block = get_nodes_block(node);
- if (irn_not_visited(block))
+ if (!irn_visited(block))
collect_walk(block, env);
is_phi = is_Phi(node);
for (i = _get_walk_arity(env, node) - 1; i >= 0; --i) {
ir_node *pred = _get_walk_irn_n(env, node, i);
- if (irn_not_visited(pred)) {
+ if (!irn_visited(pred)) {
collect_walk(pred, env);
/* BEWARE: predecessors of End nodes might be blocks */
if (is_no_Block(pred)) {
ir_node *blk = get_nodes_block(pred);
- if (irn_not_visited(pred)) {
+ if (!irn_visited(pred)) {
if (block != blk)
continue;
collect_blks_lists(pred, block, entry, env);
ir_node *end_node = get_irg_end(irg);
ir_node *end_blk = get_irg_end_block(irg);
blk_collect_data_t blks;
- int old_view = get_interprocedural_view();
block_entry_t *entry;
- assert(! inside_irg_walk(irg)); /* we must not already be inside an irg walk */
- set_inside_irg_walk(irg);
-
+#ifdef INTERPROCEDURAL_VIEW
/* switch off interprocedural view */
+ int old_view = get_interprocedural_view();
set_interprocedural_view(0);
+#endif
obstack_init(&blks.obst);
blks.blk_map = new_pset(addr_cmp, 1);
blks.follow_deps = follow_deps != 0;
/* first step: traverse the graph and fill the lists */
+ ir_reserve_resources(irg, IR_RESOURCE_IRN_VISITED);
inc_irg_visited(irg);
collect_walk(end_node, &blks);
del_pset(blks.blk_map);
obstack_free(&blks.obst, NULL);
+#ifdef INTERPROCEDURAL_VIEW
set_interprocedural_view(old_view);
- clear_inside_irg_walk(irg);
+#endif
+ ir_free_resources(irg, IR_RESOURCE_IRN_VISITED);
}
void irg_walk_blkwise_graph(ir_graph *irg, irg_walk_func *pre, irg_walk_func *post, void *env)