62 within_error(long double expect, long double result, long double error)  in within_error()  argument
67     if (isnan(expect) && isnan(result))  in within_error()
70     if (expect == result)  in within_error()
73     if (expect != 0)  in within_error()
74         e = scalbnl(1.0L, -ilogbl(expect));  in within_error()
76     difference = fabsl(expect - result) * e;  in within_error()
85 check_long_double(const char *name, int i, long double prec, long double expect, long double result)  in check_long_double()  argument
87     if (!within_error(expect, result, prec)) {  in check_long_double()
88         long double diff = fabsl(expect - result);  in check_long_double()
91         printf("%s test %d got %La expect %La diff %La\n", name, i, result, expect, diff);  in check_long_double()
93 …printf("%s test %d got %a expect %a diff %a\n", name, i, (double) result, (double) expect, (double…  in check_long_double()
97         printf("%s test %d got %La expect %La diff %La\n", name, i, result, expect, diff);  in check_long_double()
105 check_long_long(const char *name, int i, long long expect, long long result)  in check_long_long()  argument
107     if (expect != result) {  in check_long_long()
108         long long diff = expect - result;  in check_long_long()
109         printf("%s test %d got %lld expect %lld diff %lld\n", name, i, result, expect, diff);  in check_long_long()