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

Reply via email to