Report parameter type errors the same way with and without strict type checks.

They were being reported as "type conflict" by default, but as "duplicate symbol" if strict checks were used.
This commit is contained in:
Stephen Heumann 2022-01-11 21:23:00 -06:00
parent b5b276d0f4
commit 61a382de0b
1 changed files with 4 additions and 1 deletions

View File

@ -1784,7 +1784,10 @@ if tPtr^.kind = functionType then begin {declare the identifier}
end; {if}
end {if}
else
Error(42);
if (t1^.kind = functionType) and CompTypes(t1^.fType,tPtr^.fType) then
Error(47)
else
Error(42);
1:
if isPascal then begin
{reverse the parameter list}