diff options
author | Kaveh R. Ghazi <ghazi@caip.rutgers.edu> | 2008-07-19 16:23:52 +0000 |
---|---|---|
committer | Kaveh Ghazi <ghazi@gcc.gnu.org> | 2008-07-19 16:23:52 +0000 |
commit | 7b901ac47fb235195a14d401567b0b2677ad8a03 (patch) | |
tree | 551ba2fcd23f90c6d0662b04e981e74aa6a5abd6 /gcc/fortran/bbt.c | |
parent | a1ee985fa319b7a55e52ddd62f266e42ef9ae067 (diff) | |
download | gcc-7b901ac47fb235195a14d401567b0b2677ad8a03.zip gcc-7b901ac47fb235195a14d401567b0b2677ad8a03.tar.gz gcc-7b901ac47fb235195a14d401567b0b2677ad8a03.tar.bz2 |
gfortran.h (new): Remove macro.
* gfortran.h (new): Remove macro.
* array.c (gfc_append_constructor, match_array_list,
gfc_match_array_constructor): Likewise.
* bbt.c (insert, gfc_insert_bbt): Likewise.
* decl.c (var_element, top_var_list, top_val_list, gfc_match_data,
get_proc_name): Likewise.
* expr.c (gfc_copy_actual_arglist): Likewise.
* interface.c (compare_actual_formal, check_new_interface,
gfc_add_interface): Likewise.
* intrinsic.c gfc_convert_type_warn, gfc_convert_chartype):
Likewise.
* io.c (match_io_iterator, match_io_list): Likewise.
* match.c (match_forall_header): Likewise.
* matchexp.c (build_node): Likewise.
* module.c (gfc_match_use): Likewise.
* scanner.c (load_file): Likewise.
* st.c (gfc_append_code): Likewise.
* symbol.c (save_symbol_data, gfc_get_sym_tree, gfc_undo_symbols,
gfc_commit_symbols): Likewise.
* trans-common.c (build_field): Likewise.
* trans-decl.c (gfc_finish_var_decl): Likewise.
* trans-expr.c (gfc_free_interface_mapping,
gfc_get_interface_mapping_charlen, gfc_add_interface_mapping,
gfc_finish_interface_mapping,
gfc_apply_interface_mapping_to_expr): Likewise.
* trans.h (gfc_interface_sym_mapping): Likewise.
From-SVN: r137982
Diffstat (limited to 'gcc/fortran/bbt.c')
-rw-r--r-- | gcc/fortran/bbt.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/gcc/fortran/bbt.c b/gcc/fortran/bbt.c index e89eb57..fa60e4f 100644 --- a/gcc/fortran/bbt.c +++ b/gcc/fortran/bbt.c @@ -93,24 +93,24 @@ rotate_right (gfc_bbt *t) aborts if we find a duplicate key. */ static gfc_bbt * -insert (gfc_bbt *new, gfc_bbt *t, compare_fn compare) +insert (gfc_bbt *new_bbt, gfc_bbt *t, compare_fn compare) { int c; if (t == NULL) - return new; + return new_bbt; - c = (*compare) (new, t); + c = (*compare) (new_bbt, t); if (c < 0) { - t->left = insert (new, t->left, compare); + t->left = insert (new_bbt, t->left, compare); if (t->priority < t->left->priority) t = rotate_right (t); } else if (c > 0) { - t->right = insert (new, t->right, compare); + t->right = insert (new_bbt, t->right, compare); if (t->priority < t->right->priority) t = rotate_left (t); } @@ -126,12 +126,12 @@ insert (gfc_bbt *new, gfc_bbt *t, compare_fn compare) already exists. */ void -gfc_insert_bbt (void *root, void *new, compare_fn compare) +gfc_insert_bbt (void *root, void *new_node, compare_fn compare) { gfc_bbt **r, *n; r = (gfc_bbt **) root; - n = (gfc_bbt *) new; + n = (gfc_bbt *) new_node; n->priority = pseudo_random (); *r = insert (n, *r, compare); } |