X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=device%2Flib%2Fatanf.c;h=f254ae20b5dbbc524cc261ce8f0c591d2c2429cf;hb=f6431c56845af81fc20774e0cfc3f4eac16f1d73;hp=a558948a61dedecab29a7c50a6f22d7b5b86b80f;hpb=1071a6c6ae98b2f1017cc0bc323860ac0d145d8c;p=fw%2Fsdcc

diff --git a/device/lib/atanf.c b/device/lib/atanf.c
index a558948a..f254ae20 100644
--- a/device/lib/atanf.c
+++ b/device/lib/atanf.c
@@ -36,11 +36,17 @@
 #define K2  0.7320508076 /* sqrt(3)-1 */
 #define K3  1.7320508076 /* sqrt(3)   */
 
-float atanf(const float x) reentrant
+#ifdef SDCC_mcs51
+   #define myconst __code
+#else
+   #define myconst const
+#endif
+
+float atanf(const float x) _FLOAT_FUNC_REENTRANT
 {
     float f, r, g;
     int n=0;
-    static float a[]={  0.0, 0.5235987756, 1.5707963268, 1.0471975512 };
+	static myconst float a[]={  0.0, 0.5235987756, 1.5707963268, 1.0471975512 };
 
     f=fabsf(x);
     if(f>1.0)
@@ -67,4 +73,3 @@ float atanf(const float x) reentrant
     if(x<0.0) r=-r;
     return r;
 }
-