diff options
| author | Dan Nicolaescu | 2010-07-12 21:47:45 -0700 |
|---|---|---|
| committer | Dan Nicolaescu | 2010-07-12 21:47:45 -0700 |
| commit | b3ffc17c5dafe807981af3e0b72b3508d3b4fff4 (patch) | |
| tree | 9ead3d845ae4b514f7330a27e335fbe443442dfd /src/lisp.h | |
| parent | 0521f5806bfc9ad55488c26c9808f513b9384ff4 (diff) | |
| download | emacs-b3ffc17c5dafe807981af3e0b72b3508d3b4fff4.tar.gz emacs-b3ffc17c5dafe807981af3e0b72b3508d3b4fff4.zip | |
Convert maybe_fatal to standard C.
* src/lisp.h (verror): Declare.
* src/eval.c (verror): New function containing the code from ...
(error): ... this. Call verror.
* src/term.c (vfatal): New function containing the code from ...
(fatal): ... this. Call vfatal.
(maybe_fatal): Convert to standard C, use variable number of
arguments. Declare as non-return.
(init_tty): Fix maybe_fatal call.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lisp.h b/src/lisp.h index 656e8fbb624..3ec2ed07ed9 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -2908,6 +2908,7 @@ extern void specbind (Lisp_Object, Lisp_Object); | |||
| 2908 | extern void record_unwind_protect (Lisp_Object (*) (Lisp_Object), Lisp_Object); | 2908 | extern void record_unwind_protect (Lisp_Object (*) (Lisp_Object), Lisp_Object); |
| 2909 | extern Lisp_Object unbind_to (int, Lisp_Object); | 2909 | extern Lisp_Object unbind_to (int, Lisp_Object); |
| 2910 | extern void error (const char *, ...) NO_RETURN; | 2910 | extern void error (const char *, ...) NO_RETURN; |
| 2911 | extern void verror (const char *, va_list) NO_RETURN; | ||
| 2911 | extern void do_autoload (Lisp_Object, Lisp_Object); | 2912 | extern void do_autoload (Lisp_Object, Lisp_Object); |
| 2912 | extern Lisp_Object un_autoload (Lisp_Object); | 2913 | extern Lisp_Object un_autoload (Lisp_Object); |
| 2913 | EXFUN (Ffetch_bytecode, 1); | 2914 | EXFUN (Ffetch_bytecode, 1); |