mirrors/cosmopolitan
1
0
Fork 0
mirror of https://github.com/jart/cosmopolitan.git synced 2025-05-23 22:02:27 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Port a lot more code to AARCH64

Browse source 
- Introduce epoll_pwait()
- Rewrite -ftrapv and ffs() libraries in C code
- Use more FreeBSD code in math function library
- Get significantly more tests passing on qemu-aarch64
- Fix many Musl long double functions that were broken on AARCH64
This commit is contained in:
Justine Tunney 2023-05-14 09:32:15 -07:00
parent 91791e9f38
commit 550b52abf6
No known key found for this signature in database
GPG key ID: BE714B4575D6E328
158 changed files with 6018 additions and 3499 deletions
Download patch file Download diff file Expand all files Collapse all files

41
test/libc/tinymath/cbrt_test.c
View file

@ -16,26 +16,39 @@
│ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR │
│ PERFORMANCE OF THIS SOFTWARE. │
╚─────────────────────────────────────────────────────────────────────────────*/
#include "libc/calls/struct/timespec.h"
#include "libc/math.h"
#include "libc/mem/gc.h"
#include "libc/stdio/stdio.h"
#include "libc/testlib/ezbench.h"
#include "libc/testlib/testlib.h"
#include "libc/x/xasprintf.h"
double _cbrt(double) asm("cbrt");
float _cbrtf(float) asm("cbrtf");
long double _cbrtl(long double) asm("cbrtl");
TEST(cbrt, test) {
EXPECT_STREQ("0", _gc(xasprintf("%.15g", cbrt(0.))));
EXPECT_STREQ("-0", _gc(xasprintf("%.15g", cbrt(-0.))));
EXPECT_STREQ("0.7937005259841", _gc(xasprintf("%.15g", cbrt(.5))));
EXPECT_STREQ("-0.7937005259841", _gc(xasprintf("%.15g", cbrt(-.5))));
EXPECT_STREQ("1", _gc(xasprintf("%.15g", cbrt(1.))));
EXPECT_STREQ("-1", _gc(xasprintf("%.15g", cbrt(-1.))));
EXPECT_STREQ("1.14471424255333", _gc(xasprintf("%.15g", cbrt(1.5))));
EXPECT_STREQ("-1.14471424255333", _gc(xasprintf("%.15g", cbrt(-1.5))));
EXPECT_STREQ("nan", _gc(xasprintf("%.15g", cbrt(NAN))));
EXPECT_STREQ("-nan", _gc(xasprintf("%.15g", cbrt(-NAN))));
EXPECT_STREQ("inf", _gc(xasprintf("%.15g", cbrt(INFINITY))));
EXPECT_STREQ("-inf", _gc(xasprintf("%.15g", cbrt(-INFINITY))));
EXPECT_STREQ("0", _gc(xasprintf("%.15g", _cbrt(0.))));
EXPECT_STREQ("-0", _gc(xasprintf("%.15g", _cbrt(-0.))));
EXPECT_STREQ("0.7937005259841", _gc(xasprintf("%.15g", _cbrt(.5))));
EXPECT_STREQ("-0.7937005259841", _gc(xasprintf("%.15g", _cbrt(-.5))));
EXPECT_STREQ("1", _gc(xasprintf("%.15g", _cbrt(1.))));
EXPECT_STREQ("-1", _gc(xasprintf("%.15g", _cbrt(-1.))));
EXPECT_STREQ("1.14471424255333", _gc(xasprintf("%.15g", _cbrt(1.5))));
EXPECT_STREQ("-1.14471424255333", _gc(xasprintf("%.15g", _cbrt(-1.5))));
EXPECT_STREQ("nan", _gc(xasprintf("%.15g", _cbrt(NAN))));
EXPECT_STREQ("-nan", _gc(xasprintf("%.15g", _cbrt(-NAN))));
EXPECT_STREQ("inf", _gc(xasprintf("%.15g", _cbrt(INFINITY))));
EXPECT_STREQ("-inf", _gc(xasprintf("%.15g", _cbrt(-INFINITY))));
EXPECT_STREQ("2.81264428523626e-103",
_gc(xasprintf("%.15g", cbrt(__DBL_MIN__))));
_gc(xasprintf("%.15g", _cbrt(__DBL_MIN__))));
EXPECT_STREQ("5.64380309412236e+102",
_gc(xasprintf("%.15g", cbrt(__DBL_MAX__))));
_gc(xasprintf("%.15g", _cbrt(__DBL_MAX__))));
}
BENCH(cbrt, bench) {
EZBENCH2("cbrt", donothing, _cbrt(.7)); // ~19ns
EZBENCH2("cbrtf", donothing, _cbrtf(.7)); // ~15ns
EZBENCH2("cbrtl", donothing, _cbrtl(.7)); // ~36ns
}