[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/fns.c [lexbind]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/src/fns.c [lexbind] |
Date: |
Mon, 25 Oct 2004 00:47:25 -0400 |
Index: emacs/src/fns.c
diff -c emacs/src/fns.c:1.314.2.15 emacs/src/fns.c:1.314.2.16
*** emacs/src/fns.c:1.314.2.15 Sat Sep 4 09:20:09 2004
--- emacs/src/fns.c Mon Oct 25 04:19:35 2004
***************
*** 2705,2710 ****
--- 2705,2713 ----
int depth;
{
int i, to;
+ struct gcpro gcpro1, gcpro2, gcpro3, gcpro4;
+
+ GCPRO4 (arg, table, subtable, function);
if (depth == 0)
{
***************
*** 2724,2730 ****
#if 0 /* If the char table has entries for higher characters,
we should report them. */
if (NILP (current_buffer->enable_multibyte_characters))
! return;
#endif
to = CHAR_TABLE_ORDINARY_SLOTS;
}
--- 2727,2736 ----
#if 0 /* If the char table has entries for higher characters,
we should report them. */
if (NILP (current_buffer->enable_multibyte_characters))
! {
! UNGCPRO;
! return;
! }
#endif
to = CHAR_TABLE_ORDINARY_SLOTS;
}
***************
*** 2777,2782 ****
--- 2783,2789 ----
call2 (function, make_number (c), elt);
}
}
+ UNGCPRO;
}
static void void_call2 P_ ((Lisp_Object a, Lisp_Object b, Lisp_Object c));
- [Emacs-diffs] Changes to emacs/src/fns.c [lexbind],
Miles Bader <=