Mercurial > hg > octave-nkf
diff liboctave/lo-error.h @ 222:a592507b3bad
[project @ 1993-11-14 10:54:16 by jwe]
Initial revision
author | jwe |
---|---|
date | Sun, 14 Nov 1993 10:54:16 +0000 |
parents | |
children | 82c050e70f7a |
line wrap: on
line diff
new file mode 100644 --- /dev/null +++ b/liboctave/lo-error.h @@ -0,0 +1,54 @@ +// error.h -*- C++ -*- +/* + +Copyright (C) 1992, 1993 John W. Eaton + +This file is part of Octave. + +Octave is free software; you can redistribute it and/or modify it +under the terms of the GNU General Public License as published by the +Free Software Foundation; either version 2, or (at your option) any +later version. + +Octave is distributed in the hope that it will be useful, but WITHOUT +ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +for more details. + +You should have received a copy of the GNU General Public License +along with Octave; see the file COPYING. If not, write to the Free +Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. + +*/ + +#if !defined (_error_h) +#define _error_h 1 + +#ifdef __GNUG__ +#pragma interface +#endif + +// Tell g++ that fatal doesn't return; + +#ifdef __GNUG__ +typedef void v_fcn_cpc_x (const char *, ...); +volatile v_fcn_cpc_x fatal; +#endif + +typedef void (*liboctave_error_handler) (const char *, ...); + +extern void set_liboctave_error_handler (liboctave_error_handler f); + +extern void liboctave_fatal (const char *fmt, ...); + +// Current error state. +extern int error_state; + +#endif + +/* +;;; Local Variables: *** +;;; mode: C++ *** +;;; page-delimiter: "^/\\*" *** +;;; End: *** +*/