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

- Removed outdated VER2_0 defines

Browse Source 
git-svn-id: trunk@19513 -
This commit is contained in:
sergei 2011-10-19 11:39:59 +00:00
parent d3e50e9aa8
commit f4023ef49e
2 changed files with 0 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/inc/variant.inc
View File

@ -294,14 +294,12 @@ end;
{$endif SUPPORT_COMP}
{$ifndef VER2_0}
{$ifndef FPUNONE}
Operator :=(const source : real) dest : variant;{$ifdef SYSTEMINLINE}inline;{$endif}
begin
VariantManager.VarFromReal(Dest,Source);
end;
{$endif}
{$endif VER2_0}
{ Misc. }
@ -502,14 +500,12 @@ end;
{$endif SUPPORT_COMP}
{$ifndef VER2_0}
{$ifndef FPUNONE}
operator :=(const source : variant) dest : real;{$ifdef SYSTEMINLINE}inline;{$endif}
begin
dest:=variantmanager.vartoreal(source);
end;
{$endif}
{$endif VER2_0}
{ Misc. }
operator :=(const source : variant) dest : currency;{$ifdef SYSTEMINLINE}inline;{$endif}
@ -850,12 +846,10 @@ operator :=(const source : olevariant) dest : comp;{$ifdef SYSTEMINLINE}inline;{
{$ifndef FPUNONE}
{$ifndef VER2_0}
operator :=(const source : olevariant) dest : real;{$ifdef SYSTEMINLINE}inline;{$endif}
begin
dest:=variantmanager.vartoreal(variant(tvardata(source)));
end;
{$endif VER2_0}
{$endif}
{ Misc. }
@ -1021,14 +1015,12 @@ operator :=(const source : comp) dest : olevariant;{$ifdef SYSTEMINLINE}inline;{
{$endif SUPPORT_COMP}
{$ifndef VER2_0}
{$ifndef FPUNONE}
operator :=(const source : real) dest : olevariant;{$ifdef SYSTEMINLINE}inline;{$endif}
begin
variantmanager.varfromreal(variant(tvardata(dest)),source);
end;
{$endif}
{$endif VER2_0}
{ Misc. }

8
rtl/inc/varianth.inc
View File

@ -278,9 +278,7 @@ operator :=(const source : extended) dest : variant;{$ifdef SYSTEMINLINE}inline;
operator :=(const source : comp) dest : variant;{$ifdef SYSTEMINLINE}inline;{$endif}
{$endif SUPPORT_COMP}
{$ifndef FPUNONE}
{$ifndef VER2_0}
operator :=(const source : real) dest : variant;{$ifdef SYSTEMINLINE}inline;{$endif}
{$endif VER2_0}
{$endif}
{ Misc. }
@ -337,9 +335,7 @@ operator :=(const source : variant) dest : extended;{$ifdef SYSTEMINLINE}inline;
operator :=(const source : variant) dest : comp;{$ifdef SYSTEMINLINE}inline;{$endif}
{$endif SUPPORT_COMP}
{$ifndef FPUNONE}
{$ifndef VER2_0}
operator :=(const source : variant) dest : real;{$ifdef SYSTEMINLINE}inline;{$endif}
{$endif VER2_0}
{$endif}
{ done by the compiler now }
@ -431,9 +427,7 @@ operator :=(const source : olevariant) dest : extended;{$ifdef SYSTEMINLINE}inli
operator :=(const source : olevariant) dest : comp;{$ifdef SYSTEMINLINE}inline;{$endif}
{$endif SUPPORT_COMP}
{$ifndef FPUNONE}
{$ifndef VER2_0}
operator :=(const source : olevariant) dest : real;{$ifdef SYSTEMINLINE}inline;{$endif}
{$endif VER2_0}
{$endif}
{ Misc. }
@ -488,9 +482,7 @@ operator :=(const source : extended) dest : olevariant;{$ifdef SYSTEMINLINE}inli
operator :=(const source : comp) dest : olevariant;{$ifdef SYSTEMINLINE}inline;{$endif}
{$endif SUPPORT_COMP}
{$ifndef FPUNONE}
{$ifndef VER2_0}
operator :=(const source : real) dest : olevariant;{$ifdef SYSTEMINLINE}inline;{$endif}
{$endif VER2_0}
{$endif}
{ Misc. }