From 5289f7a8c3ee78a8931c11fa0fe320a8dba5d7ed Mon Sep 17 00:00:00 2001 From: Navin P <74448943+navinp0304@users.noreply.github.com> Date: Mon, 6 Jan 2025 18:54:43 +0530 Subject: [PATCH] Changing the 2nd argument of substring due to errors in indexing fortran code by FortranXref.lex (#4689) Co-authored-by: Vladimir Kotal --- .../src/main/jflex/analysis/fortran/FortranXref.lex | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/opengrok-indexer/src/main/jflex/analysis/fortran/FortranXref.lex b/opengrok-indexer/src/main/jflex/analysis/fortran/FortranXref.lex index 037eafd4973..65d7a2ac0e6 100644 --- a/opengrok-indexer/src/main/jflex/analysis/fortran/FortranXref.lex +++ b/opengrok-indexer/src/main/jflex/analysis/fortran/FortranXref.lex @@ -93,7 +93,7 @@ File = [a-zA-Z]{FNameChar}* "." ("i"|"inc") onNonSymbolMatched(cmatch.substring(0, 1), yychar); String file = cmatch.substring(1, cmatch.length() - 1); onFilelikeMatched(file, yychar + 1); - onNonSymbolMatched(cmatch.substring(cmatch.length() - 1, 1), yychar + 1 + file.length()); + onNonSymbolMatched(cmatch.substring(cmatch.length() - 1, cmatch.length()), yychar + 1 + file.length()); } /*{Hier}