bugfix

[libfirm] / ir / ir / iropt_t.h

diff --git a/ir/ir/iropt_t.h b/ir/ir/iropt_t.h
index 2c4b369..4c7c5b5 100644 (file)
--- a/ir/ir/iropt_t.h
+++ b/ir/ir/iropt_t.h
@@ -1,13 +1,23 @@
-/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-** All rights reserved.
-**
-** Authors: Martin Trapp, Christian Schaefer
-**
-** Declarations for optimizations intertwined with IR construction.
+/*
+ * Project:     libFIRM
+ * File name:   ir/ir/iropt_t.h
+ * Purpose:     iropt --- optimizations intertwined with IR construction -- private header.
+ * Author:      Martin Trapp, Christian Schaefer
+ * Modified by: Goetz Lindenmaier
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1998-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
+
+/**
+* @file iropt_t.h
+*
+* Declarations for optimizations intertwined with IR construction.
+*
+* @author Martin Trapp, Christian Schaefer
 */
 
-/* $Id$ */
-
 # ifndef _IROPT_T_H_
 # define _IROPT_T_H_
 
@@ -16,12 +26,31 @@
 
 ir_node *equivalent_node (ir_node *n);
 
-/* For cse */
+/*@{*/
+
+/** For cse */
 pset *new_identities (void);
 void  del_identities (pset *value_table);
-void  add_identity (pset *value_table, ir_node *node);
+void  add_identities (pset *value_table, ir_node *node);
+/*@}*/
+
+ir_node *optimize_node (ir_node *n);
 
 ir_node *optimize_in_place_2 (ir_node *n);
 
+/* Calculate a hash value of a node. */
+unsigned ir_node_hash (ir_node *node);
+
+/**
+ * Returns the tarval of a Const node or tarval_bad for all other nodes.
+ */
+static INLINE tarval *
+value_of(ir_node *n) {
+  if ((n != NULL) && (get_irn_op(n) == op_Const))
+    return get_Const_tarval(n); /* might return tarval_bad */
+  else
+    return tarval_bad;
+}
+
 
 # endif /* _IROPT_T_H_ */