/[cmucl]/src/lisp/interr.h
ViewVC logotype

Contents of /src/lisp/interr.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (show annotations)
Mon Jul 12 23:44:07 2004 UTC (9 years, 9 months ago) by pmai
Branch: MAIN
CVS Tags: snapshot-2004-10, snapshot-2004-08, snapshot-2004-09, snapshot-2004-12, snapshot-2004-11, snapshot-2005-01
Changes since 1.1: +2 -2 lines
File MIME type: text/plain
Finish conversion from hardcoded sigcontext to os_context_t, as initiated
by the commit of the NetBSD support, and needed by the upcoming merge of
the OS X/Darwin port.
1 /*
2 * $Header: /tiger/var/lib/cvsroots/cmucl/src/lisp/interr.h,v 1.2 2004/07/12 23:44:07 pmai Exp $
3 */
4
5 #ifndef _INTERR_H_
6 #define _INTERR_H_
7
8 #define crap_out(msg) do { write(2, msg, sizeof(msg)); lose(); } while (0)
9
10 extern void lose(char *fmt, ...);
11 extern void set_lossage_handler(void fun(void));
12 extern void internal_error(os_context_t *context);
13
14 extern lispobj debug_print(lispobj string);
15
16 #endif

  ViewVC Help
Powered by ViewVC 1.1.5