mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-26 14:09:19 +02:00
Workaround for IE 20060521 when building the ARM compiler
git-svn-id: trunk@30733 -
This commit is contained in:
parent
5c8d0d87cd
commit
b6729a8f0b
@ -2685,8 +2685,13 @@ implementation
|
||||
end;
|
||||
|
||||
function getcoprocreg(reg: tregister): byte;
|
||||
var
|
||||
tmpr: tregister;
|
||||
begin
|
||||
result:=getsupreg(reg)-getsupreg(NR_CR0);
|
||||
{ FIXME: temp variable r is needed here to avoid Internal error 20060521 }
|
||||
{ while compiling the compiler. }
|
||||
tmpr:=NR_CR0;
|
||||
result:=getsupreg(reg)-getsupreg(tmpr);
|
||||
end;
|
||||
|
||||
function getmmreg(reg: tregister): byte;
|
||||
|
Loading…
Reference in New Issue
Block a user