gcc/fortran
* trans.c (trans_runtime_error_vararg): Remove use of input_line
macro.
---
gcc/fortran/trans.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/gcc/fortran/trans.c b/gcc/fortran/trans.c
index 204cbff..7805b57 100644
--- a/gcc/fortran/trans.c
+++ b/gcc/fortran/trans.c
@@ -424,7 +424,7 @@ trans_runtime_error_vararg (bool error, locus* where, const
char* msgid,
}
else
asprintf (&message, "In file '%s', around line %d",
- gfc_source_file, input_line + 1);
+ gfc_source_file, LOCATION_LINE (input_location) + 1);
arg = gfc_build_addr_expr (pchar_type_node,
gfc_build_localized_cstring_const (message));
--
1.7.11.7