1173 |
|
|
1174 |
|
|
1175 |
static void |
static void |
1176 |
describe_syntax (value) |
describe_syntax (value, args) |
1177 |
Lisp_Object value; |
Lisp_Object value, args; |
1178 |
{ |
{ |
1179 |
Findent_to (make_number (16), make_number (1)); |
Findent_to (make_number (16), make_number (1)); |
1180 |
Finternal_describe_syntax_value (value); |
Finternal_describe_syntax_value (value); |
1188 |
{ |
{ |
1189 |
struct buffer *old = current_buffer; |
struct buffer *old = current_buffer; |
1190 |
set_buffer_internal (XBUFFER (Vstandard_output)); |
set_buffer_internal (XBUFFER (Vstandard_output)); |
1191 |
describe_vector (vector, Qnil, describe_syntax, 0, Qnil, Qnil, (int *) 0, 0); |
describe_vector (vector, Qnil, Qnil, describe_syntax, |
1192 |
|
0, Qnil, Qnil, NULL, 0); |
1193 |
while (! NILP (XCHAR_TABLE (vector)->parent)) |
while (! NILP (XCHAR_TABLE (vector)->parent)) |
1194 |
{ |
{ |
1195 |
vector = XCHAR_TABLE (vector)->parent; |
vector = XCHAR_TABLE (vector)->parent; |
1196 |
insert_string ("\nThe parent syntax table is:"); |
insert_string ("\nThe parent syntax table is:"); |
1197 |
describe_vector (vector, Qnil, describe_syntax, 0, Qnil, Qnil, |
describe_vector (vector, Qnil, Qnil, describe_syntax, |
1198 |
(int *) 0, 0); |
0, Qnil, Qnil, NULL, 0); |
1199 |
} |
} |
1200 |
|
|
1201 |
call0 (intern ("help-mode")); |
call0 (intern ("help-mode")); |