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

Improve Python tree-shaking

Browse source
This commit is contained in:
Justine Tunney 2021-09-06 19:24:10 -07:00
parent 5bb2275788
commit 4f41f2184d
169 changed files with 4182 additions and 2411 deletions
Download patch file Download diff file Expand all files Collapse all files

42
test/libc/mem/realloc_in_place_test.c Normal file
View file

@ -0,0 +1,42 @@
/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
│vi: set net ft=c ts=2 sts=2 sw=2 fenc=utf-8 :vi│
╞══════════════════════════════════════════════════════════════════════════════╡
│ Copyright 2021 Justine Alexandra Roberts Tunney │
│ │
│ Permission to use, copy, modify, and/or distribute this software for │
│ any purpose with or without fee is hereby granted, provided that the │
│ above copyright notice and this permission notice appear in all copies. │
│ │
│ THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL │
│ WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED │
│ WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE │
│ AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL │
│ DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR │
│ PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER │
│ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR │
│ PERFORMANCE OF THIS SOFTWARE. │
╚─────────────────────────────────────────────────────────────────────────────*/
#include "libc/mem/mem.h"
#include "libc/runtime/gc.internal.h"
#include "libc/testlib/ezbench.h"
#include "libc/testlib/testlib.h"
TEST(realloc_in_place, test) {
char *x = malloc(16);
EXPECT_EQ(x, realloc_in_place(x, 0));
EXPECT_EQ(x, realloc_in_place(x, 1));
*x = 2;
free(x);
}
BENCH(realloc_in_place, bench) {
volatile int i = 1000;
volatile char *x = malloc(i);
EZBENCH2("malloc", donothing, free(malloc(i)));
EZBENCH2("malloc", donothing, free(malloc(i)));
EZBENCH2("memalign", donothing, free(memalign(16, i)));
EZBENCH2("memalign", donothing, free(memalign(32, i)));
EZBENCH2("realloc", donothing, x = realloc(x, --i));
EZBENCH2("realloc_in_place", donothing, realloc_in_place(x, --i));
free(x);
}

1
test/libc/str/crc32c_test.c
View file

