From: Tobias Schlüter Date: Wed, 25 Aug 2004 14:37:10 +0000 (+0200) Subject: trans-const.c (gfc_conv_mpz_to_tree): Change call to build_int_cst to build_int_cst_w... X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=0cc4be6760c201da815f4a6c3b6df927c60de955;p=gcc.git trans-const.c (gfc_conv_mpz_to_tree): Change call to build_int_cst to build_int_cst_wide in accordance to Nathan's... * trans-const.c (gfc_conv_mpz_to_tree): Change call to build_int_cst to build_int_cst_wide in accordance to Nathan's previous patch. From-SVN: r86549 --- diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 0d2f8b6a1b7..0e8aab90b36 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,9 @@ +2004-08-25 Tobias Schlueter + + * trans-const.c (gfc_conv_mpz_to_tree): Change call to + build_int_cst to build_int_cst_wide in accordance to Nathan's + previous patch. + 2004-08-25 Nathan Sidwell * trans-array.c (gfc_trans_array_constructor_value): Adjust diff --git a/gcc/fortran/trans-const.c b/gcc/fortran/trans-const.c index 2f485a75951..25a945905e4 100644 --- a/gcc/fortran/trans-const.c +++ b/gcc/fortran/trans-const.c @@ -218,7 +218,7 @@ gfc_conv_mpz_to_tree (mpz_t i, int kind) } } - return build_int_cst (gfc_get_int_type (kind), low, high); + return build_int_cst_wide (gfc_get_int_type (kind), low, high); } /* Converts a real constant into backend form. Uses an intermediate string