aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/data.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/data.c')
-rw-r--r--gcc/fortran/data.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/data.c b/gcc/fortran/data.c
index fa4e821..4fd84e4 100644
--- a/gcc/fortran/data.c
+++ b/gcc/fortran/data.c
@@ -164,7 +164,7 @@ create_character_initializer (gfc_expr *init, gfc_typespec *ts,
if (len > end - start)
{
- gfc_warning_now ("Initialization string starting at %L was "
+ gfc_warning_now (0, "Initialization string starting at %L was "
"truncated to fit the variable (%d/%d)",
&rvalue->where, end - start, len);
len = end - start;