File tree Expand file tree Collapse file tree 1 file changed +2
-1
lines changed Expand file tree Collapse file tree 1 file changed +2
-1
lines changed Original file line number Diff line number Diff line change @@ -408,6 +408,7 @@ export class FortranLintingProvider {
408
408
case 'panic' :
409
409
case 'fatal' :
410
410
case 'error' :
411
+ case 'fatal error' :
411
412
severity = vscode . DiagnosticSeverity . Error ;
412
413
break ;
413
414
@@ -480,7 +481,7 @@ export class FortranLintingProvider {
480
481
return / ^ (?< fname > (?: \w : \\ ) ? .* ) \( (?< ln > \d + ) \) : \s * (?: # (?: (?< sev2 > \w * ) : \s * (?< msg2 > .* $ ) ) | (?< sev1 > \w * ) \s * (?< msg1 > .* $ ) (?: \s * .* \s * ) (?< cn > - * \^ ) ) / gm;
481
482
482
483
case 'nagfor' :
483
- return / ^ (?< sev1 > R e m a r k | I n f o | N o t e | W a r n i n g | Q u e s t i o n a b l e | E x t e n s i o n | D e l e t e d f e a t u r e u s e d | E r r o r | F a t a l | P a n i c ) ( \( \w + \) ) ? : (?< fname > [ \S ] + ) , l i n e (?< ln > \d + ) : (?< msg1 > .+ ) $ / gm;
484
+ return / ^ (?< sev1 > R e m a r k | I n f o | N o t e | W a r n i n g | Q u e s t i o n a b l e | E x t e n s i o n | D e l e t e d f e a t u r e u s e d | E r r o r | F a t a l (?: E r r o r ) ? | P a n i c ) ( \( \w + \) ) ? : (?< fname > [ \S ] + ) , l i n e (?< ln > \d + ) : (?< msg1 > .+ ) $ / gm;
484
485
485
486
default :
486
487
vscode . window . showErrorMessage ( 'Unsupported linter, change your linter.compiler option' ) ;
You can’t perform that action at this time.
0 commit comments