1 /* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
2 ** All rights reserved.
4 ** Authors: Martin Trapp, Christian Schaefer &
13 /* returns the kind of the thing */
15 get_kind (void *firm_thing) {
16 return *(firm_kind *)firm_thing;
20 const char* print_firm_kind(void *firm_thing) {
21 switch (*(firm_kind *)firm_thing) {
22 case k_entity: { return "k_enitity"; } break;
23 case k_type_class: { return "k_type_class"; } break;
24 case k_type_strct: { return "k_type_strct:"; } break;
25 case k_type_method: { return "k_type_method:"; } break;
26 case k_type_union: { return "k_type_union"; } break;
27 case k_type_array: { return "k_type_array"; } break;
28 case k_type_enumeration: { return "k_type_enumeration"; } break;
29 case k_type_pointer: { return "k_type_pointer"; } break;
30 case k_type_primitive: { return "k_type_primitive"; } break;
31 case k_ir_node: { return "k_ir_node"; } break;