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

+ give location for 64bit to fix IE 200402061

Browse Source
This commit is contained in:
mazen 2004-03-09 13:05:49 +00:00
parent 3187986483
commit 8fade03fa5
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/sparc/cpupara.pas
View File

@ -177,6 +177,7 @@ implementation
if is_64bit then if is_64bit then
begin begin
paraloc.registerhigh:=newreg(R_INTREGISTER,nextintreg,R_SUBWHOLE); paraloc.registerhigh:=newreg(R_INTREGISTER,nextintreg,R_SUBWHOLE);
paraloc.lochigh:=LOC_REGISTER;
inc(nextintreg); inc(nextintreg);
end; end;
paraloc.registerlow:=newreg(R_INTREGISTER,nextintreg,R_SUBWHOLE); paraloc.registerlow:=newreg(R_INTREGISTER,nextintreg,R_SUBWHOLE);
@ -296,7 +297,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.36 2004-02-25 14:25:47 mazen Revision 1.37 2004-03-09 13:05:49 mazen
+ give location for 64bit to fix IE 200402061
Revision 1.36 2004/02/25 14:25:47 mazen
* fix compile problem for sparc * fix compile problem for sparc
Revision 1.35 2003/11/10 19:05:50 peter Revision 1.35 2003/11/10 19:05:50 peter