From: Matthias Braun <matze@braunis.de>
Date: Thu, 4 Nov 2010 12:15:24 +0000 (+0000)
Subject: Remove the unused functions print_firm_kind() and firm_identify_thing().
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=fd269bc519af571ad9a96afd65bcd504f3034f8b;p=libfirm

Remove the unused functions print_firm_kind() and firm_identify_thing().

[r28126]
---

diff --git a/include/libfirm/firm_common.h b/include/libfirm/firm_common.h
index e8b4e1684..6e3105382 100644
--- a/include/libfirm/firm_common.h
+++ b/include/libfirm/firm_common.h
@@ -148,12 +148,6 @@ typedef enum {
  */
 FIRM_API firm_kind get_kind(const void *firm_thing);
 
-/** Returns the kind of a thing as a string. */
-FIRM_API const char *print_firm_kind(void *firm_thing);
-
-/** Print an identification of a firm thing. */
-FIRM_API void firm_identify_thing(void *X);
-
 #include "end.h"
 
 #endif
diff --git a/ir/common/firm_common.c b/ir/common/firm_common.c
index 35db7cf48..2196b9c73 100644
--- a/ir/common/firm_common.c
+++ b/ir/common/firm_common.c
@@ -39,84 +39,3 @@ firm_kind get_kind(const void *firm_thing)
 {
 	return POINTER_READ(firm_thing, sizeof(firm_kind)) ? *(firm_kind *)firm_thing : k_BAD;
 }  /* get_kind */
-
-const char *print_firm_kind(void *firm_thing)
-{
-	if (! firm_thing)
-		return "(NULL)";
-
-	switch (*(firm_kind *)firm_thing) {
-	case k_entity                 : return "k_entity";
-	case k_type                   : return "k_type";
-	case k_ir_graph               : return "k_ir_graph";
-	case k_ir_node                : return "k_ir_node";
-	case k_ir_mode                : return "k_ir_mode";
-	case k_ir_op                  : return "k_ir_op";
-	case k_tarval                 : return "k_tarval";
-	case k_ir_loop                : return "k_ir_loop";
-	case k_ir_compound_graph_path : return "k_ir_compound_graph_path";
-	case k_ir_extblk              : return "k_ir_extblk";
-	case k_ir_prog                : return "k_ir_prog";
-	case k_ir_region              : return "k_ir_region";
-
-	default: return "";
-	}
-}  /* print_firm_kind */
-
-/*
- * identify a firm thing
- */
-void firm_identify_thing(void *X)
-{
-	if (! X) {
-		printf("(NULL)\n");
-		return;
-	}
-
-	switch (get_kind(X)) {
-	case k_BAD:
-		printf("BAD: (%p)\n", X);
-		break;
-	case k_entity:
-		printf("entity: %s: %ld (%p)\n", get_entity_name(X), get_entity_nr(X), X);
-		break;
-	case k_type: {
-		char buf[256];
-		ir_print_type(buf, sizeof(buf), X);
-		printf("type: %s '%s': %ld (%p)\n", get_type_tpop_name(X), buf, get_type_nr(X), X);
-		break;
-	}
-	case k_ir_graph:
-		printf("graph: %s: %ld (%p)\n", get_entity_name(get_irg_entity(X)), get_irg_graph_nr(X), X);
-		break;
-	case k_ir_node:
-		printf("irnode: %s %s %ld (%p)\n", get_irn_opname(X), get_mode_name(get_irn_mode(X)), get_irn_node_nr(X), X);
-		break;
-	case k_ir_mode:
-		printf("mode %s: (%p)\n", get_mode_name(X), X);
-		break;
-	case k_ir_op:
-		printf("op %s: (%p)\n", get_op_name(X), X);
-		break;
-	case k_tarval:
-		printf("tarval : "); tarval_printf(X); printf(" (%p)\n", X);
-		break;
-	case k_ir_loop:
-		printf("loop: with depth %d: (%p)\n", get_loop_depth(X), X);
-		break;
-	case k_ir_compound_graph_path:
-		printf("compound_graph_path: (%p)\n", X);
-		break;
-	case k_ir_extblk:
-		printf("extended block: (%p)\n", X);
-		break;
-	case k_ir_prog:
-		printf("irp: (%p)\n", X);
-		break;
-	case k_ir_region:
-		printf("region: (%p)\n", X);
-		break;
-	default:
-		printf("Cannot identify thing at (%p).\n", X);
-	}
-}  /* firm_identify_thing */