sdcc-3.9.0 fork implementing GNU assembler syntax

This fork aims to provide better support for stm8-binutils

1 files changed, 34 insertions, 0 deletions

diff --git a/support/regression/tests/float_trans.c b/support/regression/tests/float_trans.c
new file mode 100644
index 0000000..3db5d25
--- /dev/null
+++ b/support/regression/tests/float_trans.c
@@ -0,0 +1,34 @@
+/* Test of transcendent float functions.
+   Original from Jesus Calvino-Fraga
+
+   func: SQRTF, LOGF, POWF, TANF
+*/
+#include <testfwk.h>
+#include <math.h>
+
+#if defined (__STDC_IEC_559__) || defined (__SDCC)
+#define {func} 1
+#endif
+
+void
+testTrans(void)
+{
+#if !defined(__SDCC_pdk14) && !defined(__SDCC_pdk15) // Lack of memory
+#ifdef SQRTF
+    ASSERT(fabsf (sqrtf (5.0)     -   2.23606801) < 0.00001);
+#endif
+#ifdef LOGF
+    ASSERT(fabsf (logf (124.0)    -   4.82028150) < 0.00001);
+    ASSERT(fabsf (log10f (124.0)  -   2.09342169) < 0.00001);
+#endif
+#ifdef POWF
+  /*  too big for small model */
+# ifndef __SDCC_MODEL_SMALL
+    ASSERT(fabsf (powf (1.5, 2.0) -   2.24999976) < 0.00001);
+# endif
+#endif
+#ifdef TANF
+    ASSERT(fabsf (tanf (1.6)      - -34.23250579) < 0.00001);
+#endif
+#endif
+}