* src/SDCCsymt.c (initCSupport): Removed managling of support function
[fw/sdcc] / support / regression / tests / float.c
1 /* Float tests.
2
3    operation: ADD, SUB, MUL, DIV, REVDIV
4 */
5
6 #if 1
7   // we are in the regression tests
8   #include <testfwk.h>
9   #define DEBUG(x)
10
11   #define {operation} 1
12 #else
13   // we are standalone
14   #include <stdio.h>
15   #define DEBUG(x) x
16   #define ASSERT(x)
17   #define ADD 1
18   #define SUB 1
19   #define MUL 1
20   #define DIV 1
21   #define REVDIV 1
22 #endif
23
24 #ifdef __mcs51
25 #define STORAGE xdata
26 #define XDATA xdata
27 #else
28 #define STORAGE
29 #define XDATA
30 #endif
31
32 XDATA volatile float left, right, result;
33
34 struct {
35   float left, right, add, sub, mul, div, revdiv;
36 } STORAGE cases[]={
37   //     left  right        add        sub          mul         div   revdiv
38   {      12.8,  25.6,      38.4,     -12.8,      327.68,        0.5,  2},
39   {      12.8, -25.6,     -12.8,      38.4,     -327.68,       -0.5, -2},
40   {     -12.8,  25.6,      12.8,     -38.4,     -327.68,       -0.5, -2},
41   {     -12.8, -25.6,     -38.4,      12.8,      327.68,        0.5,  2},
42   {     100.0,  10.0,     110.0,      90.0,     1000.00,       10.0,  0.1},
43   {    1000.0,  10.0,    1010.0,     990.0,    10000.00,      100.0,  0.01},
44   {   10000.0,  10.0,   10010.0,    9990.0,   100000.00,     1000.0,  0.001},
45   {  100000.0,  10.0,  100010.0,   99990.0,  1000000.00,    10000.0,  0.0001},
46   { 1000000.0,  10.0, 1000010.0,  999990.0, 10000000.00,   100000.0,  0.00001},
47   {10000000.0,  10.0,10000010.0, 9999990.0,100000000.00,  1000000.0,  0.000001},
48   {     0x100,  0x10,     0x110,      0xf0,      0x1000,       0x10,  0.0625},
49   {    0x1000,  0x10,    0x1010,     0xff0,     0x10000,      0x100,  0.00390625},
50   {   0x10000,  0x10,   0x10010,    0xfff0,    0x100000,     0x1000,  0.00024414},
51   {  0x100000,  0x10,  0x100010,   0xffff0,   0x1000000,    0x10000,  0 /* ignore */},
52   { 0x1000000,  0x10, 0x1000010,  0xfffff0,  0x10000000,   0x100000,  0 /* ignore */},
53   {0x10000000,  0x10,0x10000010, 0xffffff0, 0x100000000,  0x1000000,  0 /* ignore */},
54 };
55
56 XDATA int tests=0, errors=0;
57
58 char compare (float is, float should) {
59   float diff = should ? is/should : 0;
60   tests++;
61   DEBUG(printf (" %1.3f (%f %f) ", is, should, diff));
62
63   if (should==0) {
64     DEBUG(printf ("IGNORED!\n"));
65     return 0;
66   }
67
68   // skip the fp roundoff errors
69   if (diff>0.999999 && diff<1.00001) {
70     DEBUG(printf ("OK!\n"));
71     ASSERT(1);
72     return 0;
73   } else {
74     errors++;
75     DEBUG(printf ("FAIL!\n"));
76     ASSERT(0);
77     return 1;
78   }
79 }
80
81 void
82 testFloatMath(void)
83 {
84   int i;
85   int t = sizeof(cases)/sizeof(cases[0]);
86   float result;
87
88   for (i=0; i<t; i++) {
89     #ifdef ADD
90       // add
91       result=cases[i].left+cases[i].right;
92       DEBUG(printf ("%1.3f + %1.3f =", cases[i].left, cases[i].right));
93       compare(result, cases[i].add);
94     #endif
95     #ifdef SUB
96       // sub
97       result=cases[i].left-cases[i].right;
98       DEBUG(printf ("%1.3f - %1.3f =", cases[i].left, cases[i].right));
99       compare(result, cases[i].sub);
100     #endif
101     #ifdef MUL
102       // mul
103       result=cases[i].left*cases[i].right;
104       DEBUG(printf ("%1.3f * %1.3f =", cases[i].left, cases[i].right));
105       compare(result, cases[i].mul);
106     #endif
107     #ifdef DIV
108       // div
109       result=cases[i].left/cases[i].right;
110       DEBUG(printf ("%1.3f / %1.3f =", cases[i].left, cases[i].right));
111       compare(result, cases[i].div);
112     #endif
113     #ifdef REVDIV
114       // revdiv
115       result=cases[i].right/cases[i].left;
116       DEBUG(printf ("%1.3f / %1.3f =", cases[i].right, cases[i].left));
117       compare(result, cases[i].revdiv);
118     #endif
119   }
120   DEBUG(printf ("%d tests, %d errors\n", tests, errors));
121 }
122
123 #ifndef REENTRANT
124 void main(void) {
125   testFloatMath();
126 }
127 #endif