void ymd_panic(struct ymd_context *l, const char *fmt, ...) { va_list ap; char buf[MAX_MSG_LEN]; va_start(ap, fmt); vsnprintf(buf, sizeof(buf), fmt, ap); va_end(ap); return do_panic(l, buf); }
void *thead_main(void *data) { int re; Exception e; exception_init(&e); re = sigsetjmp(e.jmpbuf, 0); if (re == 0) { do_panic(data); } else { printf("exception_recover: %p\n", data); } exception_destroy(&e); return NULL; }
PARROT_DOES_NOT_RETURN static void failed_allocation(unsigned int line, unsigned long size) /* HEADERIZER SKIP */ { fprintf(stderr, "Failed allocation of %lu bytes\n", size); do_panic(NULL, "Out of mem", __FILE__, line); }