Changeset 80d99aa in rtems
- Timestamp:
- 12/01/14 07:20:55 (9 years ago)
- Branches:
- 4.11, 5, master
- Children:
- 9ab1558f
- Parents:
- dd309b1
- Location:
- testsuites/libtests
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
testsuites/libtests/complex/docomplex.h
rdd309b1 r80d99aa 26 26 extern void FUNC(docomplex) (void); 27 27 28 volatile complex FTYPE ca, cb; 29 28 30 void 29 31 FUNC(docomplex) (void) 30 32 { 31 33 #ifndef PROVIDE_EMPTY_FUNC 32 complex FTYPE c a, cb, cc;34 complex FTYPE cc; 33 35 FTYPE f1; 34 36 -
testsuites/libtests/math/domath.h
rdd309b1 r80d99aa 34 34 extern void FUNC(domath) (void); 35 35 36 volatile int ia; 37 38 volatile FTYPE fa; 39 40 volatile FTYPE fb; 41 42 volatile FTYPE fc; 43 36 44 void 37 45 FUNC(domath) (void) … … 43 51 int i1; 44 52 45 f1 = FUNC(acos) (0.0); 53 fa = 0.0; 54 f1 = FUNC(acos) (fa); 46 55 fprintf( stdout, STR(acos) " : " PRI "\n", f1); 47 56 48 f1 = FUNC(acosh) (0.0); 57 fa = 0.0; 58 f1 = FUNC(acosh) (fa); 49 59 fprintf( stdout, STR(acosh) " : " PRI "\n", f1); 50 60 51 f1 = FUNC(asin) (1.0); 61 fa = 1.0; 62 f1 = FUNC(asin) (fa); 52 63 fprintf( stdout, STR(asin) " : " PRI "\n", f1); 53 64 54 f1 = FUNC(asinh) (1.0); 65 fa = 1.0; 66 f1 = FUNC(asinh) (fa); 55 67 fprintf( stdout, STR(asinh) " : " PRI "\n", f1); 56 68 57 f1 = FUNC(atan) (M_PI_4); 69 fa = M_PI_4; 70 f1 = FUNC(atan) (fa); 58 71 fprintf( stdout, STR(atan) " : " PRI "\n", f1); 59 72 60 f1 = FUNC(atan2) (2.3, 2.3); 73 fa = 2.3; 74 fb = 2.3; 75 f1 = FUNC(atan2) (fa, fb); 61 76 fprintf( stdout, STR(atan2) " : " PRI "\n", f1); 62 77 63 f1 = FUNC(atanh) (1.0); 78 fa = 1.0; 79 f1 = FUNC(atanh) (fa); 64 80 fprintf( stdout, STR(atanh) " : " PRI "\n", f1); 65 81 66 f1 = FUNC(cbrt) (27.0); 82 fa = 27.0; 83 f1 = FUNC(cbrt) (fa); 67 84 fprintf( stdout, STR(cbrt) " : " PRI "\n", f1); 68 85 69 f1 = FUNC(ceil) (3.5); 86 fa = 3.5; 87 f1 = FUNC(ceil) (fa); 70 88 fprintf( stdout, STR(ceil) " : " PRI "\n", f1); 71 89 72 f1 = FUNC(copysign) (3.5, -2.5); 90 fa = 3.5; 91 fb = -2.5; 92 f1 = FUNC(copysign) (fa, fb); 73 93 fprintf( stdout, STR(copysign) " : " PRI "\n", f1); 74 94 75 f1 = FUNC(cos) (M_PI_2); 95 fa = M_PI_2; 96 f1 = FUNC(cos) (fa); 76 97 fprintf( stdout, STR(cos) " : " PRI "\n", f1); 77 98 78 f1 = FUNC(cosh) (M_PI_2); 99 fa = M_PI_2; 100 f1 = FUNC(cosh) (fa); 79 101 fprintf( stdout, STR(cosh) " : " PRI "\n", f1); 80 102 81 f1 = FUNC(erf) (42.0); 103 fa = 42.0; 104 f1 = FUNC(erf) (fa); 82 105 fprintf( stdout, STR(erf) " : " PRI "\n", f1); 83 106 84 f1 = FUNC(erfc) (42.0); 107 fa = 42.0; 108 f1 = FUNC(erfc) (fa); 85 109 fprintf( stdout, STR(erfc) " : " PRI "\n", f1); 86 110 87 f1 = FUNC(exp) (0.42); 111 fa = 0.42; 112 f1 = FUNC(exp) (fa); 88 113 fprintf( stdout, STR(exp) " : " PRI "\n", f1); 89 114 90 f1 = FUNC(exp2) (0.42); 115 fa = 0.42; 116 f1 = FUNC(exp2) (fa); 91 117 fprintf( stdout, STR(exp2) " : " PRI "\n", f1); 92 118 93 f1 = FUNC(expm1) (0.00042); 119 fa = 0.00042; 120 f1 = FUNC(expm1) (fa); 94 121 fprintf( stdout, STR(expm1) " : " PRI "\n", f1); 95 122 96 f1 = FUNC(fabs) (-1.123); 123 fa = -1.123; 124 f1 = FUNC(fabs) (fa); 97 125 fprintf( stdout, STR(fabs) " : " PRI "\n", f1); 98 126 99 f1 = FUNC(fdim) (1.123, 2.123); 127 fa = 1.123; 128 fb = 1.123; 129 f1 = FUNC(fdim) (fa, fb); 100 130 fprintf( stdout, STR(fdim) " : " PRI "\n", f1); 101 131 102 f1 = FUNC(floor) (0.5); 132 fa = 0.5; 133 f1 = FUNC(floor) (fa); 103 134 fprintf( stdout, STR(floor) " : " PRI "\n", f1); 104 f1 = FUNC(floor) (-0.5); 135 fa = -0.5; 136 f1 = FUNC(floor) (fa); 105 137 fprintf( stdout, STR(floor) " : " PRI "\n", f1); 106 138 107 f1 = FUNC(fma) (2.1, 2.2, 3.01); 139 fa = 2.1; 140 fb = 2.2; 141 fc = 3.01; 142 f1 = FUNC(fma) (fa, fb, fc); 108 143 fprintf( stdout, STR(fma) " : " PRI "\n", f1); 109 144 110 f1 = FUNC(fmax) (-0.42, 0.42); 145 fa = -0.42; 146 fb = 0.42; 147 f1 = FUNC(fmax) (fa, fb); 111 148 fprintf( stdout, STR(fmax) " : " PRI "\n", f1); 112 149 113 f1 = FUNC(fmin) (-0.42, 0.42); 150 fa = -0.42; 151 fb = 0.42; 152 f1 = FUNC(fmin) (fa, fb); 114 153 fprintf( stdout, STR(fmin) " : " PRI "\n", f1); 115 154 116 f1 = FUNC(fmod) (42.0, 3.0); 155 fa = 42.0; 156 fb = 3.0; 157 f1 = FUNC(fmod) (fa, fb); 117 158 fprintf( stdout, STR(fmod) " : " PRI "\n", f1); 118 159 119 160 /* no type-specific variant */ 120 i1 = fpclassify(1.0); 161 fa = 1.0; 162 i1 = fpclassify(fa); 121 163 fprintf( stdout, "fpclassify : %d\n", i1); 122 164 123 f1 = FUNC(frexp) (42.0, &i1); 165 fa = 42.0; 166 f1 = FUNC(frexp) (fa, &i1); 124 167 fprintf( stdout, STR(frexp) " : " PRI "\n", f1); 125 168 126 f1 = FUNC(hypot) (42.0, 42.0); 169 fa = 42.0; 170 fb = 42.0; 171 f1 = FUNC(hypot) (fa, fb); 127 172 fprintf( stdout, STR(hypot) " : " PRI "\n", f1); 128 173 129 i1 = FUNC(ilogb) (42.0); 174 fa = 42.0; 175 i1 = FUNC(ilogb) (fa); 130 176 fprintf( stdout, STR(ilogb) " : %d\n", i1); 131 177 132 178 /* no type-specific variant */ 133 i1 = isfinite(3.0); 179 fa = 3.0; 180 i1 = isfinite(fa); 134 181 fprintf( stdout, "isfinite : %d\n", i1); 135 182 136 183 /* no type-specific variant */ 137 i1 = isgreater(3.0, 3.1); 184 fa = 3.0; 185 fb = 3.1; 186 i1 = isgreater(fa, fb); 138 187 fprintf( stdout, "isgreater : %d\n", i1); 139 188 140 189 /* no type-specific variant */ 141 i1 = isgreaterequal(3.0, 3.1); 190 fa = 3.0; 191 fb = 3.1; 192 i1 = isgreaterequal(fa, fb); 142 193 fprintf( stdout, "isgreaterequal : %d\n", i1); 143 194 144 195 /* no type-specific variant */ 145 i1 = isinf(3.0); 196 fa = 3.0; 197 i1 = isinf(fa); 146 198 fprintf( stdout, "isinf : %d\n", i1); 147 199 148 200 /* no type-specific variant */ 149 i1 = isless(3.0, 3.1); 201 fa = 3.0; 202 fb = 3.1; 203 i1 = isless(fa, fb); 150 204 fprintf( stdout, "isless : %d\n", i1); 151 205 152 206 /* no type-specific variant */ 153 i1 = islessequal(3.0, 3.1); 207 fa = 3.0; 208 fb = 3.1; 209 i1 = islessequal(fa, fb); 154 210 fprintf( stdout, "islessequal : %d\n", i1); 155 211 156 212 /* no type-specific variant */ 157 i1 = islessgreater(3.0, 3.1); 213 fa = 3.0; 214 fb = 3.1; 215 i1 = islessgreater(fa, fb); 158 216 fprintf( stdout, "islessgreater : %d\n", i1); 159 217 160 218 /* no type-specific variant */ 161 i1 = isnan(0.0); 219 fa = 0.0; 220 i1 = isnan(fa); 162 221 fprintf( stdout, "isnan : %d\n", i1); 163 222 164 223 /* no type-specific variant */ 165 i1 = isnormal(3.0); 224 fa = 3.0; 225 i1 = isnormal(fa); 166 226 fprintf( stdout, "isnormal : %d\n", i1); 167 227 168 228 /* no type-specific variant */ 169 f1 = isunordered(1.0, 2.0); 229 fa = 1.0; 230 fb = 2.0; 231 f1 = isunordered(fa, fb); 170 232 fprintf( stdout, "isunordered : %d\n", i1); 171 233 172 f1 = FUNC(j0) (1.2); 234 fa = 1.2; 235 f1 = FUNC(j0) (fa); 173 236 fprintf( stdout, STR(j0) " : " PRI "\n", f1); 174 237 175 f1 = FUNC(j1) (1.2); 238 fa = 1.2; 239 f1 = FUNC(j1) (fa); 176 240 fprintf( stdout, STR(j1) " : " PRI "\n", f1); 177 241 178 f1 = FUNC(jn) (2,1.2); 242 ia = 2; 243 fa = 1.2; 244 f1 = FUNC(jn) (ia, fa); 179 245 fprintf( stdout, STR(jn) " : " PRI "\n", f1); 180 246 181 f1 = FUNC(ldexp) (1.2,3); 247 fa = 1.2; 248 ia = 3; 249 f1 = FUNC(ldexp) (fa, ia); 182 250 fprintf( stdout, STR(ldexp) " : " PRI "\n", f1); 183 251 184 f1 = FUNC(lgamma) (42.0); 252 fa = 42.0; 253 f1 = FUNC(lgamma) (fa); 185 254 fprintf( stdout, STR(lgamma) " : " PRI "\n", f1); 186 255 187 f1 = FUNC(llrint) (-0.5); 256 fa = -0.5; 257 f1 = FUNC(llrint) (fa); 188 258 fprintf( stdout, STR(llrint) " : " PRI "\n", f1); 189 f1 = FUNC(llrint) (0.5); 259 fa = 0.5; 260 f1 = FUNC(llrint) (fa); 190 261 fprintf( stdout, STR(llrint) " : " PRI "\n", f1); 191 262 192 f1 = FUNC(llround) (-0.5); 263 fa = -0.5; 264 f1 = FUNC(llround) (fa); 193 265 fprintf( stdout, STR(lround) " : " PRI "\n", f1); 194 f1 = FUNC(llround) (0.5); 266 fa = 0.5; 267 f1 = FUNC(llround) (fa); 195 268 fprintf( stdout, STR(lround) " : " PRI "\n", f1); 196 269 197 f1 = FUNC(log) (42.0); 270 fa = 42.0; 271 f1 = FUNC(log) (fa); 198 272 fprintf( stdout, STR(log) " : " PRI "\n", f1); 199 273 200 f1 = FUNC(log10) (42.0); 274 fa = 42.0; 275 f1 = FUNC(log10) (fa); 201 276 fprintf( stdout, STR(log10) " : " PRI "\n", f1); 202 277 203 f1 = FUNC(log1p) (42.0); 278 fa = 42.0; 279 f1 = FUNC(log1p) (fa); 204 280 fprintf( stdout, STR(log1p) " : " PRI "\n", f1); 205 281 206 f1 = FUNC(log2) (42.0); 282 fa = 42.0; 283 f1 = FUNC(log2) (fa); 207 284 fprintf( stdout, STR(log2) " : " PRI "\n", f1); 208 285 209 f1 = FUNC(logb) (42.0); 286 fa = 42.0; 287 f1 = FUNC(logb) (fa); 210 288 fprintf( stdout, STR(logb) " : " PRI "\n", f1); 211 289 212 f1 = FUNC(lrint) (-0.5); 290 fa = -0.5; 291 f1 = FUNC(lrint) (fa); 213 292 fprintf( stdout, STR(lrint) " : " PRI "\n", f1); 214 f1 = FUNC(lrint) (0.5); 293 fa = 0.5; 294 f1 = FUNC(lrint) (fa); 215 295 fprintf( stdout, STR(lrint) " : " PRI "\n", f1); 216 296 217 f1 = FUNC(lround) (-0.5); 297 fa = -0.5; 298 f1 = FUNC(lround) (fa); 218 299 fprintf( stdout, STR(lround) " : " PRI "\n", f1); 219 f1 = FUNC(lround) (0.5); 300 fa = 0.5; 301 f1 = FUNC(lround) (fa); 220 302 fprintf( stdout, STR(lround) " : " PRI "\n", f1); 221 303 222 f1 = FUNC(modf) (42.0,&f2); 304 fa = 42.0; 305 f1 = FUNC(modf) (fa, &f2); 223 306 fprintf( stdout, STR(lmodf) " : " PRI "\n", f1); 224 307 … … 226 309 fprintf( stdout, STR(nan) " : " PRI "\n", f1); 227 310 228 f1 = FUNC(nearbyint) (1.5); 311 fa = 1.5; 312 f1 = FUNC(nearbyint) (fa); 229 313 fprintf( stdout, STR(nearbyint) " : " PRI "\n", f1); 230 314 231 f1 = FUNC(nextafter) (1.5,2.0); 315 fa = 1.5; 316 fb = 2.0; 317 f1 = FUNC(nextafter) (fa, fb); 232 318 fprintf( stdout, STR(nextafter) " : " PRI "\n", f1); 233 319 234 f1 = FUNC(pow) (3.01, 2.0); 320 fa = 3.01; 321 fb = 2.0; 322 f1 = FUNC(pow) (fa, fb); 235 323 fprintf( stdout, STR(pow) " : " PRI "\n", f1); 236 324 237 f1 = FUNC(remainder) (3.01,2.0); 325 fa = 3.01; 326 fb = 2.0; 327 f1 = FUNC(remainder) (fa, fb); 238 328 fprintf( stdout, STR(remainder) " : " PRI "\n", f1); 239 329 240 f1 = FUNC(remquo) (29.0,3.0,&i1); 330 fa = 29.0; 331 fb = 3.0; 332 f1 = FUNC(remquo) (fa, fb, &i1); 241 333 fprintf( stdout, STR(remquo) " : " PRI "\n", f1); 242 334 243 f1 = FUNC(rint) (0.5); 335 fa = 0.5; 336 f1 = FUNC(rint) (fa); 244 337 fprintf( stdout, STR(rint) " : " PRI "\n", f1); 245 f1 = FUNC(rint) (-0.5); 338 fa = -0.5; 339 f1 = FUNC(rint) (fa); 246 340 fprintf( stdout, STR(rint) " : " PRI "\n", f1); 247 341 248 f1 = FUNC(round) (0.5); 342 fa = 0.5; 343 f1 = FUNC(round) (fa); 249 344 fprintf( stdout, STR(round) " : " PRI "\n", f1); 250 f1 = FUNC(round) (-0.5); 345 fa = -0.5; 346 f1 = FUNC(round) (fa); 251 347 fprintf( stdout, STR(round) " : " PRI "\n", f1); 252 348 253 f1 = FUNC(scalbln) (1.2,3); 349 fa = 1.2; 350 ia = 3; 351 f1 = FUNC(scalbln) (fa, ia); 254 352 fprintf( stdout, STR(scalbln) " : " PRI "\n", f1); 255 353 256 f1 = FUNC(scalbn) (1.2,3); 354 fa = 1.2; 355 ia = 3; 356 f1 = FUNC(scalbn) (fa, ia); 257 357 fprintf( stdout, STR(scalbn) " : " PRI "\n", f1); 258 358 259 359 /* no type-specific variant */ 260 i1 = signbit(1.0); 360 fa = 1.0; 361 i1 = signbit(fa); 261 362 fprintf( stdout, "signbit : %i\n", i1); 262 363 263 f1 = FUNC(sin) (M_PI_4); 364 fa = M_PI_4; 365 f1 = FUNC(sin) (fa); 264 366 fprintf( stdout, STR(sin) " : " PRI "\n", f1); 265 367 266 f1 = FUNC(sinh) (M_PI_4); 368 fa = M_PI_4; 369 f1 = FUNC(sinh) (fa); 267 370 fprintf( stdout, STR(sinh) " : " PRI "\n", f1); 268 371 269 f1 = FUNC(sqrt) (9.0); 372 fa = 9.0; 373 f1 = FUNC(sqrt) (fa); 270 374 fprintf( stdout, STR(sqrt) " : " PRI "\n", f1); 271 375 272 f1 = FUNC(tan) (M_PI_4); 376 fa = M_PI_4; 377 f1 = FUNC(tan) (fa); 273 378 fprintf( stdout, STR(tan) " : " PRI "\n", f1); 274 379 275 f1 = FUNC(tanh) (M_PI_4); 380 fa = M_PI_4; 381 f1 = FUNC(tanh) (fa); 276 382 fprintf( stdout, STR(tanh) " : " PRI "\n", f1); 277 383 278 f1 = FUNC(tgamma) (2.1); 384 fa = 2.1; 385 f1 = FUNC(tgamma) (fa); 279 386 fprintf( stdout, STR(tgamma) " : " PRI "\n", f1); 280 387 281 f1 = FUNC(trunc) (3.5); 388 fa = 3.5; 389 f1 = FUNC(trunc) (fa); 282 390 fprintf( stdout, STR(trunc) " : " PRI "\n", f1); 283 391 284 f1 = FUNC(y0) (1.2); 392 fa = 1.2; 393 f1 = FUNC(y0) (fa); 285 394 fprintf( stdout, STR(y0) " : " PRI "\n", f1); 286 395 287 f1 = FUNC(y1) (1.2); 396 fa = 1.2; 397 f1 = FUNC(y1) (fa); 288 398 fprintf( stdout, STR(y1) " : " PRI "\n", f1); 289 399 290 f1 = FUNC(yn) (3,1.2); 400 ia = 3; 401 fa = 1.2; 402 f1 = FUNC(yn) (ia, fa); 291 403 fprintf( stdout, STR(yn) " : " PRI "\n", f1); 292 404 #endif
Note: See TracChangeset
for help on using the changeset viewer.