mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 11:09:27 +02:00
* fixed warning
This commit is contained in:
parent
064adbf3f8
commit
18c6e13f45
@ -467,9 +467,8 @@ uses
|
||||
begin
|
||||
if FValueStack.Count = FCtrlStack[0].height then
|
||||
begin
|
||||
if FCtrlStack[0].unreachable then
|
||||
Result:=wbt_Unknown
|
||||
else
|
||||
Result:=wbt_Unknown;
|
||||
if not FCtrlStack[0].unreachable then
|
||||
internalerror(2024013104);
|
||||
end
|
||||
else
|
||||
|
Loading…
Reference in New Issue
Block a user