diff options
author | Richard M. Stallman <rms@gnu.org> | 1994-01-05 20:33:23 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1994-01-05 20:33:23 +0000 |
commit | 6cb71bf6c64e1701b5d6105db0420ddf1536252b (patch) | |
tree | 1c56a696057f1d34f1602089b4c6141d8062aa49 /src/syntax.c | |
parent | c8cdcb16ad52a122fc28fa4ddc3a62e1e0654e22 (diff) | |
download | emacs-6cb71bf6c64e1701b5d6105db0420ddf1536252b.tar.gz |
(describe_syntax): Handle Sinherit.
(syntax_code_spec, syntax_spec_code): Add entry for @ and Sinherit.
Diffstat (limited to 'src/syntax.c')
-rw-r--r-- | src/syntax.c | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/src/syntax.c b/src/syntax.c index e119e7f8d7f..cae5eb49893 100644 --- a/src/syntax.c +++ b/src/syntax.c @@ -197,7 +197,7 @@ unsigned char syntax_spec_code[0400] = 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 @@ unsigned char syntax_spec_code[0400] = /* 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 @@ The first character of S should be one of the following:\n\ \" 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 @@ describe_syntax (value) insert_string ("comment"); break; case Sendcomment: insert_string ("endcomment"); break; + case Sinherit: + insert_string ("inherit"); break; default: insert_string ("invalid"); return; |