# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1072684317 0
# Node ID d3302f68a7cf64c1390a2ac9c89e6504dd1ea416
# Parent  0747ef3c747cdd0497711de35d3be54a94c8217e
(charset_table_used): Make it static.
(map_charset_chars): Fix args to c_function with.

diff -r 0747ef3c747c -r d3302f68a7cf src/charset.c
--- a/src/charset.c	Mon Dec 29 07:51:39 2003 +0000
+++ b/src/charset.c	Mon Dec 29 07:51:57 2003 +0000
@@ -63,7 +63,7 @@
 struct charset *charset_table;
 
 static int charset_table_size;
-int charset_table_used;
+static int charset_table_used;
 
 Lisp_Object Qcharsetp;
 
@@ -583,7 +583,7 @@
 
       range = Fcons (make_number (from_c), make_number (to_c));
       if (NILP (function))
-	(*c_function) (range, arg);
+	(*c_function) (arg, range);
       else
 	call2 (function, range, arg);
     }
@@ -598,7 +598,7 @@
 	    XSETCAR (range, make_number (127));
 
 	  if (NILP (function))
-	    (*c_function) (range, arg);
+	    (*c_function) (arg, range);
 	  else
 	    call2 (function, range, arg);
 	}