diff options
Diffstat (limited to 'gcc/fortran/trans-decl.c')
| -rw-r--r-- | gcc/fortran/trans-decl.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c index b4fa7f5..14aee05 100644 --- a/gcc/fortran/trans-decl.c +++ b/gcc/fortran/trans-decl.c @@ -1618,7 +1618,7 @@ build_entry_thunks (gfc_namespace * ns) args = tree_cons (NULL_TREE, null_pointer_node, args); if (formal->sym->ts.type == BT_CHARACTER) { - tmp = convert (gfc_charlen_type_node, integer_zero_node); + tmp = build_int_cst (gfc_charlen_type_node, 0); string_args = tree_cons (NULL_TREE, tmp, string_args); } } |