Mercurial > hg > xemacs-beta
diff src/casetab.c @ 2286:04bc9d2f42c7
[xemacs-hg @ 2004-09-20 19:18:55 by james]
Mark all unused parameters as unused. Also eliminate some unneeded local
variables.
| author | james |
|---|---|
| date | Mon, 20 Sep 2004 19:20:08 +0000 |
| parents | e22b0213b713 |
| children | 6fa9919a9a0b |
line wrap: on
line diff
--- a/src/casetab.c Mon Sep 20 19:11:29 2004 +0000 +++ b/src/casetab.c Mon Sep 20 19:20:08 2004 +0000 @@ -85,7 +85,8 @@ } static void -print_case_table (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag) +print_case_table (Lisp_Object obj, Lisp_Object printcharfun, + int UNUSED (escapeflag)) { Lisp_Case_Table *ct = XCASE_TABLE (obj); if (print_readably) @@ -286,7 +287,7 @@ static int compute_canon_mapper (struct chartab_range *range, - Lisp_Object table, Lisp_Object val, void *arg) + Lisp_Object UNUSED (table), Lisp_Object val, void *arg) { Lisp_Object casetab = VOID_TO_LISP (arg); if (range->type == CHARTAB_RANGE_CHAR) @@ -300,7 +301,8 @@ static int initialize_identity_mapper (struct chartab_range *range, - Lisp_Object table, Lisp_Object val, void *arg) + Lisp_Object UNUSED (table), + Lisp_Object UNUSED (val), void *arg) { Lisp_Object trt = VOID_TO_LISP (arg); if (range->type == CHARTAB_RANGE_CHAR) @@ -311,7 +313,8 @@ static int compute_up_or_eqv_mapper (struct chartab_range *range, - Lisp_Object table, Lisp_Object val, void *arg) + Lisp_Object UNUSED (table), + Lisp_Object val, void *arg) { Lisp_Object inverse = VOID_TO_LISP (arg); Ichar toch = XCHAR (val);