Contributors: 7
Author |
Tokens |
Token Proportion |
Commits |
Commit Proportion |
Fabian Hemmer |
194 |
83.98% |
2 |
12.50% |
Arnaldo Carvalho de Melo |
19 |
8.23% |
7 |
43.75% |
Ian Rogers |
9 |
3.90% |
2 |
12.50% |
Jiri Olsa |
4 |
1.73% |
2 |
12.50% |
Adrian Hunter |
3 |
1.30% |
1 |
6.25% |
Jiapeng Chong |
1 |
0.43% |
1 |
6.25% |
Greg Kroah-Hartman |
1 |
0.43% |
1 |
6.25% |
Total |
231 |
|
16 |
|
// SPDX-License-Identifier: GPL-2.0
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include "tests.h"
#include "session.h"
#include "debug.h"
#include "demangle-ocaml.h"
static int test__demangle_ocaml(struct test_suite *test __maybe_unused, int subtest __maybe_unused)
{
int ret = TEST_OK;
char *buf = NULL;
size_t i;
struct {
const char *mangled, *demangled;
} test_cases[] = {
{ "main",
NULL },
{ "camlStdlib__array__map_154",
"Stdlib.array.map_154" },
{ "camlStdlib__anon_fn$5bstdlib$2eml$3a334$2c0$2d$2d54$5d_1453",
"Stdlib.anon_fn[stdlib.ml:334,0--54]_1453" },
{ "camlStdlib__bytes__$2b$2b_2205",
"Stdlib.bytes.++_2205" },
};
for (i = 0; i < ARRAY_SIZE(test_cases); i++) {
buf = ocaml_demangle_sym(test_cases[i].mangled);
if ((buf == NULL && test_cases[i].demangled != NULL)
|| (buf != NULL && test_cases[i].demangled == NULL)
|| (buf != NULL && strcmp(buf, test_cases[i].demangled))) {
pr_debug("FAILED: %s: %s != %s\n", test_cases[i].mangled,
buf == NULL ? "(null)" : buf,
test_cases[i].demangled == NULL ? "(null)" : test_cases[i].demangled);
ret = TEST_FAIL;
}
free(buf);
}
return ret;
}
DEFINE_SUITE("Demangle OCaml", demangle_ocaml);