aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorEli Zaretskii2006-06-25 03:22:50 +0000
committerEli Zaretskii2006-06-25 03:22:50 +0000
commita3ac22e4480c64f6d250b9121ea2f7427b53a243 (patch)
treeeb9fb6f5dec5832add5f21f43964b0a1f3bb955c /src
parent0815600c96f31cec65cc0dc0fd90796aedc5331d (diff)
downloademacs-a3ac22e4480c64f6d250b9121ea2f7427b53a243.tar.gz
emacs-a3ac22e4480c64f6d250b9121ea2f7427b53a243.zip
Fix whitespace of last change.
Diffstat (limited to 'src')
-rw-r--r--src/lread.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/lread.c b/src/lread.c
index a3da8489e49..40ce584d335 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1947,7 +1947,7 @@ read_escape (readcharfun, stringp, byterep)
1947 while (++count <= unicode_hex_count) 1947 while (++count <= unicode_hex_count)
1948 { 1948 {
1949 c = READCHAR; 1949 c = READCHAR;
1950 /* isdigit(), isalpha() may be locale-specific, which we don't 1950 /* isdigit and isalpha may be locale-specific, which we don't
1951 want. */ 1951 want. */
1952 if (c >= '0' && c <= '9') i = (i << 4) + (c - '0'); 1952 if (c >= '0' && c <= '9') i = (i << 4) + (c - '0');
1953 else if (c >= 'a' && c <= 'f') i = (i << 4) + (c - 'a') + 10; 1953 else if (c >= 'a' && c <= 'f') i = (i << 4) + (c - 'a') + 10;
@@ -1960,11 +1960,11 @@ read_escape (readcharfun, stringp, byterep)
1960 } 1960 }
1961 1961
1962 GCPRO1 (readcharfun); 1962 GCPRO1 (readcharfun);
1963 lisp_char = call2(intern("decode-char"), intern("ucs"), 1963 lisp_char = call2 (intern ("decode-char"), intern ("ucs"),
1964 make_number(i)); 1964 make_number (i));
1965 UNGCPRO; 1965 UNGCPRO;
1966 1966
1967 if (NILP(lisp_char)) 1967 if (NILP (lisp_char))
1968 { 1968 {
1969 error ("Unsupported Unicode code point: U+%x", (unsigned)i); 1969 error ("Unsupported Unicode code point: U+%x", (unsigned)i);
1970 } 1970 }