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

* generic location for float results

Browse Source
This commit is contained in:
florian 2002-11-16 15:34:30 +00:00
parent 41b608f1bb
commit ee5a01e81a
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/ncgcal.pas
View File

@ -387,7 +387,7 @@ implementation
floatdef : floatdef :
begin begin
location_reset(location,LOC_FPUREGISTER,def_cgsize(resulttype.def)); location_reset(location,LOC_FPUREGISTER,def_cgsize(resulttype.def));
location.register:=R_ST; location.register:=fpu_result_reg;
{$ifdef x86} {$ifdef x86}
inc(trgcpu(rg).fpuvaroffset); inc(trgcpu(rg).fpuvaroffset);
{$endif x86} {$endif x86}
@ -1542,7 +1542,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.26 2002-11-15 01:58:51 peter Revision 1.27 2002-11-16 15:34:30 florian
* generic location for float results
Revision 1.26 2002/11/15 01:58:51 peter
* merged changes from 1.0.7 up to 04-11 * merged changes from 1.0.7 up to 04-11
- -V option for generating bug report tracing - -V option for generating bug report tracing
- more tracing for option parsing - more tracing for option parsing