Code cleanup at function TAOptBase.RegInInstruction
compiler/aoptbase.pas has
Function TAOptBase.RegInInstruction(Reg: TRegister; p1: tai): Boolean;
Var
Count: longint;
Begin
result:=false;
if p1.typ<>ait_instruction then
exit;
for Count:=0 to TInstr(p1).ops-1 do
if RegInOp(Reg, TInstr(p1).oper[Count]^) then
exit(true);
result:=false;
End;
The presence of the last "result:=false;" is useless because false is already assigned at the beginning of the function. The following patch removes it. patch.diff