Mercurial > hg > xemacs-beta

comparison src/lread.c @ 2268:61855263cb07

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-09-14 14:32:29 by james] Identify functions that don't return, including some DEFUNs.
author james
date Tue, 14 Sep 2004 14:33:07 +0000
parents f2fdfc131770
children 04bc9d2f42c7
comparison
equal deleted inserted replaced
2267:5753220a0f80 2268:61855263cb07
215 to the Lisp level. */ 215 to the Lisp level. */
216 #define READCHARFUN_MAYBE(x) (LSTREAMP (x) \ 216 #define READCHARFUN_MAYBE(x) (LSTREAMP (x) \
217 ? (build_msg_string ("internal input stream")) \ 217 ? (build_msg_string ("internal input stream")) \
218 : (x)) 218 : (x))
219 219
220
221 static DECLARE_DOESNT_RETURN (read_syntax_error (const char *));
220 222
221 static DOESNT_RETURN 223 static DOESNT_RETURN
222 read_syntax_error (const char *string) 224 read_syntax_error (const char *string)
223 { 225 {
224 signal_error (Qinvalid_read_syntax, string, Qunbound); 226 signal_error (Qinvalid_read_syntax, string, Qunbound);