paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-05 01:38:03 +02:00
Code Issues Packages Projects Releases Wiki Activity

* patch by lag programming: Code cleanup at function TAOptBase.RegInInstruction, resolves #40952

Browse Source
This commit is contained in:
florian 2024-10-15 22:51:39 +02:00
parent 46e5903792
commit 32d0531c71
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/aoptbase.pas
View File

@ -142,7 +142,6 @@ unit aoptbase;
for Count:=0 to TInstr(p1).ops-1 do
if RegInOp(Reg, TInstr(p1).oper[Count]^) then
exit(true);
result:=false;
End;