Loads do not remove any nodes from the exec after sets. Also fix a 'node leak'.

[libfirm] / ir / ana2 / pto_util.c

diff --git a/ir/ana2/pto_util.c b/ir/ana2/pto_util.c
index 5ab4123..fe83149 100644 (file)
--- a/ir/ana2/pto_util.c
+++ b/ir/ana2/pto_util.c
@@ -1,17 +1,31 @@
 /* -*- c -*- */
 
 /*
-   Project:     libFIRM
-   File name:   ir/ana/pto_util.c
-   Purpose:     Utilitites for PTO
-   Author:      Florian
-   Modified by:
-   Created:     Sat Nov 13 19:35:27 CET 2004
-   CVS-ID:      $Id$
-   Copyright:   (c) 1999-2004 Universität Karlsruhe
-   Licence:     This file is protected by the GPL -  GNU GENERAL PUBLIC LICENSE.
-*/
-
+ * 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.
+ */
+
+/**
+ * @file
+ * @brief    Utilitites for PTO
+ * @author   Florian
+ * @date     Sat Nov 13 19:35:27 CET 2004
+ * @version  $Id$
+ */
 #ifdef HAVE_CONFIG_H
 # include "config.h"
 #endif
@@ -106,7 +120,7 @@ ir_node **find_irg_args (ir_graph *graph)
 ir_entity *get_ptr_ent (ir_node *ptr)
 {
   ir_entity *ent = NULL;
-  const opcode ptr_op = get_irn_opcode (ptr);
+  const ir_opcode ptr_op = get_irn_opcode (ptr);
   switch (ptr_op) {
   case (iro_Cast): {
     ent = get_ptr_ent (get_Cast_op (ptr));
@@ -134,7 +148,7 @@ ir_entity *get_ptr_ent (ir_node *ptr)
 /* Check whether the load of the given ptr is a dummy */
 int is_dummy_load_ptr (ir_node *ptr)
 {
-  const opcode ptr_op = get_irn_opcode (ptr);
+  const ir_opcode ptr_op = get_irn_opcode (ptr);
 
   switch (ptr_op) {
   case (iro_Cast): {
@@ -154,6 +168,9 @@ int is_dummy_load_ptr (ir_node *ptr)
 \f
 /*
   $Log$
+  Revision 1.19  2007/01/16 15:45:42  beck
+  renamed type opcode to ir_opcode
+
   Revision 1.18  2006/12/13 19:46:47  beck
   rename type entity into ir_entity