#include #include #include "types.h" int64_t entry(); void print_result(int64_t); int main(int argc, char** argv) { print_result(entry()); return 0; } void print_result(int64_t result) { if (int_type_tag == (int_type_mask & result)) { printf("%" PRId64 "\n", result >> int_shift); } else { switch (result) { case val_true: printf("#t\n"); break; case val_false: printf("#f\n"); break; } } }