diff options
| author | Mattias EngdegÄrd | 2024-07-25 17:10:53 +0200 |
|---|---|---|
| committer | Mattias EngdegÄrd | 2025-07-07 17:11:55 +0200 |
| commit | 501bb04e53ee43736d941d0bd492cf88ea6b3385 (patch) | |
| tree | 2f4fcd8ead8a25735fb84b80f01bdfa7c717c934 /src | |
| parent | 83da45ddd0a941b67651890f138d2c64e398eb79 (diff) | |
| download | emacs-501bb04e53ee43736d941d0bd492cf88ea6b3385.tar.gz emacs-501bb04e53ee43736d941d0bd492cf88ea6b3385.zip | |
; * src/lread.c (skip_lazy_string): more precise comment
The bool vector compat hack is there for a bug in Emacs 19 only.
Diffstat (limited to 'src')
| -rw-r--r-- | src/lread.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lread.c b/src/lread.c index 5d9bdb065e8..07cbb58c4ec 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -3635,9 +3635,9 @@ read_bool_vector (Lisp_Object readcharfun) | |||
| 3635 | Lisp_Object str = read_string_literal (readcharfun); | 3635 | Lisp_Object str = read_string_literal (readcharfun); |
| 3636 | if (STRING_MULTIBYTE (str) | 3636 | if (STRING_MULTIBYTE (str) |
| 3637 | || !(size_in_chars == SCHARS (str) | 3637 | || !(size_in_chars == SCHARS (str) |
| 3638 | /* We used to print 1 char too many when the number of bits | 3638 | /* Emacs 19 printed 1 char too many when the number of bits |
| 3639 | was a multiple of 8. Accept such input in case it came | 3639 | was a multiple of 8. Accept such input in case it came |
| 3640 | from an old version. */ | 3640 | from that old version. */ |
| 3641 | || length == (SCHARS (str) - 1) * BOOL_VECTOR_BITS_PER_CHAR)) | 3641 | || length == (SCHARS (str) - 1) * BOOL_VECTOR_BITS_PER_CHAR)) |
| 3642 | invalid_syntax ("#&...", readcharfun); | 3642 | invalid_syntax ("#&...", readcharfun); |
| 3643 | 3643 | ||