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

* internalerror 10 for inlined math functions fixed

Browse Source
This commit is contained in:
florian 2000-01-24 20:11:10 +00:00
parent f7a1b78d88
commit 26f38e15e3
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
compiler/cg386inl.pas
View File

@ -1440,7 +1440,10 @@ implementation
inc(fpuvaroffset);
end;
LOC_REFERENCE,LOC_MEM:
floatload(pfloatdef(p^.left^.resulttype)^.typ,p^.left^.location.reference);
begin
floatload(pfloatdef(p^.left^.resulttype)^.typ,p^.left^.location.reference);
del_reference(p^.left^.location.reference);
end
else
internalerror(309991);
end;
@ -1510,7 +1513,10 @@ implementation
end.
{
$Log$
Revision 1.90 2000-01-09 23:16:05 peter
Revision 1.91 2000-01-24 20:11:10 florian
* internalerror 10 for inlined math functions fixed
Revision 1.90 2000/01/09 23:16:05 peter
* added st_default stringtype
* genstringconstnode extended with stringtype parameter using st_default
will do the old behaviour
@ -1653,4 +1659,4 @@ end.
* some fixes for qword
* start of register calling conventions
}
}