diff options
author | rsandifo <rsandifo@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-11-19 07:42:09 +0000 |
---|---|---|
committer | rsandifo <rsandifo@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-11-19 07:42:09 +0000 |
commit | f9ae6f95055fe8521d46b1f2d87f7062d9977104 (patch) | |
tree | ae798e9ef20864aa44736ca475453536bd92e00f /gcc/fortran/trans-const.c | |
parent | dd76621fd65db1958572949115035a8c3646d846 (diff) |
Remove tree_to_hwi.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/wide-int@205007 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/trans-const.c')
-rw-r--r-- | gcc/fortran/trans-const.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-const.c b/gcc/fortran/trans-const.c index 1ff33e5c92a..ad2b4d23b39 100644 --- a/gcc/fortran/trans-const.c +++ b/gcc/fortran/trans-const.c @@ -147,7 +147,7 @@ gfc_conv_string_init (tree length, gfc_expr * expr) gcc_assert (expr->ts.type == BT_CHARACTER); gcc_assert (cst_fits_uhwi_p (length)); - len = tree_to_hwi (length); + len = TREE_INT_CST_LOW (length); slen = expr->value.character.length; if (len > slen) |