Mercurial > hg > xemacs-beta

diff src/lread.c @ 4450:ac6231e0c1df

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Automated merge with file:/Sources/xemacs-21.5-checked-out
author Aidan Kehoe <kehoea@parhasard.net>
date Wed, 07 May 2008 21:21:08 +0200
parents fd8a9a4d81d9 f4eb31866c38
children 7869173584fc
line wrap: on
line diff
--- a/src/lread.c	Wed May 07 21:17:59 2008 +0200
+++ b/src/lread.c	Wed May 07 21:21:08 2008 +0200
@@ -2782,6 +2782,8 @@
 
 	if (c == '\\')
 	  c = read_escape (readcharfun);
+	if (c < 0)
+	  return Fsignal (Qinvalid_read_syntax, list1 (READCHARFUN_MAYBE (readcharfun)));
 	return make_char (c);
       }