Mercurial > emacs
changeset 5442:8cbae747a768
(describe_syntax): Handle Sinherit.
(syntax_code_spec, syntax_spec_code): Add entry for @ and Sinherit.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 05 Jan 1994 20:33:23 +0000 |
parents | 0af9674da850 |
children | 391bfbbb9c1d |
files | src/syntax.c |
diffstat | 1 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/syntax.c Wed Jan 05 20:33:02 1994 +0000 +++ b/src/syntax.c Wed Jan 05 20:33:23 1994 +0000 @@ -197,7 +197,7 @@ 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, (char) Scomment, 0377, (char) Sendcomment, 0377, - 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, /* @, A, ... */ + (char) Sinherit, 0377, 0377, 0377, 0377, 0377, 0377, 0377, /* @, A ... */ 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, 0377, (char) Sword, 0377, 0377, 0377, 0377, (char) Sescape, 0377, 0377, (char) Ssymbol, @@ -209,9 +209,9 @@ /* Indexed by syntax code, give the letter that describes it. */ -char syntax_code_spec[13] = +char syntax_code_spec[14] = { - ' ', '.', 'w', '_', '(', ')', '\'', '\"', '$', '\\', '/', '<', '>' + ' ', '.', 'w', '_', '(', ')', '\'', '\"', '$', '\\', '/', '<', '>', '@' }; DEFUN ("char-syntax", Fchar_syntax, Schar_syntax, 1, 1, 0, @@ -241,7 +241,7 @@ \" string quote. \\ escape.\n\ $ paired delimiter. ' expression quote or prefix operator.\n\ < comment starter. > comment ender.\n\ - / character-quote.\n\ + / character-quote. @ inherit from `standard-syntax-table'.\n\ \n\ Only single-character comment start and end sequences are represented thus.\n\ Two-character sequences are represented as described below.\n\ @@ -420,6 +420,8 @@ insert_string ("comment"); break; case Sendcomment: insert_string ("endcomment"); break; + case Sinherit: + insert_string ("inherit"); break; default: insert_string ("invalid"); return;