From: Kim F. Storm Date: Tue, 18 Jul 2006 13:28:28 +0000 (+0000) Subject: (list1): Add EXFUN. X-Git-Tag: emacs-pretest-22.0.90~1365 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7e85c1aa4daec9267204ac5757a3f149a7914c6a;p=emacs.git (list1): Add EXFUN. (xsignal, xsignal0, xsignal1, xsignal2, xsignal3, signal_error): Add prototypes. Mark them as no-return. --- diff --git a/src/lisp.h b/src/lisp.h index e276ac02b28..8d9e2b7cfa4 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -2556,6 +2556,7 @@ extern void mark_object P_ ((Lisp_Object)); extern Lisp_Object Vpurify_flag; extern Lisp_Object Vmemory_full; EXFUN (Fcons, 2); +EXFUN (list1, 1); EXFUN (list2, 2); EXFUN (list3, 3); EXFUN (list4, 4); @@ -2708,6 +2709,12 @@ EXFUN (Fthrow, 2) NO_RETURN; EXFUN (Funwind_protect, UNEVALLED); EXFUN (Fcondition_case, UNEVALLED); EXFUN (Fsignal, 2); +extern void xsignal P_ ((Lisp_Object, Lisp_Object)) NO_RETURN; +extern void xsignal0 P_ ((Lisp_Object)) NO_RETURN; +extern void xsignal1 P_ ((Lisp_Object, Lisp_Object)) NO_RETURN; +extern void xsignal2 P_ ((Lisp_Object, Lisp_Object, Lisp_Object)) NO_RETURN; +extern void xsignal3 P_ ((Lisp_Object, Lisp_Object, Lisp_Object, Lisp_Object)) NO_RETURN; +extern void signal_error P_ ((char *, Lisp_Object)) NO_RETURN; EXFUN (Fautoload, 5); EXFUN (Fcommandp, 2); EXFUN (Feval, 1);