From 4cac45205fbdebaec7faa43b10c7e8be1f090080 Mon Sep 17 00:00:00 2001
From: "James K. Lowden" <jklowden@symas.com>
Date: Wed, 8 Jan 2025 18:14:02 -0500
Subject: [PATCH] parser line numbers lag the scanner

---
 gcc/cobol/parse_ante.h | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/cobol/parse_ante.h b/gcc/cobol/parse_ante.h
index 00ba21f2f9a7..2ac877f3c955 100644
--- a/gcc/cobol/parse_ante.h
+++ b/gcc/cobol/parse_ante.h
@@ -3542,7 +3542,7 @@ const char * keyword_str( int token );
 static YYLTYPE current_location;
 extern YYLTYPE yylloc;
 
-const YYLTYPE& cobol_location() { return yylloc; }
+const YYLTYPE& cobol_location() { return current_location; }
 
 static inline YYLTYPE
 location_set( const YYLTYPE& loc ) {
-- 
GitLab