Changeset 6a5bd1c in rtems


Ignore:
Timestamp:
05/22/12 08:49:21 (11 years ago)
Author:
Sebastian Huber <sebastian.huber@…>
Branches:
4.11, 5, master
Children:
7aba2ea, da0e045
Parents:
a80a108
git-author:
Sebastian Huber <sebastian.huber@…> (05/22/12 08:49:21)
git-committer:
Sebastian Huber <sebastian.huber@…> (05/22/12 08:52:41)
Message:

libtests/math*: Avoid generated files

Use C pre-processor instead of shell commands.

Location:
testsuites/libtests
Files:
1 added
1 deleted
6 edited

Legend:

Unmodified
Added
Removed

  • testsuites/libtests/math/Makefile.am

    ra80a108 r6a5bd1c  
    11rtems_tests_PROGRAMS = math
    22math_SOURCES = init.c domath.c
    3 EXTRA_DIST = $(srcdir)/../math/domath.in
    4 
    5 $(srcdir)/domath.c: $(srcdir)/../math/domath.in
    6         sed -e 's,[@]FTYPE[@],double,' \
    7         -e 's,[@]FSUFFIX[@], ,g' \
    8         -e 's,[@]FGUARD[@],NO_DOUBLE,' \
    9         $(srcdir)/../math/domath.in > $(srcdir)/domath.c
    103
    114dist_rtems_tests_DATA = math.scn
    … …  
    158include $(top_srcdir)/../automake/leaf.am
    169
     10math_CPPFLAGS = $(AM_CPPFLAGS) -I$(top_srcdir)/math
    1711math_LDADD = -lm
    1812

  • testsuites/libtests/math/domath.c

    ra80a108 r6a5bd1c  
    1212
    1313#ifdef HAVE_CONFIG_H
    14 #include "config.h"
     14  #include "config.h"
    1515#endif
    1616
    17 #include <math.h>
    18 #include <stdio.h>
    19 
    20 #ifndef M_PI_2
    21 #define M_PI_2 1.57079632679489661923
     17#ifdef NO_DOUBLE
     18  #define PROVIDE_EMPTY_FUNC
    2219#endif
    2320
    24 #ifndef M_PI_4
    25 #define M_PI_4 0.78539816339744830962
    26 #endif
     21#define FTYPE double
     22#define PRI "%f"
    2723
    28 extern void domath  (void);
    29 
    30 void
    31 domath  (void)
    32 {
    33 #ifndef NO_DOUBLE
    34   double f1;
    35   double f2;
    36 
    37   int i1;
    38 
    39   f1 = acos (0.0);
    40   fprintf( stdout, "acos           : %f\n", f1);
    41 
    42   f1 = acosh (0.0);
    43   fprintf( stdout, "acosh          : %f\n", f1);
    44 
    45   f1 = asin (1.0);
    46   fprintf( stdout, "asin           : %f\n", f1);
    47 
    48   f1 = asinh (1.0);
    49   fprintf( stdout, "asinh          : %f\n", f1);
    50 
    51   f1 = atan (M_PI_4);
    52   fprintf( stdout, "atan           : %f\n", f1);
    53 
    54   f1 = atan2 (2.3, 2.3);
    55   fprintf( stdout, "atan2          : %f\n", f1);
    56 
    57   f1 = atanh (1.0);
    58   fprintf( stdout, "atanh          : %f\n", f1);
    59 
    60   f1 = cbrt (27.0);
    61   fprintf( stdout, "cbrt           : %f\n", f1);
    62 
    63   f1 = ceil (3.5);
    64   fprintf( stdout, "ceil           : %f\n", f1);
    65 
    66   f1 = copysign (3.5, -2.5);
    67   fprintf( stdout, "copysign       : %f\n", f1);
    68 
    69   f1 = cos (M_PI_2);
    70   fprintf( stdout, "cos            : %f\n", f1);
    71 
    72   f1 = cosh (M_PI_2);
    73   fprintf( stdout, "cosh           : %f\n", f1);
    74 
    75   f1 = erf (42.0);
    76   fprintf( stdout, "erf            : %f\n", f1);
    77 
    78   f1 = erfc (42.0);
    79   fprintf( stdout, "erfc           : %f\n", f1);
    80 
    81   f1 = exp (0.42);
    82   fprintf( stdout, "exp            : %f\n", f1);
    83 
    84   f1 = exp2 (0.42);
    85   fprintf( stdout, "exp2           : %f\n", f1);
    86 
    87   f1 = expm1 (0.00042);
    88   fprintf( stdout, "expm1          : %f\n", f1);
    89 
    90   f1 = fabs (-1.123);
    91   fprintf( stdout, "fabs           : %f\n", f1);
    92 
    93   f1 = fdim (1.123, 2.123);
    94   fprintf( stdout, "fdim           : %f\n", f1);
    95 
    96   f1 = floor (0.5);
    97   fprintf( stdout, "floor          : %f\n", f1);
    98   f1 = floor (-0.5);
    99   fprintf( stdout, "floor          : %f\n", f1);
    100 
    101   f1 = fma (2.1, 2.2, 3.01);
    102   fprintf( stdout, "fma            : %f\n", f1);
    103 
    104   f1 = fmax (-0.42, 0.42);
    105   fprintf( stdout, "fmax           : %f\n", f1);
    106 
    107   f1 = fmin (-0.42, 0.42);
    108   fprintf( stdout, "fmin           : %f\n", f1);
    109 
    110   f1 = fmod (42.0, 3.0);
    111   fprintf( stdout, "fmod           : %f\n", f1);
    112 
    113   /* no type-specific variant */
    114   i1 = fpclassify(1.0);
    115   fprintf( stdout, "fpclassify     : %d\n", i1);
    116 
    117   f1 = frexp (42.0, &i1);
    118   fprintf( stdout, "frexp          : %f\n", f1);
    119 
    120   f1 = hypot (42.0, 42.0);
    121   fprintf( stdout, "hypot          : %f\n", f1);
    122 
    123   i1 = ilogb (42.0);
    124   fprintf( stdout, "ilogb          : %d\n", i1);
    125 
    126   /* no type-specific variant */
    127   i1 = isfinite(3.0);
    128   fprintf( stdout, "isfinite       : %d\n", i1);
    129 
    130   /* no type-specific variant */
    131   i1 = isgreater(3.0, 3.1);
    132   fprintf( stdout, "isgreater      : %d\n", i1);
    133 
    134   /* no type-specific variant */
    135   i1 = isgreaterequal(3.0, 3.1);
    136   fprintf( stdout, "isgreaterequal : %d\n", i1);
    137 
    138   /* no type-specific variant */
    139   i1 = isinf(3.0);
    140   fprintf( stdout, "isinf          : %d\n", i1);
    141 
    142   /* no type-specific variant */
    143   i1 = isless(3.0, 3.1);
    144   fprintf( stdout, "isless         : %d\n", i1);
    145 
    146   /* no type-specific variant */
    147   i1 = islessequal(3.0, 3.1);
    148   fprintf( stdout, "islessequal    : %d\n", i1);
    149 
    150   /* no type-specific variant */
    151   i1 = islessgreater(3.0, 3.1);
    152   fprintf( stdout, "islessgreater  : %d\n", i1);
    153 
    154   /* no type-specific variant */
    155   i1 = isnan(0.0);
    156   fprintf( stdout, "isnan          : %d\n", i1);
    157 
    158   /* no type-specific variant */
    159   i1 = isnormal(3.0);
    160   fprintf( stdout, "isnormal       : %d\n", i1);
    161 
    162   /* no type-specific variant */
    163   f1 = isunordered(1.0, 2.0);
    164   fprintf( stdout, "isunordered    : %d\n", i1);
    165 
    166   f1 = j0 (1.2);
    167   fprintf( stdout, "j0             : %f\n", f1);
    168 
    169   f1 = j1 (1.2);
    170   fprintf( stdout, "j1             : %f\n", f1);
    171 
    172   f1 = jn (2,1.2);
    173   fprintf( stdout, "jn             : %f\n", f1);
    174 
    175   f1 = ldexp (1.2,3);
    176   fprintf( stdout, "ldexp          : %f\n", f1);
    177 
    178   f1 = lgamma (42.0);
    179   fprintf( stdout, "lgamma         : %f\n", f1);
    180 
    181   f1 = llrint (-0.5);
    182   fprintf( stdout, "llrint         : %f\n", f1);
    183   f1 = llrint (0.5);
    184   fprintf( stdout, "llrint         : %f\n", f1);
    185 
    186   f1 = llround (-0.5);
    187   fprintf( stdout, "lround         : %f\n", f1);
    188   f1 = llround (0.5);
    189   fprintf( stdout, "lround         : %f\n", f1);
    190 
    191   f1 = log (42.0);
    192   fprintf( stdout, "log            : %f\n", f1);
    193 
    194   f1 = log10 (42.0);
    195   fprintf( stdout, "log10          : %f\n", f1);
    196 
    197   f1 = log1p (42.0);
    198   fprintf( stdout, "log1p          : %f\n", f1);
    199 
    200   f1 = log2 (42.0);
    201   fprintf( stdout, "log2           : %f\n", f1);
    202 
    203   f1 = logb (42.0);
    204   fprintf( stdout, "logb           : %f\n", f1);
    205 
    206   f1 = lrint (-0.5);
    207   fprintf( stdout, "lrint          : %f\n", f1);
    208   f1 = lrint (0.5);
    209   fprintf( stdout, "lrint          : %f\n", f1);
    210 
    211   f1 = lround (-0.5);
    212   fprintf( stdout, "lround         : %f\n", f1);
    213   f1 = lround (0.5);
    214   fprintf( stdout, "lround         : %f\n", f1);
    215 
    216   f1 = modf (42.0,&f2);
    217   fprintf( stdout, "lmodf          : %f\n", f1);
    218 
    219   f1 = nan ("");
    220   fprintf( stdout, "nan            : %f\n", f1);
    221 
    222   f1 = nearbyint (1.5);
    223   fprintf( stdout, "nearbyint      : %f\n", f1);
    224 
    225   f1 = nextafter (1.5,2.0);
    226   fprintf( stdout, "nextafter      : %f\n", f1);
    227 
    228   f1 = pow (3.01, 2.0);
    229   fprintf( stdout, "pow            : %f\n", f1);
    230 
    231   f1 = remainder (3.01,2.0);
    232   fprintf( stdout, "remainder      : %f\n", f1);
    233 
    234   f1 = remquo (29.0,3.0,&i1);
    235   fprintf( stdout, "remquo         : %f\n", f1);
    236 
    237   f1 = rint (0.5);
    238   fprintf( stdout, "rint           : %f\n", f1);
    239   f1 = rint (-0.5);
    240   fprintf( stdout, "rint           : %f\n", f1);
    241 
    242   f1 = round (0.5);
    243   fprintf( stdout, "round          : %f\n", f1);
    244   f1 = round (-0.5);
    245   fprintf( stdout, "round          : %f\n", f1);
    246 
    247   f1 = scalbln (1.2,3);
    248   fprintf( stdout, "scalbln        : %f\n", f1);
    249 
    250   f1 = scalbn (1.2,3);
    251   fprintf( stdout, "scalbn         : %f\n", f1);
    252 
    253   /* no type-specific variant */
    254   i1 = signbit(1.0);
    255   fprintf( stdout, "signbit        : %i\n", i1);
    256 
    257   f1 = sin (M_PI_4);
    258   fprintf( stdout, "sin            : %f\n", f1);
    259 
    260   f1 = sinh (M_PI_4);
    261   fprintf( stdout, "sinh           : %f\n", f1);
    262 
    263   f1 = sqrt (9.0);
    264   fprintf( stdout, "sqrt           : %f\n", f1);
    265 
    266   f1 = tan (M_PI_4);
    267   fprintf( stdout, "tan            : %f\n", f1);
    268 
    269   f1 = tanh (M_PI_4);
    270   fprintf( stdout, "tanh           : %f\n", f1);
    271 
    272   f1 = tgamma (2.1);
    273   fprintf( stdout, "tgamma         : %f\n", f1);
    274 
    275   f1 = trunc (3.5);
    276   fprintf( stdout, "trunc          : %f\n", f1);
    277 
    278   f1 = y0 (1.2);
    279   fprintf( stdout, "y0             : %f\n", f1);
    280 
    281   f1 = y1 (1.2);
    282   fprintf( stdout, "y1             : %f\n", f1);
    283 
    284   f1 = yn (3,1.2);
    285   fprintf( stdout, "yn             : %f\n", f1);
    286 #endif
    287 }
     24#include <domath.h>

  • testsuites/libtests/mathf/Makefile.am

    ra80a108 r6a5bd1c  
    11rtems_tests_PROGRAMS = mathf
    22mathf_SOURCES = init.c domathf.c
    3 EXTRA_DIST = $(srcdir)/../math/domath.in
    4 
    5 $(srcdir)/domathf.c: $(srcdir)/../math/domath.in
    6         sed -e 's,[@]FTYPE[@],float,' \
    7         -e 's,[@]FSUFFIX[@],f,g' \
    8         -e 's,[@]FGUARD[@],NO_FLOAT,' \
    9         $(srcdir)/../math/domath.in > $(srcdir)/domathf.c
    103
    114dist_rtems_tests_DATA = mathf.scn
    … …  
    158include $(top_srcdir)/../automake/leaf.am
    169
     10mathf_CPPFLAGS = $(AM_CPPFLAGS) -I$(top_srcdir)/math
    1711mathf_LDADD = -lm
    1812

  • testsuites/libtests/mathf/domathf.c

    ra80a108 r6a5bd1c  
    1212
    1313#ifdef HAVE_CONFIG_H
    14 #include "config.h"
     14  #include "config.h"
    1515#endif
    1616
    17 #include <math.h>
    18 #include <stdio.h>
    19 
    20 #ifndef M_PI_2
    21 #define M_PI_2 1.57079632679489661923
     17#ifdef NO_FLOAT
     18  #define PROVIDE_EMPTY_FUNC
    2219#endif
    2320
    24 #ifndef M_PI_4
    25 #define M_PI_4 0.78539816339744830962
    26 #endif
     21#define SUFFIX f
     22#define FTYPE float
     23#define PRI "%f"
    2724
    28 extern void domathf (void);
    29 
    30 void
    31 domathf (void)
    32 {
    33 #ifndef NO_FLOAT
    34   float f1;
    35   float f2;
    36 
    37   int i1;
    38 
    39   f1 = acosf(0.0);
    40   fprintf( stdout, "acosf          : %f\n", f1);
    41 
    42   f1 = acoshf(0.0);
    43   fprintf( stdout, "acoshf         : %f\n", f1);
    44 
    45   f1 = asinf(1.0);
    46   fprintf( stdout, "asinf          : %f\n", f1);
    47 
    48   f1 = asinhf(1.0);
    49   fprintf( stdout, "asinhf         : %f\n", f1);
    50 
    51   f1 = atanf(M_PI_4);
    52   fprintf( stdout, "atanf          : %f\n", f1);
    53 
    54   f1 = atan2f(2.3, 2.3);
    55   fprintf( stdout, "atan2f         : %f\n", f1);
    56 
    57   f1 = atanhf(1.0);
    58   fprintf( stdout, "atanhf         : %f\n", f1);
    59 
    60   f1 = cbrtf(27.0);
    61   fprintf( stdout, "cbrtf          : %f\n", f1);
    62 
    63   f1 = ceilf(3.5);
    64   fprintf( stdout, "ceilf          : %f\n", f1);
    65 
    66   f1 = copysignf(3.5, -2.5);
    67   fprintf( stdout, "copysignf      : %f\n", f1);
    68 
    69   f1 = cosf(M_PI_2);
    70   fprintf( stdout, "cosf           : %f\n", f1);
    71 
    72   f1 = coshf(M_PI_2);
    73   fprintf( stdout, "coshf          : %f\n", f1);
    74 
    75   f1 = erff(42.0);
    76   fprintf( stdout, "erff           : %f\n", f1);
    77 
    78   f1 = erfcf(42.0);
    79   fprintf( stdout, "erfcf          : %f\n", f1);
    80 
    81   f1 = expf(0.42);
    82   fprintf( stdout, "expf           : %f\n", f1);
    83 
    84   f1 = exp2f(0.42);
    85   fprintf( stdout, "exp2f          : %f\n", f1);
    86 
    87   f1 = expm1f(0.00042);
    88   fprintf( stdout, "expm1f         : %f\n", f1);
    89 
    90   f1 = fabsf(-1.123);
    91   fprintf( stdout, "fabsf          : %f\n", f1);
    92 
    93   f1 = fdimf(1.123, 2.123);
    94   fprintf( stdout, "fdimf          : %f\n", f1);
    95 
    96   f1 = floorf(0.5);
    97   fprintf( stdout, "floorf         : %f\n", f1);
    98   f1 = floorf(-0.5);
    99   fprintf( stdout, "floorf         : %f\n", f1);
    100 
    101   f1 = fmaf(2.1, 2.2, 3.01);
    102   fprintf( stdout, "fmaf           : %f\n", f1);
    103 
    104   f1 = fmaxf(-0.42, 0.42);
    105   fprintf( stdout, "fmaxf          : %f\n", f1);
    106 
    107   f1 = fminf(-0.42, 0.42);
    108   fprintf( stdout, "fminf          : %f\n", f1);
    109 
    110   f1 = fmodf(42.0, 3.0);
    111   fprintf( stdout, "fmodf          : %f\n", f1);
    112 
    113   /* no type-specific variant */
    114   i1 = fpclassify(1.0);
    115   fprintf( stdout, "fpclassify     : %d\n", i1);
    116 
    117   f1 = frexpf(42.0, &i1);
    118   fprintf( stdout, "frexpf         : %f\n", f1);
    119 
    120   f1 = hypotf(42.0, 42.0);
    121   fprintf( stdout, "hypotf         : %f\n", f1);
    122 
    123   i1 = ilogbf(42.0);
    124   fprintf( stdout, "ilogbf         : %d\n", i1);
    125 
    126   /* no type-specific variant */
    127   i1 = isfinite(3.0);
    128   fprintf( stdout, "isfinite       : %d\n", i1);
    129 
    130   /* no type-specific variant */
    131   i1 = isgreater(3.0, 3.1);
    132   fprintf( stdout, "isgreater      : %d\n", i1);
    133 
    134   /* no type-specific variant */
    135   i1 = isgreaterequal(3.0, 3.1);
    136   fprintf( stdout, "isgreaterequal : %d\n", i1);
    137 
    138   /* no type-specific variant */
    139   i1 = isinf(3.0);
    140   fprintf( stdout, "isinf          : %d\n", i1);
    141 
    142   /* no type-specific variant */
    143   i1 = isless(3.0, 3.1);
    144   fprintf( stdout, "isless         : %d\n", i1);
    145 
    146   /* no type-specific variant */
    147   i1 = islessequal(3.0, 3.1);
    148   fprintf( stdout, "islessequal    : %d\n", i1);
    149 
    150   /* no type-specific variant */
    151   i1 = islessgreater(3.0, 3.1);
    152   fprintf( stdout, "islessgreater  : %d\n", i1);
    153 
    154   /* no type-specific variant */
    155   i1 = isnan(0.0);
    156   fprintf( stdout, "isnan          : %d\n", i1);
    157 
    158   /* no type-specific variant */
    159   i1 = isnormal(3.0);
    160   fprintf( stdout, "isnormal       : %d\n", i1);
    161 
    162   /* no type-specific variant */
    163   f1 = isunordered(1.0, 2.0);
    164   fprintf( stdout, "isunordered    : %d\n", i1);
    165 
    166   f1 = j0f(1.2);
    167   fprintf( stdout, "j0f            : %f\n", f1);
    168 
    169   f1 = j1f(1.2);
    170   fprintf( stdout, "j1f            : %f\n", f1);
    171 
    172   f1 = jnf(2,1.2);
    173   fprintf( stdout, "jnf            : %f\n", f1);
    174 
    175   f1 = ldexpf(1.2,3);
    176   fprintf( stdout, "ldexpf         : %f\n", f1);
    177 
    178   f1 = lgammaf(42.0);
    179   fprintf( stdout, "lgammaf        : %f\n", f1);
    180 
    181   f1 = llrintf(-0.5);
    182   fprintf( stdout, "llrintf        : %f\n", f1);
    183   f1 = llrintf(0.5);
    184   fprintf( stdout, "llrintf        : %f\n", f1);
    185 
    186   f1 = llroundf(-0.5);
    187   fprintf( stdout, "lroundf        : %f\n", f1);
    188   f1 = llroundf(0.5);
    189   fprintf( stdout, "lroundf        : %f\n", f1);
    190 
    191   f1 = logf(42.0);
    192   fprintf( stdout, "logf           : %f\n", f1);
    193 
    194   f1 = log10f(42.0);
    195   fprintf( stdout, "log10f         : %f\n", f1);
    196 
    197   f1 = log1pf(42.0);
    198   fprintf( stdout, "log1pf         : %f\n", f1);
    199 
    200   f1 = log2f(42.0);
    201   fprintf( stdout, "log2f          : %f\n", f1);
    202 
    203   f1 = logbf(42.0);
    204   fprintf( stdout, "logbf          : %f\n", f1);
    205 
    206   f1 = lrintf(-0.5);
    207   fprintf( stdout, "lrintf         : %f\n", f1);
    208   f1 = lrintf(0.5);
    209   fprintf( stdout, "lrintf         : %f\n", f1);
    210 
    211   f1 = lroundf(-0.5);
    212   fprintf( stdout, "lroundf        : %f\n", f1);
    213   f1 = lroundf(0.5);
    214   fprintf( stdout, "lroundf        : %f\n", f1);
    215 
    216   f1 = modff(42.0,&f2);
    217   fprintf( stdout, "lmodff         : %f\n", f1);
    218 
    219   f1 = nanf("");
    220   fprintf( stdout, "nanf           : %f\n", f1);
    221 
    222   f1 = nearbyintf(1.5);
    223   fprintf( stdout, "nearbyintf     : %f\n", f1);
    224 
    225   f1 = nextafterf(1.5,2.0);
    226   fprintf( stdout, "nextafterf     : %f\n", f1);
    227 
    228   f1 = powf(3.01, 2.0);
    229   fprintf( stdout, "powf           : %f\n", f1);
    230 
    231   f1 = remainderf(3.01,2.0);
    232   fprintf( stdout, "remainderf     : %f\n", f1);
    233 
    234   f1 = remquof(29.0,3.0,&i1);
    235   fprintf( stdout, "remquof        : %f\n", f1);
    236 
    237   f1 = rintf(0.5);
    238   fprintf( stdout, "rintf          : %f\n", f1);
    239   f1 = rintf(-0.5);
    240   fprintf( stdout, "rintf          : %f\n", f1);
    241 
    242   f1 = roundf(0.5);
    243   fprintf( stdout, "roundf         : %f\n", f1);
    244   f1 = roundf(-0.5);
    245   fprintf( stdout, "roundf         : %f\n", f1);
    246 
    247   f1 = scalblnf(1.2,3);
    248   fprintf( stdout, "scalblnf       : %f\n", f1);
    249 
    250   f1 = scalbnf(1.2,3);
    251   fprintf( stdout, "scalbnf        : %f\n", f1);
    252 
    253   /* no type-specific variant */
    254   i1 = signbit(1.0);
    255   fprintf( stdout, "signbit        : %i\n", i1);
    256 
    257   f1 = sinf(M_PI_4);
    258   fprintf( stdout, "sinf           : %f\n", f1);
    259 
    260   f1 = sinhf(M_PI_4);
    261   fprintf( stdout, "sinhf          : %f\n", f1);
    262 
    263   f1 = sqrtf(9.0);
    264   fprintf( stdout, "sqrtf          : %f\n", f1);
    265 
    266   f1 = tanf(M_PI_4);
    267   fprintf( stdout, "tanf           : %f\n", f1);
    268 
    269   f1 = tanhf(M_PI_4);
    270   fprintf( stdout, "tanhf          : %f\n", f1);
    271 
    272   f1 = tgammaf(2.1);
    273   fprintf( stdout, "tgammaf        : %f\n", f1);
    274 
    275   f1 = truncf(3.5);
    276   fprintf( stdout, "truncf         : %f\n", f1);
    277 
    278   f1 = y0f(1.2);
    279   fprintf( stdout, "y0f            : %f\n", f1);
    280 
    281   f1 = y1f(1.2);
    282   fprintf( stdout, "y1f            : %f\n", f1);
    283 
    284   f1 = ynf(3,1.2);
    285   fprintf( stdout, "ynf            : %f\n", f1);
    286 #endif
    287 }
     25#include <domath.h>

  • testsuites/libtests/mathl/Makefile.am

    ra80a108 r6a5bd1c  
    55# FIXME: Skip long double, not yet supported in newlib
    66# => This test currently is a nop
    7 mathl_CPPFLAGS = $(AM_CPPFLAGS) -DNO_LONG_DOUBLE
    8 
    9 $(srcdir)/domathl.c: $(srcdir)/../math/domath.in
    10         sed -e 's,[@]FTYPE[@],long double,' \
    11         -e 's,[@]FSUFFIX[@],l,g' \
    12         -e 's,%f,%Lf,g' \
    13         -e 's,[@]FGUARD[@],NO_LONG_DOUBLE,' \
    14         $(srcdir)/../math/domath.in > $(srcdir)/domathl.c
     7mathl_CPPFLAGS = $(AM_CPPFLAGS) -I$(top_srcdir)/math -DNO_LONG_DOUBLE
    158
    169dist_rtems_tests_DATA = mathl.scn

  • testsuites/libtests/mathl/domathl.c

    ra80a108 r6a5bd1c  
    1212
    1313#ifdef HAVE_CONFIG_H
    14 #include "config.h"
     14  #include "config.h"
    1515#endif
    1616
    17 #include <math.h>
    18 #include <stdio.h>
    19 
    20 #ifndef M_PI_2
    21 #define M_PI_2 1.57079632679489661923
     17#ifdef NO_LONG_DOUBLE
     18  #define PROVIDE_EMPTY_FUNC
    2219#endif
    2320
    24 #ifndef M_PI_4
    25 #define M_PI_4 0.78539816339744830962
    26 #endif
     21#define SUFFIX l
     22#define FTYPE long double
     23#define PRI "%Lf"
    2724
    28 extern void domathl (void);
    29 
    30 void
    31 domathl (void)
    32 {
    33 #ifndef NO_LONG_DOUBLE
    34   long double f1;
    35   long double f2;
    36 
    37   int i1;
    38 
    39   f1 = acosl(0.0);
    40   fprintf( stdout, "acosl          : %Lf\n", f1);
    41 
    42   f1 = acoshl(0.0);
    43   fprintf( stdout, "acoshl         : %Lf\n", f1);
    44 
    45   f1 = asinl(1.0);
    46   fprintf( stdout, "asinl          : %Lf\n", f1);
    47 
    48   f1 = asinhl(1.0);
    49   fprintf( stdout, "asinhl         : %Lf\n", f1);
    50 
    51   f1 = atanl(M_PI_4);
    52   fprintf( stdout, "atanl          : %Lf\n", f1);
    53 
    54   f1 = atan2l(2.3, 2.3);
    55   fprintf( stdout, "atan2l         : %Lf\n", f1);
    56 
    57   f1 = atanhl(1.0);
    58   fprintf( stdout, "atanhl         : %Lf\n", f1);
    59 
    60   f1 = cbrtl(27.0);
    61   fprintf( stdout, "cbrtl          : %Lf\n", f1);
    62 
    63   f1 = ceill(3.5);
    64   fprintf( stdout, "ceill          : %Lf\n", f1);
    65 
    66   f1 = copysignl(3.5, -2.5);
    67   fprintf( stdout, "copysignl      : %Lf\n", f1);
    68 
    69   f1 = cosl(M_PI_2);
    70   fprintf( stdout, "cosl           : %Lf\n", f1);
    71 
    72   f1 = coshl(M_PI_2);
    73   fprintf( stdout, "coshl          : %Lf\n", f1);
    74 
    75   f1 = erfl(42.0);
    76   fprintf( stdout, "erfl           : %Lf\n", f1);
    77 
    78   f1 = erfcl(42.0);
    79   fprintf( stdout, "erfcl          : %Lf\n", f1);
    80 
    81   f1 = expl(0.42);
    82   fprintf( stdout, "expl           : %Lf\n", f1);
    83 
    84   f1 = exp2l(0.42);
    85   fprintf( stdout, "exp2l          : %Lf\n", f1);
    86 
    87   f1 = expm1l(0.00042);
    88   fprintf( stdout, "expm1l         : %Lf\n", f1);
    89 
    90   f1 = fabsl(-1.123);
    91   fprintf( stdout, "fabsl          : %Lf\n", f1);
    92 
    93   f1 = fdiml(1.123, 2.123);
    94   fprintf( stdout, "fdiml          : %Lf\n", f1);
    95 
    96   f1 = floorl(0.5);
    97   fprintf( stdout, "floorl         : %Lf\n", f1);
    98   f1 = floorl(-0.5);
    99   fprintf( stdout, "floorl         : %Lf\n", f1);
    100 
    101   f1 = fmal(2.1, 2.2, 3.01);
    102   fprintf( stdout, "fmal           : %Lf\n", f1);
    103 
    104   f1 = fmaxl(-0.42, 0.42);
    105   fprintf( stdout, "fmaxl          : %Lf\n", f1);
    106 
    107   f1 = fminl(-0.42, 0.42);
    108   fprintf( stdout, "fminl          : %Lf\n", f1);
    109 
    110   f1 = fmodl(42.0, 3.0);
    111   fprintf( stdout, "fmodl          : %Lf\n", f1);
    112 
    113   /* no type-specific variant */
    114   i1 = fpclassify(1.0);
    115   fprintf( stdout, "fpclassify     : %d\n", i1);
    116 
    117   f1 = frexpl(42.0, &i1);
    118   fprintf( stdout, "frexpl         : %Lf\n", f1);
    119 
    120   f1 = hypotl(42.0, 42.0);
    121   fprintf( stdout, "hypotl         : %Lf\n", f1);
    122 
    123   i1 = ilogbl(42.0);
    124   fprintf( stdout, "ilogbl         : %d\n", i1);
    125 
    126   /* no type-specific variant */
    127   i1 = isfinite(3.0);
    128   fprintf( stdout, "isfinite       : %d\n", i1);
    129 
    130   /* no type-specific variant */
    131   i1 = isgreater(3.0, 3.1);
    132   fprintf( stdout, "isgreater      : %d\n", i1);
    133 
    134   /* no type-specific variant */
    135   i1 = isgreaterequal(3.0, 3.1);
    136   fprintf( stdout, "isgreaterequal : %d\n", i1);
    137 
    138   /* no type-specific variant */
    139   i1 = isinf(3.0);
    140   fprintf( stdout, "isinf          : %d\n", i1);
    141 
    142   /* no type-specific variant */
    143   i1 = isless(3.0, 3.1);
    144   fprintf( stdout, "isless         : %d\n", i1);
    145 
    146   /* no type-specific variant */
    147   i1 = islessequal(3.0, 3.1);
    148   fprintf( stdout, "islessequal    : %d\n", i1);
    149 
    150   /* no type-specific variant */
    151   i1 = islessgreater(3.0, 3.1);
    152   fprintf( stdout, "islessgreater  : %d\n", i1);
    153 
    154   /* no type-specific variant */
    155   i1 = isnan(0.0);
    156   fprintf( stdout, "isnan          : %d\n", i1);
    157 
    158   /* no type-specific variant */
    159   i1 = isnormal(3.0);
    160   fprintf( stdout, "isnormal       : %d\n", i1);
    161 
    162   /* no type-specific variant */
    163   f1 = isunordered(1.0, 2.0);
    164   fprintf( stdout, "isunordered    : %d\n", i1);
    165 
    166   f1 = j0l(1.2);
    167   fprintf( stdout, "j0l            : %Lf\n", f1);
    168 
    169   f1 = j1l(1.2);
    170   fprintf( stdout, "j1l            : %Lf\n", f1);
    171 
    172   f1 = jnl(2,1.2);
    173   fprintf( stdout, "jnl            : %Lf\n", f1);
    174 
    175   f1 = ldexpl(1.2,3);
    176   fprintf( stdout, "ldexpl         : %Lf\n", f1);
    177 
    178   f1 = lgammal(42.0);
    179   fprintf( stdout, "lgammal        : %Lf\n", f1);
    180 
    181   f1 = llrintl(-0.5);
    182   fprintf( stdout, "llrintl        : %Lf\n", f1);
    183   f1 = llrintl(0.5);
    184   fprintf( stdout, "llrintl        : %Lf\n", f1);
    185 
    186   f1 = llroundl(-0.5);
    187   fprintf( stdout, "lroundl        : %Lf\n", f1);
    188   f1 = llroundl(0.5);
    189   fprintf( stdout, "lroundl        : %Lf\n", f1);
    190 
    191   f1 = logl(42.0);
    192   fprintf( stdout, "logl           : %Lf\n", f1);
    193 
    194   f1 = log10l(42.0);
    195   fprintf( stdout, "log10l         : %Lf\n", f1);
    196 
    197   f1 = log1pl(42.0);
    198   fprintf( stdout, "log1pl         : %Lf\n", f1);
    199 
    200   f1 = log2l(42.0);
    201   fprintf( stdout, "log2l          : %Lf\n", f1);
    202 
    203   f1 = logbl(42.0);
    204   fprintf( stdout, "logbl          : %Lf\n", f1);
    205 
    206   f1 = lrintl(-0.5);
    207   fprintf( stdout, "lrintl         : %Lf\n", f1);
    208   f1 = lrintl(0.5);
    209   fprintf( stdout, "lrintl         : %Lf\n", f1);
    210 
    211   f1 = lroundl(-0.5);
    212   fprintf( stdout, "lroundl        : %Lf\n", f1);
    213   f1 = lroundl(0.5);
    214   fprintf( stdout, "lroundl        : %Lf\n", f1);
    215 
    216   f1 = modfl(42.0,&f2);
    217   fprintf( stdout, "lmodfl         : %Lf\n", f1);
    218 
    219   f1 = nanl("");
    220   fprintf( stdout, "nanl           : %Lf\n", f1);
    221 
    222   f1 = nearbyintl(1.5);
    223   fprintf( stdout, "nearbyintl     : %Lf\n", f1);
    224 
    225   f1 = nextafterl(1.5,2.0);
    226   fprintf( stdout, "nextafterl     : %Lf\n", f1);
    227 
    228   f1 = powl(3.01, 2.0);
    229   fprintf( stdout, "powl           : %Lf\n", f1);
    230 
    231   f1 = remainderl(3.01,2.0);
    232   fprintf( stdout, "remainderl     : %Lf\n", f1);
    233 
    234   f1 = remquol(29.0,3.0,&i1);
    235   fprintf( stdout, "remquol        : %Lf\n", f1);
    236 
    237   f1 = rintl(0.5);
    238   fprintf( stdout, "rintl          : %Lf\n", f1);
    239   f1 = rintl(-0.5);
    240   fprintf( stdout, "rintl          : %Lf\n", f1);
    241 
    242   f1 = roundl(0.5);
    243   fprintf( stdout, "roundl         : %Lf\n", f1);
    244   f1 = roundl(-0.5);
    245   fprintf( stdout, "roundl         : %Lf\n", f1);
    246 
    247   f1 = scalblnl(1.2,3);
    248   fprintf( stdout, "scalblnl       : %Lf\n", f1);
    249 
    250   f1 = scalbnl(1.2,3);
    251   fprintf( stdout, "scalbnl        : %Lf\n", f1);
    252 
    253   /* no type-specific variant */
    254   i1 = signbit(1.0);
    255   fprintf( stdout, "signbit        : %i\n", i1);
    256 
    257   f1 = sinl(M_PI_4);
    258   fprintf( stdout, "sinl           : %Lf\n", f1);
    259 
    260   f1 = sinhl(M_PI_4);
    261   fprintf( stdout, "sinhl          : %Lf\n", f1);
    262 
    263   f1 = sqrtl(9.0);
    264   fprintf( stdout, "sqrtl          : %Lf\n", f1);
    265 
    266   f1 = tanl(M_PI_4);
    267   fprintf( stdout, "tanl           : %Lf\n", f1);
    268 
    269   f1 = tanhl(M_PI_4);
    270   fprintf( stdout, "tanhl          : %Lf\n", f1);
    271 
    272   f1 = tgammal(2.1);
    273   fprintf( stdout, "tgammal        : %Lf\n", f1);
    274 
    275   f1 = truncl(3.5);
    276   fprintf( stdout, "truncl         : %Lf\n", f1);
    277 
    278   f1 = y0l(1.2);
    279   fprintf( stdout, "y0l            : %Lf\n", f1);
    280 
    281   f1 = y1l(1.2);
    282   fprintf( stdout, "y1l            : %Lf\n", f1);
    283 
    284   f1 = ynl(3,1.2);
    285   fprintf( stdout, "ynl            : %Lf\n", f1);
    286 #endif
    287 }
     25#include <domath.h>
Note: See TracChangeset for help on using the changeset viewer.