Explorar o código

* Make real48 operators inline

git-svn-id: trunk@5690 -
daniel %!s(int64=18) %!d(string=hai) anos
pai
achega
29ee556451
Modificáronse 1 ficheiros con 2 adicións e 2 borrados
  1. 2 2
      rtl/inc/system.inc

+ 2 - 2
rtl/inc/system.inc

@@ -214,14 +214,14 @@ Begin
 End;
 
 {$ifdef SUPPORT_DOUBLE}
-operator := (b:real48) d:double;
+operator := (b:real48) d:double;inline;
 begin
  D:=real2double(b);
 end;
 {$endif SUPPORT_DOUBLE}
 
 {$ifdef SUPPORT_EXTENDED}
-operator := (b:real48) e:extended;
+operator := (b:real48) e:extended;inline;
 begin
  e:=real2double(b);
 end;