@ -44,4 +44,5 @@ TEST(crc32c, test) {
BENCH(crc32c, bench) {
EZBENCH2("crc32c", donothing, crc32c(0, kHyperion, kHyperionSize));
EZBENCH2("crc32_z", donothing, crc32_z(0, kHyperion, kHyperionSize));
}

74
test/libc/str/memcmp_test.c Normal file
View file

@ -0,0 +1,74 @@
/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
│vi: set net ft=c ts=2 sts=2 sw=2 fenc=utf-8 :vi│
╞══════════════════════════════════════════════════════════════════════════════╡
│ Copyright 2021 Justine Alexandra Roberts Tunney │
│ │
│ Permission to use, copy, modify, and/or distribute this software for │
│ any purpose with or without fee is hereby granted, provided that the │
│ above copyright notice and this permission notice appear in all copies. │
│ │
│ THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL │
│ WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED │
│ WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE │
│ AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL │
│ DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR │
│ PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER │
│ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR │
│ PERFORMANCE OF THIS SOFTWARE. │
╚─────────────────────────────────────────────────────────────────────────────*/
#include "libc/rand/rand.h"
#include "libc/str/str.h"
#include "libc/testlib/ezbench.h"
#include "libc/testlib/fastrandomstring.h"
#include "libc/testlib/testlib.h"
int unfancy_memcmp(const void *a, const void *b, size_t n) {
int c;
size_t i;
const unsigned char *x, *y;
for (x = a, y = b, i = 0; i < n; ++i) {
if ((c = x[i] - y[i])) {
return c;
}
}
return 0;
}
TEST(memcmp, test) {
EXPECT_EQ(0, memcmp("hi", "hi", 2));
EXPECT_NE(0, memcmp("hi", "HI", 2));
EXPECT_EQ(-1, memcmp("a", "b", 1));
EXPECT_EQ(+1, memcmp("b", "a", 1));
}
TEST(memcmp, fuzz) {
int i, n;
char a[32], b[32];
for (i = 0; i < 1000; ++i) {
n = rand() & 31;
rngset(a, n, rand64, -1);
rngset(b, n, rand64, -1);
ASSERT_EQ(unfancy_memcmp(a, b, n), memcmp(a, b, n), "n=%d", n);
}
}
BENCH(memcmp, bench) {
extern int funcmp(const void *a, const void *b, size_t n) asm("memcmp");
volatile int v;
const char *volatile a;
const char *volatile b;
b = a = "123456789123456789123456789123456789123456789123456789";
EZBENCH2("memcmp same", donothing, v = funcmp(a, b, 7));
b = gc(strdup(b));
EZBENCH2("memcmp 1", donothing, v = funcmp(a, b, 1));
EZBENCH2("memcmp 2", donothing, v = funcmp(a, b, 2));
EZBENCH2("memcmp 3", donothing, v = funcmp(a, b, 3));
EZBENCH2("memcmp 4", donothing, v = funcmp(a, b, 4));
EZBENCH2("memcmp 5", donothing, v = funcmp(a, b, 5));
EZBENCH2("memcmp 6", donothing, v = funcmp(a, b, 6));
EZBENCH2("memcmp 7", donothing, v = funcmp(a, b, 7));
EZBENCH2("memcmp 8", donothing, v = funcmp(a, b, 8));
EZBENCH2("memcmp 9", donothing, v = funcmp(a, b, 9));
EZBENCH2("memcmp 16", donothing, v = funcmp(a, b, 16));
EZBENCH2("memcmp 32", donothing, v = funcmp(a, b, 32));
}

35
test/libc/x/xstrcat_test.c
View file

@ -17,15 +17,50 @@
│ PERFORMANCE OF THIS SOFTWARE. │
╚─────────────────────────────────────────────────────────────────────────────*/
#include "libc/runtime/gc.internal.h"
#include "libc/testlib/ezbench.h"
#include "libc/testlib/testlib.h"
#include "libc/x/x.h"
TEST(xstrcat, test) {
EXPECT_STREQ("hi", gc(xstrcat("hi")));
EXPECT_STREQ("hithere", gc(xstrcat("hi", "there")));
EXPECT_STREQ("einszweidrei", gc(xstrcat("eins", "zwei", "drei")));
}
TEST(xstrcat, pointerAbuse) {
EXPECT_STREQ("hi there", gc(xstrcat("hi", ' ', "there")));
EXPECT_STREQ("hi there\n", gc(xstrcat("hi", ' ', "there", '\n')));
}
int hard_static(void) {
char *b, *p;
p = b = malloc(16);
p = stpcpy(p, "eins");
p = stpcpy(p, "zwei");
p = stpcpy(p, "drei");
free(b);
return (intptr_t)b;
}
int hard_dynamic(void) {
char *b, *p;
p = b = malloc(16);
p = stpcpy(p, VEIL("r", "eins"));
p = stpcpy(p, VEIL("r", "zwei"));
p = stpcpy(p, VEIL("r", "drei"));
free(b);
return (intptr_t)b;
}
BENCH(xstrcat, bench) {
EZBENCH2("hard_static", donothing, EXPROPRIATE(hard_static()));
EZBENCH2("hard_dynamic", donothing, EXPROPRIATE(hard_dynamic()));
EZBENCH2("xstrcat", donothing, free(xstrcat("eins", "zwei", "drei")));
EZBENCH2("xasprintf", donothing,
free(xasprintf("%s%s%s", "eins", "zwei", "drei")));
EZBENCH2("xstrcat2", donothing,
free(xstrcat("einseinseins", "zweizweizwei", "dreidreidrei")));
EZBENCH2("xasprintf2", donothing,
free(xasprintf("%s%s%s", "einseinseins", "zweizweizwei",
"dreidreidrei")));
}