X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Finterr.h;h=e527fcb68df88e25bacda459f772f56d7e0766c6;hb=22a6702974b7d6ff4e8f2b3b7b5ff446fc632de0;hp=f9d80e63529b894d152f90f00245feab6a6c509b;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git diff --git a/src/runtime/interr.h b/src/runtime/interr.h index f9d80e6..e527fcb 100644 --- a/src/runtime/interr.h +++ b/src/runtime/interr.h @@ -9,15 +9,12 @@ * files for more information. */ -/* - * $Header$ - */ - #ifndef _INTERR_H_ #define _INTERR_H_ -extern void lose(char *fmt, ...); -extern void set_lossage_handler(void fun(void)); +extern void lose(char *fmt, ...) never_returns; +extern void enable_lossage_handler(void); +extern void disable_lossage_handler(void); extern void describe_internal_error(os_context_t *context); extern lispobj debug_print(lispobj string);