From 0cc4be6760c201da815f4a6c3b6df927c60de955 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Tobias=20Schl=C3=BCter?= Date: Wed, 25 Aug 2004 16:37:10 +0200 Subject: [PATCH] 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 --- gcc/fortran/ChangeLog | 6 ++++++ gcc/fortran/trans-const.c | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) 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 -- 2.30.2