paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-20 23:01:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed web bug #2129: explicit float casts in Delphi mode must be handled by the default code

Browse Source
This commit is contained in:
florian 2003-10-26 14:11:35 +00:00
parent 4d070e2a71
commit 6906e33275
1 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
compiler/defcmp.pas
View File

@ -395,8 +395,12 @@ implementation
eq:=te_equal
else
begin
doconv:=tc_real_2_real;
eq:=te_convert_l1;
if not(explicit) or
not(m_delphi in aktmodeswitches) then
begin
doconv:=tc_real_2_real;
eq:=te_convert_l1;
end;
end;
end;
end;
@ -1217,7 +1221,10 @@ implementation
end.
{
$Log$
Revision 1.33 2003-10-14 12:23:06 florian
Revision 1.34 2003-10-26 14:11:35 florian
* fixed web bug 2129: explicit float casts in Delphi mode must be handled by the default code
Revision 1.33 2003/10/14 12:23:06 florian
* fixed 2729: overloading problem with methodvars and procvars
Revision 1.32 2003/10/10 17:48:13 peter