diff options
| author | Janne Blomqvist <jb@gcc.gnu.org> | 2017-01-13 21:53:16 +0200 |
|---|---|---|
| committer | Janne Blomqvist <jb@gcc.gnu.org> | 2017-01-13 21:53:16 +0200 |
| commit | c1e9bbcc49c1b9f169c5911f3871f5df109bff9b (patch) | |
| tree | bf815e2471d2b7f7e44d76a31e98cc1d05e07b34 /gcc/fortran/trans-const.c | |
| parent | be4aa83d6ff4720fffd2c9f62c6e3082ece1937f (diff) | |
| download | gcc-c1e9bbcc49c1b9f169c5911f3871f5df109bff9b.zip gcc-c1e9bbcc49c1b9f169c5911f3871f5df109bff9b.tar.gz gcc-c1e9bbcc49c1b9f169c5911f3871f5df109bff9b.tar.bz2 | |
Revert r244448
From-SVN: r244454
Diffstat (limited to 'gcc/fortran/trans-const.c')
| -rw-r--r-- | gcc/fortran/trans-const.c | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/gcc/fortran/trans-const.c b/gcc/fortran/trans-const.c index cd4a8d7..128d47d 100644 --- a/gcc/fortran/trans-const.c +++ b/gcc/fortran/trans-const.c @@ -206,18 +206,6 @@ gfc_conv_mpz_to_tree (mpz_t i, int kind) return wide_int_to_tree (gfc_get_int_type (kind), val); } - -/* Convert a GMP integer into a tree node of type given by the type - argument. */ - -tree -gfc_conv_mpz_to_tree_type (mpz_t i, const tree type) -{ - const wide_int val = wi::from_mpz (type, i, true); - return wide_int_to_tree (type, val); -} - - /* Converts a backend tree into a GMP integer. */ void |