X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fwin32-os.h;h=a09c37f909bf461b25c8dfa7f0e62d577b71ae78;hb=c553e4be6da2d18f0827f190589c88e837b8b8a6;hp=4435b6fd7f3a641b02298cfb40d0e760186258a0;hpb=7fb597b585fc715537ea644f7d84440eca217ca1;p=sbcl.git diff --git a/src/runtime/win32-os.h b/src/runtime/win32-os.h index 4435b6f..a09c37f 100644 --- a/src/runtime/win32-os.h +++ b/src/runtime/win32-os.h @@ -35,7 +35,6 @@ typedef void *siginfo_t; #define SIG_MEMORY_FAULT SIGSEGV -#define SIG_INTERRUPT_THREAD (SIGRTMIN) #define SIG_STOP_FOR_GC (SIGRTMIN+1) #define SIG_DEQUEUE (SIGRTMIN+2) #define SIG_THREAD_EXIT (SIGRTMIN+3) @@ -43,8 +42,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); +