aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--main.c31
1 files changed, 7 insertions, 24 deletions
diff --git a/main.c b/main.c
index 3aac0c0..75750ad 100644
--- a/main.c
+++ b/main.c
@@ -27,33 +27,16 @@ sv_t sv_copy(sv_t old)
int main(void)
{
- sym_table_t table = {0};
- sym_table_init(&table);
- // Let's hash the words of lorem ipsum
- const char *words[] = {
- "aliquam", "erat", "volutpat", "nunc", "eleifend",
- "leo", "vitae", "magna", "in", "id",
- "erat", "non", "orci", "commodo", "lobortis",
- "proin", "neque", "massa", "cursus", "ut",
- "gravida", "ut", "lobortis", "eget", "lacus",
- "sed", "diam", "praesent", "fermentum", "tempor",
- "tellus", "nullam", "tempus", "mauris", "ac",
- "felis", "vel", "velit", "tristique", "imperdiet",
- "donec", "at", "pede", "etiam", "vel",
- "neque", "nec", "dui", "dignissim", "bibendum",
- "vivamus", "id", "enim", "phasellus", "neque",
- "orci", "porta", "a", "aliquet", "quis",
- "semper", "a", "massa", "phasellus", "purus",
- "pellentesque", "tristique", "imperdiet", "tortor", "nam",
- "euismod", "tellus", "id", "erat",
+ i64 numbers[] = {
+ 1, 1024, -200, 1LU << 32, INT_MAX, INT_MIN,
};
- for (u64 i = 0; i < ARRSIZE(words); ++i)
+ for (u64 i = 0; i < ARRSIZE(numbers); ++i)
{
- char *ptr = sym_table_find(&table, SV(words[i], strlen(words[i])));
- printf("%s => %p\n", words[i], ptr);
+ i64 num = numbers[i];
+ lisp_t *lisp = tag_int(num);
+ i64 ret = as_int(lisp);
+ printf("%#16lx => %#16lx => %#16lx\n", num, lisp, ret);
}
-
- sym_table_cleanup(&table);
return 0;
}