Bring back gc() function

Renaming gc() to _gc() was a mistake since the better thing to do is put
it behind the _COSMO_SOURCE macro. We need this change because I haven't
wanted to use my amazing garbage collector ever since we renamed it. You
now need to define _COSMO_SOURCE yourself when using amalgamation header
and cosmocc users need to pass the -mcosmo flag to get the gc() function

Some other issues relating to cancelation have been fixed along the way.
We're also now putting cosmocc in a folder named `.cosmocc` so it can be
more safely excluded by grep --exclude-dir=.cosmocc --exclude-dir=o etc.
This commit is contained in:
Justine Tunney 2024-01-08 10:07:35 -08:00
parent 6cb0354e19
commit a4b455185b
No known key found for this signature in database
GPG key ID: BE714B4575D6E328
280 changed files with 1362 additions and 1407 deletions

View file

@ -29,39 +29,39 @@ float _expf(float) asm("expf");
long double _expl(long double) asm("expl");
TEST(expl, test) {
EXPECT_STREQ("1", _gc(xdtoal(_expl(0))));
EXPECT_STREQ("1", _gc(xdtoal(_expl(-0.))));
EXPECT_STREQ("INFINITY", _gc(xdtoal(_expl(INFINITY))));
EXPECT_STREQ("0", _gc(xdtoal(_expl(-INFINITY))));
EXPECT_STREQ("NAN", _gc(xdtoal(_expl(NAN))));
// EXPECT_STREQ("0", _gc(xdtoal(_expl(-132098844872390))));
EXPECT_STREQ("INFINITY", _gc(xdtoal(_expl(132098844872390))));
EXPECT_STREQ("1", gc(xdtoal(_expl(0))));
EXPECT_STREQ("1", gc(xdtoal(_expl(-0.))));
EXPECT_STREQ("INFINITY", gc(xdtoal(_expl(INFINITY))));
EXPECT_STREQ("0", gc(xdtoal(_expl(-INFINITY))));
EXPECT_STREQ("NAN", gc(xdtoal(_expl(NAN))));
// EXPECT_STREQ("0", gc(xdtoal(_expl(-132098844872390))));
EXPECT_STREQ("INFINITY", gc(xdtoal(_expl(132098844872390))));
}
TEST(exp, test) {
EXPECT_STREQ("1", _gc(xdtoa(_exp(0))));
EXPECT_STREQ("1", _gc(xdtoa(_exp(-0.))));
EXPECT_STREQ("INFINITY", _gc(xdtoa(_exp(INFINITY))));
EXPECT_STREQ("0", _gc(xdtoa(_exp(-INFINITY))));
EXPECT_STREQ("NAN", _gc(xdtoa(_exp(NAN))));
EXPECT_STREQ("0", _gc(xdtoa(_exp(-132098844872390))));
EXPECT_STREQ("INFINITY", _gc(xdtoa(_exp(132098844872390))));
EXPECT_STREQ("1", gc(xdtoa(_exp(0))));
EXPECT_STREQ("1", gc(xdtoa(_exp(-0.))));
EXPECT_STREQ("INFINITY", gc(xdtoa(_exp(INFINITY))));
EXPECT_STREQ("0", gc(xdtoa(_exp(-INFINITY))));
EXPECT_STREQ("NAN", gc(xdtoa(_exp(NAN))));
EXPECT_STREQ("0", gc(xdtoa(_exp(-132098844872390))));
EXPECT_STREQ("INFINITY", gc(xdtoa(_exp(132098844872390))));
}
TEST(expf, test) {
EXPECT_STREQ("1", _gc(xdtoaf(_expf(0))));
EXPECT_STREQ("1", _gc(xdtoaf(_expf(-0.))));
EXPECT_STREQ("INFINITY", _gc(xdtoaf(_expf(INFINITY))));
EXPECT_STREQ("0", _gc(xdtoaf(_expf(-INFINITY))));
EXPECT_STREQ("NAN", _gc(xdtoaf(_expf(NAN))));
EXPECT_STREQ("0", _gc(xdtoaf(_expf(-132098844872390))));
EXPECT_STREQ("INFINITY", _gc(xdtoaf(_expf(132098844872390))));
EXPECT_STREQ("1", gc(xdtoaf(_expf(0))));
EXPECT_STREQ("1", gc(xdtoaf(_expf(-0.))));
EXPECT_STREQ("INFINITY", gc(xdtoaf(_expf(INFINITY))));
EXPECT_STREQ("0", gc(xdtoaf(_expf(-INFINITY))));
EXPECT_STREQ("NAN", gc(xdtoaf(_expf(NAN))));
EXPECT_STREQ("0", gc(xdtoaf(_expf(-132098844872390))));
EXPECT_STREQ("INFINITY", gc(xdtoaf(_expf(132098844872390))));
}
TEST(exp, fun) {
ASSERT_STREQ("7.389056", _gc(xasprintf("%f", _exp(2.0))));
ASSERT_STREQ("6.389056", _gc(xasprintf("%f", expm1(2.0))));
ASSERT_STREQ("6.389056", _gc(xasprintf("%f", _exp(2.0) - 1.0)));
ASSERT_STREQ("7.389056", gc(xasprintf("%f", _exp(2.0))));
ASSERT_STREQ("6.389056", gc(xasprintf("%f", expm1(2.0))));
ASSERT_STREQ("6.389056", gc(xasprintf("%f", _exp(2.0) - 1.0)));
}
BENCH(expl, bench) {