nsz Git - libfirm/blob - ir/common/firm_common.c

   1 /* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
   2 * All rights reserved.
   3 *
   4 * Authors: Martin Trapp, Christian Schaefer &
   5 *          Goetz Lindenmaier
   6 *
   7 * firm_common.c:
   8 */
   9
  10 /* $Id$ */
  11
  12 #ifdef HAVE_CONFIG_H
  13 # include <config.h>
  14 #endif
  15
  16 #include "firm_common_t.h"
  17 #include "irgraph.h"
  18
  19 /* returns the kind of the thing */
  20 firm_kind
  21 get_kind (void *firm_thing) {
  22   assert (firm_thing);
  23   return *(firm_kind *)firm_thing;
  24 }
  25
  26
  27 const char* print_firm_kind(void *firm_thing) {
  28   assert (firm_thing);
  29   switch (*(firm_kind *)firm_thing) {
  30     case k_entity: { return "k_enitity"; } break;
  31     case k_type: { return "k_type"; } break;
  32 #if 0
  33     case k_type_class: { return "k_type_class"; } break;
  34     case k_type_strct: { return "k_type_strct:"; } break;
  35     case k_type_method: { return "k_type_method:"; } break;
  36     case k_type_union: { return "k_type_union"; } break;
  37     case k_type_array: { return "k_type_array"; } break;
  38     case k_type_enumeration: { return "k_type_enumeration"; } break;
  39     case k_type_pointer: { return "k_type_pointer"; } break;
  40     case k_type_primitive: { return "k_type_primitive"; } break;
  41 #endif
  42     case k_ir_node: { return "k_ir_node"; } break;
  43   default: break;
  44   }
  45   return "";
  46 }