aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/trans-const.c
diff options
context:
space:
mode:
authorrsandifo <rsandifo@138bc75d-0d04-0410-961f-82ee72b054a4>2013-11-19 07:42:09 +0000
committerrsandifo <rsandifo@138bc75d-0d04-0410-961f-82ee72b054a4>2013-11-19 07:42:09 +0000
commitf9ae6f95055fe8521d46b1f2d87f7062d9977104 (patch)
treeae798e9ef20864aa44736ca475453536bd92e00f /gcc/fortran/trans-const.c
parentdd76621fd65db1958572949115035a8c3646d846 (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.c2
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)