struct lisp_exception_frame {
struct lisp_exception_frame *next_frame;
void *handler;
- CONTEXT context;
- EXCEPTION_RECORD exception;
+ lispobj *bindstack_pointer;
};
void wos_install_interrupt_handlers(struct lisp_exception_frame *handler);
+char *dirname(char *path);
+