diff options
| author | Richard M. Stallman <rms@gnu.org> | 2006-06-19 21:54:58 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2006-06-19 21:54:58 +0000 |
| commit | 58fbfe40795e0764b9c19eac0ea69b99046e1ae3 (patch) | |
| tree | 944ff662e2ca49549a9784f62482bfc2f2a0e19b /src/syntax.c | |
| parent | 6417c8bf98c27513589d051a8fde9dcaf9a220bb (diff) | |
| download | emacs-58fbfe40795e0764b9c19eac0ea69b99046e1ae3.tar.gz | |
(init_syntax_once): Give most control chars' syntax Spunct.
Diffstat (limited to 'src/syntax.c')
| -rw-r--r-- | src/syntax.c | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/syntax.c b/src/syntax.c index 1c8d0debbf3..9af4773a01b 100644 --- a/src/syntax.c +++ b/src/syntax.c @@ -3122,6 +3122,20 @@ init_syntax_once () Vstandard_syntax_table = Fmake_char_table (Qsyntax_table, temp); + /* Control characters should not be whitespace. */ + temp = XVECTOR (Vsyntax_code_object)->contents[(int) Spunct]; + for (i = 0; i <= ' ' - 1; i++) + SET_RAW_SYNTAX_ENTRY (Vstandard_syntax_table, i, temp); + SET_RAW_SYNTAX_ENTRY (Vstandard_syntax_table, 0177, temp); + + /* Except that a few really are whitespace. */ + temp = XVECTOR (Vsyntax_code_object)->contents[(int) Swhitespace]; + SET_RAW_SYNTAX_ENTRY (Vstandard_syntax_table, ' ', temp); + SET_RAW_SYNTAX_ENTRY (Vstandard_syntax_table, '\t', temp); + SET_RAW_SYNTAX_ENTRY (Vstandard_syntax_table, '\n', temp); + SET_RAW_SYNTAX_ENTRY (Vstandard_syntax_table, 015, temp); + SET_RAW_SYNTAX_ENTRY (Vstandard_syntax_table, 014, temp); + temp = XVECTOR (Vsyntax_code_object)->contents[(int) Sword]; for (i = 'a'; i <= 'z'; i++) SET_RAW_SYNTAX_ENTRY (Vstandard_syntax_table, i, temp); |