Mercurial > hg > xemacs-beta
comparison src/lread.c @ 4450:ac6231e0c1df
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 |
comparison
equal
deleted
inserted
replaced
4449:13ce402e1736 | 4450:ac6231e0c1df |
---|---|
2780 if (c < 0) | 2780 if (c < 0) |
2781 return Fsignal (Qend_of_file, list1 (READCHARFUN_MAYBE (readcharfun))); | 2781 return Fsignal (Qend_of_file, list1 (READCHARFUN_MAYBE (readcharfun))); |
2782 | 2782 |
2783 if (c == '\\') | 2783 if (c == '\\') |
2784 c = read_escape (readcharfun); | 2784 c = read_escape (readcharfun); |
2785 if (c < 0) | |
2786 return Fsignal (Qinvalid_read_syntax, list1 (READCHARFUN_MAYBE (readcharfun))); | |
2785 return make_char (c); | 2787 return make_char (c); |
2786 } | 2788 } |
2787 | 2789 |
2788 case '\"': | 2790 case '\"': |
2789 /* String */ | 2791 /* String */ |