Mercurial > hg > xemacs-beta
comparison src/lread.c @ 3666:3214dca89755
[xemacs-hg @ 2006-11-07 15:58:21 by stephent]
Revert inadvertant commits to unicode.el, font-mgr.h, and lread.c.
author | stephent |
---|---|
date | Tue, 07 Nov 2006 15:58:24 +0000 |
parents | 5724b7632db3 |
children | 1abf84db2c7f |
comparison
equal
deleted
inserted
replaced
3665:5724b7632db3 | 3666:3214dca89755 |
---|---|
1718 static Ichar | 1718 static Ichar |
1719 read_escape (Lisp_Object readcharfun) | 1719 read_escape (Lisp_Object readcharfun) |
1720 { | 1720 { |
1721 /* This function can GC */ | 1721 /* This function can GC */ |
1722 Ichar c = readchar (readcharfun); | 1722 Ichar c = readchar (readcharfun); |
1723 /* \u allows up to four hex digits, \U up to eight. Default to the | |
1724 behaviour for \u, and change this value in the case that \U is seen. */ | |
1725 int unicode_hex_count = 4; | |
1726 | 1723 |
1727 if (c < 0) | 1724 if (c < 0) |
1728 signal_error (Qend_of_file, 0, READCHARFUN_MAYBE (readcharfun)); | 1725 signal_error (Qend_of_file, 0, READCHARFUN_MAYBE (readcharfun)); |
1729 | 1726 |
1730 switch (c) | 1727 switch (c) |