diff options
Diffstat (limited to 'src/syntax.c')
| -rw-r--r-- | src/syntax.c | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/src/syntax.c b/src/syntax.c index 96ff69084f0..d82c88dcf18 100644 --- a/src/syntax.c +++ b/src/syntax.c | |||
| @@ -1173,8 +1173,8 @@ DEFUN ("internal-describe-syntax-value", Finternal_describe_syntax_value, | |||
| 1173 | 1173 | ||
| 1174 | 1174 | ||
| 1175 | static void | 1175 | static void |
| 1176 | describe_syntax (value) | 1176 | describe_syntax (value, args) |
| 1177 | Lisp_Object value; | 1177 | Lisp_Object value, args; |
| 1178 | { | 1178 | { |
| 1179 | Findent_to (make_number (16), make_number (1)); | 1179 | Findent_to (make_number (16), make_number (1)); |
| 1180 | Finternal_describe_syntax_value (value); | 1180 | Finternal_describe_syntax_value (value); |
| @@ -1188,13 +1188,14 @@ describe_syntax_1 (vector) | |||
| 1188 | { | 1188 | { |
| 1189 | struct buffer *old = current_buffer; | 1189 | struct buffer *old = current_buffer; |
| 1190 | set_buffer_internal (XBUFFER (Vstandard_output)); | 1190 | set_buffer_internal (XBUFFER (Vstandard_output)); |
| 1191 | describe_vector (vector, Qnil, describe_syntax, 0, Qnil, Qnil, (int *) 0, 0); | 1191 | describe_vector (vector, Qnil, Qnil, describe_syntax, |
| 1192 | 0, Qnil, Qnil, NULL, 0); | ||
| 1192 | while (! NILP (XCHAR_TABLE (vector)->parent)) | 1193 | while (! NILP (XCHAR_TABLE (vector)->parent)) |
| 1193 | { | 1194 | { |
| 1194 | vector = XCHAR_TABLE (vector)->parent; | 1195 | vector = XCHAR_TABLE (vector)->parent; |
| 1195 | insert_string ("\nThe parent syntax table is:"); | 1196 | insert_string ("\nThe parent syntax table is:"); |
| 1196 | describe_vector (vector, Qnil, describe_syntax, 0, Qnil, Qnil, | 1197 | describe_vector (vector, Qnil, Qnil, describe_syntax, |
| 1197 | (int *) 0, 0); | 1198 | 0, Qnil, Qnil, NULL, 0); |
| 1198 | } | 1199 | } |
| 1199 | 1200 | ||
| 1200 | call0 (intern ("help-mode")); | 1201 | call0 (intern ("help-mode")); |