dump addr of nodes, depending on flag

[libfirm] / ir / common / firm_common.c

diff --git a/ir/common/firm_common.c b/ir/common/firm_common.c
index 755c6f2..ddb17c1 100644 (file)
--- a/ir/common/firm_common.c
+++ b/ir/common/firm_common.c
@@ -1,13 +1,15 @@
-/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-** All rights reserved.
-**
-** Authors: Martin Trapp, Christian Schaefer &
-**          Goetz Lindenmaier
-**
-** firm_common.c:
-*/
+/*
+ * Project:     libFIRM
+ * File name:   ir/common/firm_common.c
+ * Purpose:
+ * 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.
+ */
 
-/* $Id$ */
 
 #ifdef HAVE_CONFIG_H
 # include <config.h>
@@ -18,7 +20,7 @@
 
 /* returns the kind of the thing */
 firm_kind
-get_kind (void *firm_thing) {
+get_kind (const void *firm_thing) {
   assert (firm_thing);
   return *(firm_kind *)firm_thing;
 }
@@ -27,19 +29,14 @@ get_kind (void *firm_thing) {
 const char* print_firm_kind(void *firm_thing) {
   assert (firm_thing);
   switch (*(firm_kind *)firm_thing) {
-    case k_entity: { return "k_enitity"; } break;
-    case k_type: { return "k_type"; } break;
-#if 0
-    case k_type_class: { return "k_type_class"; } break;
-    case k_type_strct: { return "k_type_strct:"; } break;
-    case k_type_method: { return "k_type_method:"; } break;
-    case k_type_union: { return "k_type_union"; } break;
-    case k_type_array: { return "k_type_array"; } break;
-    case k_type_enumeration: { return "k_type_enumeration"; } break;
-    case k_type_pointer: { return "k_type_pointer"; } break;
-    case k_type_primitive: { return "k_type_primitive"; } break;
-#endif
-    case k_ir_node: { return "k_ir_node"; } break;
+    case k_entity  : { return "k_entity"  ;} break;
+    case k_type    : { return "k_type"    ;} break;
+    case k_ir_graph: { return "k_ir_graph";} break;
+    case k_ir_node : { return "k_ir_node" ;} break;
+    case k_ir_mode : { return "k_ir_mode" ;} break;
+    case k_ir_op   : { return "k_ir_op"   ;} break;
+    case k_tarval  : { return "k_tarval"  ;} break;
+    case k_ir_loop : { return "k_ir_loop" ;} break;
   default: break;
   }
   return "";