diff --git a/src/compiler/Checker-RepeatedVars.ref b/src/compiler/Checker-RepeatedVars.ref index cc1313a6..d9028400 100644 --- a/src/compiler/Checker-RepeatedVars.ref +++ b/src/compiler/Checker-RepeatedVars.ref @@ -1,13 +1,14 @@ $ENTRY CheckRepeatedVars { - (e._ repeated repeated-maybe e._) (e.AST) - = ; - (e._ repeated e._) (e.AST) - = ; - (e._ repeated-maybe e._) (e.AST) - = ; - (e._) (e.AST) = ; - = + (e.WarningIds) (e.AST), :, : True + = ; + (e._ repeated e._) (e.AST) + = ; + (e._ repeated-maybe e._) (e.AST) + = ; + (e._) (e.AST) + = ; + = } CheckRepeatedInLastSentences { @@ -18,6 +19,12 @@ CheckRepeatedInAssignments { = ; } +IsBothWarningsEnabled { + (e._ repeated e._ repeated-maybe e._) = True; + (e._ repeated-maybe e._ repeated e._) = True; + e._ = False; +} + CreateRepeatedVariableWarning { repeated t.SrcPos s.Mode e.Index = (Warning