paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-07 09:59:39 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed arm compilation

Browse Source
This commit is contained in:
florian 2004-06-22 18:24:18 +00:00
parent 6de21e239d
commit 34d634c64d
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/rgobj.pas
View File

@ -1986,7 +1986,7 @@ unit rgobj;
top_shifterop: top_shifterop:
begin begin
if shifterop^.rs<>NR_NO then if shifterop^.rs<>NR_NO then
addreginfo(getsupreg(shifterop^.rs),operand_read); addreginfo(shifterop^.rs,operand_read);
end; end;
{$endif ARM} {$endif ARM}
end; end;
@ -2045,7 +2045,10 @@ unit rgobj;
end. end.
{ {
$Log$ $Log$
Revision 1.129 2004-06-20 08:55:30 florian Revision 1.130 2004-06-22 18:24:18 florian
* fixed arm compilation
Revision 1.129 2004/06/20 08:55:30 florian
* logs truncated * logs truncated
Revision 1.128 2004/06/20 08:47:33 florian Revision 1.128 2004/06/20 08:47:33 florian