diff src/chartab.c @ 90047:20480108ff4e

(map_char_table): GCPRO table and arg.
author Andreas Schwab <schwab@suse.de>
date Wed, 24 Nov 2004 00:44:49 +0000
parents cce857c68ba2
children d563fa5ce200
line wrap: on
line diff
--- a/src/chartab.c	Fri Nov 19 06:55:13 2004 +0000
+++ b/src/chartab.c	Wed Nov 24 00:44:49 2004 +0000
@@ -772,10 +772,10 @@
 {
   Lisp_Object range, val;
   int c, i;
-  struct gcpro gcpro1;
+  struct gcpro gcpro1, gcpro2, gcpro3;
 
   range = Fcons (make_number (0), Qnil);
-  GCPRO1 (range);
+  GCPRO3 (table, arg, range);
   val = XCHAR_TABLE (table)->ascii;
   if (SUB_CHAR_TABLE_P (val))
     val = XSUB_CHAR_TABLE (val)->contents[0];