nsz Git - libfirm/blob - ir/common/old_fctnames.h

   1 /*
   2  * Project:     libFIRM
   3  * File name:   ir/ir/old_fctnames.h
   4  * Purpose:     Some makros supporting old function names.
   5  * Author:      Goetz Lindenmaier
   6  * Modified by:
   7  * Created:
   8  * CVS-ID:      $Id$
   9  * Copyright:   (c) 1998-2003 Universität Karlsruhe
  10  * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
  11  */
  12
  13
  14 #ifndef __OLD_FCTNAMES_H__
  15 #define __OLD_FCTNAMES_H__
  16
  17 /* firmstat */
  18 #define stat_init init_stat
  19
  20 /* ircons */
  21 #define add_in_edge(X, Y)     add_immBlock_pred(X, Y)
  22 #define mature_block(X)       mature_immBlock(X)
  23 #define switch_block(X)       set_cur_block(X)
  24
  25 /* irgraph */
  26 #define get_irg_ent(X)        get_irg_entity(X)
  27 #define get_irg_params        get_irg_n_locs
  28 #define get_irg_n_loc         get_irg_n_locs
  29 #define set_irg_ent(X, Y)     set_irg_entity(X, Y)
  30 #define set_irg_params        set_irg_n_loc
  31 #define no_dom                dom_none
  32 #define no_outs               outs_none
  33
  34 /* irnode.h */
  35 #define get_Return_n_res      get_Return_n_ress
  36 #define get_Sel_n_index       get_Sel_n_indexs
  37 #define get_SymConst_ptrinfo  get_SymConst_name
  38 #define set_SymConst_ptrinfo  set_SymConst_name
  39 #define get_nodes_Block(X)    get_nodes_block(X)
  40 #define set_nodes_Block(X, Y) set_nodes_block(X, Y)
  41 #define get_Start_irg(X)      get_irn_irg(X)
  42 #define get_EndReg_irg(X)     get_irn_irg(X)
  43 #define get_EndExcept_irg(X)  get_irn_irg(X)
  44 #define get_CallBegin_irg(X)  get_irn_irg(X)
  45 #define get_ip_cfop_irg(X)    get_irn_irg(X)
  46 #define skip_nop(X)           skip_Id(X)
  47
  48 #define pns_initial_exec   pn_Start_X_initial_exec
  49 #define pns_global_store   pn_Start_M
  50 #define pns_frame_base     pn_Start_P_frame_base
  51 #define pns_args           pn_Start_T_args
  52 #define pns_value_arg_base pn_Start_P_value_arg_base
  53
  54 /* irmode.h */
  55 #define get_ident_of_mode        get_mode_ident
  56 #define get_size_of_mode         get_mode_size
  57 #define get_ld_align_of_mode     get_mode_ld_align
  58 #define get_min_of_mode          get_mode_min
  59 #define get_max_of_mode          get_mode_max
  60 #define get_mode_vector_elems(X) get_mode_n_vector_elems(X)
  61 #define get_null_of_mode         get_mode_null
  62 #define get_fsigned_of_mode      get_mode_fsigned
  63 #define get_ffloat_of_mode       get_mode_ffloat
  64 #define get_mode_size(X)         { assert(get_mode_size_bytes(X) != -1); get_mode_size_bytes(X); }
  65
  66
  67 /* irop */
  68 #define floats                   op_pin_state_floats
  69 #define pinned                   op_pin_state_pinned
  70 #define op_pinned                op_pin_state
  71
  72 /* irdump */
  73 #define dump_cg_graph dump_ir_graph
  74 #define dump_cg_block_graph dump_ir_block_graph
  75 extern char *dump_file_filter;  /* use the setter instead. */
  76
  77 /* type.h */
  78 #define get_type_nameid(_t_)     get_type_ident(_t_)
  79 #define set_type_nameid(_t_,_i_) set_type_ident(_t_,_i_)
  80 #define get_class_n_member    get_class_n_members
  81 #define get_class_n_subtype   get_class_n_subtypes
  82 #define get_class_n_supertype get_class_n_supertypes
  83 #define get_struct_n_member   get_struct_n_members
  84
  85 #define get_method_n_res(X) get_method_n_ress(X)
  86
  87 /* tv.h */
  88 #define tarval_from_long(X, Y) new_tarval_from_long(Y, X)
  89 #define tarval_P_from_entity(X) new_tarval_from_entity(X, mode_P_mach)
  90 #define tarval_to_entity(X) get_tarval_entity(X)
  91 #define tarval_to_long(X) get_tarval_long(X)
  92 #define tarval_to_double(X) get_tarval_double(X)
  93 #define tarval_set_mode_output_option(X, Y) set_tarval_mode_output_option(X, Y)
  94 #define tarval_get_mode_output_option(X) get_tarval_mode_output_option(X)
  95 #define tarval_bitpattern(X) get_tarval_bitpattern(X)
  96 #define tarval_sub_bits(X, Y) get_tarval_sub_bits(X, Y)
  97 #define tarval_classify(X) classify_tarval(X)
  98
  99 #define tarval_is_entity(X) 0
 100 #define get_tarval_entity(X) ((entity *)NULL)
 101
 102 /* ident.h */
 103 #define id_to_strlen(X) get_id_strlen(X)
 104 #define id_to_str(X)    get_id_str(X)
 105 #define id_from_str(X, Y)  new_id_from_chars(X, Y)
 106
 107 #endif