#include #include #include #include #include #include #include #define usize size_t double dbl_nan(void) { return NAN; } double dbl_inf(void) { return INFINITY; } void output_bool(bool x) { puts(x ? "True" : "False"); } void output_int32(int32_t x) { printf("%"PRId32"\n", x); } void output_int64(int64_t x) { printf("%"PRId64"\n", x); } void output_uint32(uint32_t x) { printf("%"PRIu32"\n", x); } void output_uint64(uint64_t x) { printf("%"PRIu64"\n", x); } void output_float64(double x) { if (isnan(x)) { puts("nan"); } else { printf("%f\n", x); } } void output_asciiart(int32_t x) { static const char *chars = " .,-:;i+hHM$*#@ "; if (x < 0) { putchar('\n'); } else { putchar(chars[x]); } } struct cslice { void *data; usize len; }; void output_int32_list(struct cslice *slice) { const int32_t *data = (int32_t *) slice->data; putchar('['); for (usize i = 0; i < slice->len; ++i) { if (i == slice->len - 1) { printf("%d", data[i]); } else { printf("%d, ", data[i]); } } putchar(']'); putchar('\n'); } void output_str(struct cslice *slice) { const char *data = (const char *) slice->data; for (usize i = 0; i < slice->len; ++i) { putchar(data[i]); } putchar('\n'); } uint64_t dbg_stack_address(__attribute__((unused)) struct cslice *slice) { int i; void *ptr = (void *) &i; return (uintptr_t) ptr; } uint32_t __nac3_personality(uint32_t state, uint32_t exception_object, uint32_t context) { printf("__nac3_personality(state: %u, exception_object: %u, context: %u)\n", state, exception_object, context); exit(101); __builtin_unreachable(); } uint32_t __nac3_raise(uint32_t state, uint32_t exception_object, uint32_t context) { printf("__nac3_raise(state: %u, exception_object: %u, context: %u)\n", state, exception_object, context); exit(101); __builtin_unreachable(); } void __nac3_end_catch(void) {} extern int32_t run(void); int main(void) { run(); }