paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-11 12:25:59 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed typo when checking live start of references

Browse Source 
git-svn-id: trunk@22112 -
This commit is contained in:
florian 2012-08-17 19:36:10 +00:00
parent 5ceeb8aaa9
commit 53a0d3e3a3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/arm/aoptcpu.pas
View File

@ -1165,7 +1165,7 @@ Implementation
Top_Ref: Top_Ref:
begin begin
CheckLiveStart(p.oper[i]^.ref^.base); CheckLiveStart(p.oper[i]^.ref^.base);
CheckLiveStart(p.oper[i]^.ref^.base); CheckLiveStart(p.oper[i]^.ref^.index);
end; end;
Top_Shifterop: Top_Shifterop:
CheckLiveStart(p.oper[i]^.shifterop^.rs); CheckLiveStart(p.oper[i]^.shifterop^.rs);