+
/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
** All rights reserved.
**
** irgmod: ir graph modification
*/
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+# include "irnode_t.h"
+# include "irgraph_t.h"
# include "irgmod.h"
# include "array.h"
-/* ir_node * */
-/* arg_access (ir_mode *mode, long proj) */
-/* { */
-/* return new_r_Proj (current_ir_graph, current_ir_graph->start, */
-/* current_ir_graph->args, mode, proj); */
-/* } */
-
/* Turns a node into a "useless" Tuple. The Tuple just forms a tuple
from several inputs.
This is useful if a node returning a tuple is removed, but the Projs
if (get_irn_arity(node) == arity) {
/* keep old array */
} else {
- /* allocate new array, remove old one. */
- /* !!!??? free old in_array */
+ /* Allocate new array, don't free old in_array, it's on the obstack. */
+ ir_node *block = get_nodes_Block(node);
node->in = NEW_ARR_D (ir_node *, current_ir_graph->obst, arity+1);
+ set_nodes_Block(node, block);
}
}