2
0
Эх сурвалжийг харах

* arctan, sin and cos are done in software on the arm

florian 20 жил өмнө
parent
commit
264270bd96
1 өөрчлөгдсөн 16 нэмэгдсэн , 1 устгасан
  1. 16 1
      rtl/arm/math.inc

+ 16 - 1
rtl/arm/math.inc

@@ -37,6 +37,7 @@
       runerror(207);
       result:=0;
     end;
+    { atn isn't supported by the linux fpe it seems
     {$define FPC_SYSTEM_HAS_ARCTAN}
     function fpc_arctan_real(d : extended) : extended;compilerproc;
     begin
@@ -44,6 +45,7 @@
       runerror(207);
       result:=0;
     end;
+    }
     { lgn isn't supported by the linux fpe it seems
     {$define FPC_SYSTEM_HAS_LN}
     function fpc_ln_real(d : extended) : extended;compilerproc;
@@ -53,6 +55,7 @@
       result:=0;
     end;
     }
+    { sind isn't supported by the linux fpe it seems
     {$define FPC_SYSTEM_HAS_SIN}
     function fpc_sin_real(d : extended) : extended;compilerproc;
     begin
@@ -60,6 +63,8 @@
       runerror(207);
       result:=0;
     end;
+    }
+    { cos isn't supported by the linux fpe it seems
     {$define FPC_SYSTEM_HAS_COS}
     function fpc_cos_real(d : extended) : extended;compilerproc;
     begin
@@ -67,6 +72,7 @@
       runerror(207);
       result:=0;
     end;
+    }
 {$else INTERNCONSTINTF}
     {$define FPC_SYSTEM_HAS_ABS}
     function abs(d : extended) : extended;[internproc:in_abs_extended];
@@ -74,20 +80,29 @@
     function sqr(d : extended) : extended;[internproc:in_sqr_extended];
     {$define FPC_SYSTEM_HAS_SQRT}
     function sqrt(d : extended) : extended;[internproc:in_sqrt_extended];
+    { atn isn't supported by the linux fpe it seems
     {$define FPC_SYSTEM_HAS_ARCTAN}
     function arctan(d : extended) : extended;[internproc:in_arctan_extended];
+    }
     { lgn isn't supported by the linux fpe it seems
     {$define FPC_SYSTEM_HAS_LN}
     function ln(d : extended) : extended;[internproc:in_ln_extended];
     }
+    { sind isn't supported by the linux fpe it seems
     {$define FPC_SYSTEM_HAS_SIN}
     function sin(d : extended) : extended;[internproc:in_sin_extended];
+    }
+    { cos isn't supported by the linux fpe it seems
     {$define FPC_SYSTEM_HAS_COS}
     function cos(d : extended) : extended;[internproc:in_cos_extended];
+    }
 {$endif INTERNCONSTINTF}
 {
   $Log$
-  Revision 1.5  2005-01-01 18:34:24  florian
+  Revision 1.6  2005-01-06 13:02:03  florian
+    * arctan, sin and cos are done in software on the arm
+
+  Revision 1.5  2005/01/01 18:34:24  florian
     * fixed building
 
   Revision 1.4  2004/03/16 22:02:26  florian