X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fwin32-os.h;h=1526e8d88c7ef99a953d6d7d66a5805692b91434;hb=409fcc671231b594ec010adf683f72a871ec1d6a;hp=4435b6fd7f3a641b02298cfb40d0e760186258a0;hpb=7fb597b585fc715537ea644f7d84440eca217ca1;p=sbcl.git diff --git a/src/runtime/win32-os.h b/src/runtime/win32-os.h index 4435b6f..1526e8d 100644 --- a/src/runtime/win32-os.h +++ b/src/runtime/win32-os.h @@ -43,8 +43,9 @@ typedef void *siginfo_t; 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); +