- switch (*p) {
- 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:
- printf("type: %s %s: %ld (%p)\n", get_type_tpop_name(X), get_type_name(X), 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;
- default:
- printf("Cannot identify thing at (%p).\n", X);
- }
-}
+ 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:
+ printf("type: %s %s: %ld (%p)\n", get_type_tpop_name(X), get_type_name(X), 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 */