feat(table) - Add pivot function

Author: protocolstardust

Makefile

@@ -60,7 +60,7 @@ CORE_OBJECTS = core/poll.o core/ipc.o core/runtime.o core/sys.o core/os.o core/p
  core/sock.o core/error.o core/math.o core/cmp.o core/items.o core/logic.o core/compose.o core/order.o core/io.o\
  core/misc.o core/freelist.o core/update.o core/join.o core/query.o core/cond.o\
  core/iter.o core/dynlib.o core/aggr.o core/index.o core/group.o core/filter.o core/atomic.o\
- core/thread.o core/pool.o core/progress.o core/fdmap.o core/signal.o core/log.o
+ core/thread.o core/pool.o core/progress.o core/fdmap.o core/signal.o core/log.o core/pivot.o
 APP_COMMON = app/repl.o app/term.o
 APP_OBJECTS = app/main.o $(APP_COMMON)
 TESTS_OBJECTS = tests/main.o

core/env.c

@@ -51,6 +51,7 @@
 #include "vary.h"
 #include "os.h"
 #include "proc.h"
+#include "pivot.h"
 
 i64_t SYMBOL_FN;
 i64_t SYMBOL_SELF;
@@ -256,6 +257,7 @@ nil_t init_functions(obj_p functions)
     REGISTER_FN(functions,  "asof-join",           TYPE_VARY,     FN_NONE,                   ray_asof_join);
     REGISTER_FN(functions,  "window-join",         TYPE_VARY,     FN_NONE,                   ray_window_join);
     REGISTER_FN(functions,  "window-join1",        TYPE_VARY,     FN_NONE,                   ray_window_join1);
+    REGISTER_FN(functions,  "pivot",               TYPE_VARY,     FN_NONE,                   ray_pivot);
     REGISTER_FN(functions,  "if",                  TYPE_VARY,     FN_NONE | FN_SPECIAL_FORM, ray_cond);
     REGISTER_FN(functions,  "return",              TYPE_VARY,     FN_NONE,                   ray_return);
     REGISTER_FN(functions,  "hopen",               TYPE_VARY,     FN_NONE,                   ray_hopen);