Browse Source

* Make real48 operators inline

git-svn-id: trunk@5690 -
daniel 18 years ago
parent
commit
29ee556451
1 changed files with 2 additions and 2 deletions
  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;