* function round(c : currency) : int64; requires the availability of an fpu

git-svn-id: trunk@22149 -

rtl/inc/currh.inc

@@ -15,7 +15,9 @@
 
 {$ifdef FPC_CURRENCY_IS_INT64}
     function trunc(c : currency) : int64;
+{$ifndef FPUNONE}
     function round(c : currency) : int64;
+{$endif FPUNONE}
 {$ifndef cpujvm}
     function trunc(c : comp) : int64;
     function round(c : comp) : int64;

rtl/inc/gencurr.inc

@@ -29,7 +29,7 @@
         result := c
       end;
 
-
+{$ifndef FPUNONE}
     function round(c : currency) : int64;
       var
         rem, absrem: currency;
@@ -48,6 +48,7 @@
           else
             dec(result);
       end;
+{$endif FPUNONE}
 
 
 {$ifndef cpujvm}