2705 |
int depth; |
int depth; |
2706 |
{ |
{ |
2707 |
int i, to; |
int i, to; |
2708 |
|
struct gcpro gcpro1, gcpro2, gcpro3, gcpro4; |
2709 |
|
|
2710 |
|
GCPRO4 (arg, table, subtable, function); |
2711 |
|
|
2712 |
if (depth == 0) |
if (depth == 0) |
2713 |
{ |
{ |
2727 |
#if 0 /* If the char table has entries for higher characters, |
#if 0 /* If the char table has entries for higher characters, |
2728 |
we should report them. */ |
we should report them. */ |
2729 |
if (NILP (current_buffer->enable_multibyte_characters)) |
if (NILP (current_buffer->enable_multibyte_characters)) |
2730 |
return; |
{ |
2731 |
|
UNGCPRO; |
2732 |
|
return; |
2733 |
|
} |
2734 |
#endif |
#endif |
2735 |
to = CHAR_TABLE_ORDINARY_SLOTS; |
to = CHAR_TABLE_ORDINARY_SLOTS; |
2736 |
} |
} |
2783 |
call2 (function, make_number (c), elt); |
call2 (function, make_number (c), elt); |
2784 |
} |
} |
2785 |
} |
} |
2786 |
|
UNGCPRO; |
2787 |
} |
} |
2788 |
|
|
2789 |
static void void_call2 P_ ((Lisp_Object a, Lisp_Object b, Lisp_Object c)); |
static void void_call2 P_ ((Lisp_Object a, Lisp_Object b, Lisp_Object c)); |