bug(linter): adds support for old GFortran

gnikit · gnikit · commit 3bcfa6c6ea81 · 2023-02-05T15:25:15.000Z
GFortran v4.x.x used a dot (.) instead of a : to indicate the
column number where an error occurred
diff --git a/src/lib/linters.ts b/src/lib/linters.ts
@@ -53,7 +53,7 @@ export class GNULinter extends Linter {
   constructor() {
     super(
       'gfortran',
-      /(?:^(?<fname>(?:\w:\\)?.*):(?<ln>\d+):(?<cn>\d+):(?:\s+.*\s+.*?\s+)(?<sev1>Error|Warning|Fatal Error):\s(?<msg1>.*)$)|(?:^(?<bin>\w+):\s*(?<sev2>\w+\s*\w*):\s*(?<msg2>.*)$)/gm,
+      /(?:^(?<fname>(?:\w:\\)?.*):(?<ln>\d+):(?<cn>\d+)[:.](?:\s+.*\s+.*?\s+)(?<sev1>Error|Warning|Fatal Error):\s(?<msg1>.*)$)|(?:^(?<bin>\w+):\s*(?<sev2>\w+\s*\w*):\s*(?<msg2>.*)$)/gm,
       {
         errors: ['error', 'fatal error'],
         warnings: ['warning'],

Original file line number	Diff line number	Diff line change
`@@ -53,7 +53,7 @@ export class GNULinter extends Linter {`
`53`	`53`	`constructor() {`
`54`	`54`	`super(`
`55`	`55`	`'gfortran',`
`56`		`- /(?:^(?<fname>(?:\w:\\)?.):(?<ln>\d+):(?<cn>\d+):(?:\s+.\s+.?\s+)(?<sev1>Error\|Warning\|Fatal Error):\s(?<msg1>.)$)\|(?:^(?<bin>\w+):\s(?<sev2>\w+\s\w):\s(?<msg2>.*)$)/gm,`
	`56`	`+ /(?:^(?<fname>(?:\w:\\)?.):(?<ln>\d+):(?<cn>\d+)[:.](?:\s+.\s+.?\s+)(?<sev1>Error\|Warning\|Fatal Error):\s(?<msg1>.)$)\|(?:^(?<bin>\w+):\s(?<sev2>\w+\s\w):\s(?<msg2>.*)$)/gm,`
`57`	`57`	`{`
`58`	`58`	`errors: ['error', 'fatal error'],`
`59`	`59`	`warnings: ['warning'],`