diff options
| author | Paul Eggert | 2012-05-26 01:30:49 -0700 |
|---|---|---|
| committer | Paul Eggert | 2012-05-26 01:30:49 -0700 |
| commit | 4cfd81f6c9755fb87eaf9f529c2bcbb0a30edfcf (patch) | |
| tree | 334a713c1fa695078a0ced9a279eb23506b97d3f /src | |
| parent | 4446092afffb588fec435785b9c7bfa4acac20d1 (diff) | |
| download | emacs-4cfd81f6c9755fb87eaf9f529c2bcbb0a30edfcf.tar.gz emacs-4cfd81f6c9755fb87eaf9f529c2bcbb0a30edfcf.zip | |
* lread.c (read1): Simplify slightly to avoid an overflow warning
with GCC 4.7.0 on x86-64.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/lread.c | 11 |
2 files changed, 8 insertions, 8 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index acae070f068..2981e754c8a 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2012-05-26 Paul Eggert <eggert@cs.ucla.edu> | ||
| 2 | |||
| 3 | * lread.c (read1): Simplify slightly to avoid an overflow warning | ||
| 4 | with GCC 4.7.0 on x86-64. | ||
| 5 | |||
| 1 | 2012-05-26 Eli Zaretskii <eliz@gnu.org> | 6 | 2012-05-26 Eli Zaretskii <eliz@gnu.org> |
| 2 | 7 | ||
| 3 | * bidi.c (bidi_mirror_char): Revert last change: an int is | 8 | * bidi.c (bidi_mirror_char): Revert last change: an int is |
diff --git a/src/lread.c b/src/lread.c index 80250cfcb1c..7aba203d685 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -2986,19 +2986,14 @@ read1 (register Lisp_Object readcharfun, int *pch, int first_in_list) | |||
| 2986 | if (!NILP (Vpurify_flag) && NILP (Vdoc_file_name) && cancel) | 2986 | if (!NILP (Vpurify_flag) && NILP (Vdoc_file_name) && cancel) |
| 2987 | return make_number (0); | 2987 | return make_number (0); |
| 2988 | 2988 | ||
| 2989 | if (force_multibyte) | 2989 | if (! force_multibyte && force_singlebyte) |
| 2990 | /* READ_BUFFER already contains valid multibyte forms. */ | ||
| 2991 | ; | ||
| 2992 | else if (force_singlebyte) | ||
| 2993 | { | 2990 | { |
| 2991 | /* READ_BUFFER contains raw 8-bit bytes and no multibyte | ||
| 2992 | forms. Convert it to unibyte. */ | ||
| 2994 | nchars = str_as_unibyte ((unsigned char *) read_buffer, | 2993 | nchars = str_as_unibyte ((unsigned char *) read_buffer, |
| 2995 | p - read_buffer); | 2994 | p - read_buffer); |
| 2996 | p = read_buffer + nchars; | 2995 | p = read_buffer + nchars; |
| 2997 | } | 2996 | } |
| 2998 | else | ||
| 2999 | { | ||
| 3000 | /* Otherwise, READ_BUFFER contains only ASCII. */ | ||
| 3001 | } | ||
| 3002 | 2997 | ||
| 3003 | return make_specified_string (read_buffer, nchars, p - read_buffer, | 2998 | return make_specified_string (read_buffer, nchars, p - read_buffer, |
| 3004 | (force_multibyte | 2999 | (force_multibyte |