Mercurial > hg > xemacs-beta
comparison src/syntax.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 | 54e1ecdc5778 |
children | 13a418960a88 |
comparison
equal
deleted
inserted
replaced
2285:914c5afaac33 | 2286:04bc9d2f42c7 |
---|---|
456 | 456 |
457 It might be worth it at some point to merge provided syntax tables | 457 It might be worth it at some point to merge provided syntax tables |
458 outward to the current buffer (#### rewrite in English please?!). */ | 458 outward to the current buffer (#### rewrite in English please?!). */ |
459 | 459 |
460 void | 460 void |
461 update_syntax_cache (struct syntax_cache *cache, Charxpos cpos, int count) | 461 update_syntax_cache (struct syntax_cache *cache, Charxpos cpos, |
462 int UNUSED (count)) | |
462 { | 463 { |
463 Lisp_Object tmp_table; | 464 Lisp_Object tmp_table; |
464 Bytexpos pos; | 465 Bytexpos pos; |
465 Bytexpos lim; | 466 Bytexpos lim; |
466 Bytexpos next, prev; | 467 Bytexpos next, prev; |
613 } | 614 } |
614 | 615 |
615 #ifdef MULE | 616 #ifdef MULE |
616 | 617 |
617 enum syntaxcode | 618 enum syntaxcode |
618 charset_syntax (struct buffer *buf, Lisp_Object charset, int *multi_p_out) | 619 charset_syntax (struct buffer *UNUSED (buf), Lisp_Object UNUSED (charset), |
620 int *multi_p_out) | |
619 { | 621 { |
620 *multi_p_out = 1; | 622 *multi_p_out = 1; |
621 /* !!#### get this right */ | 623 /* !!#### get this right */ |
622 return Spunct; | 624 return Spunct; |
623 } | 625 } |
2232 When `set-syntax-table' is called, we set the buffer's mirror | 2234 When `set-syntax-table' is called, we set the buffer's mirror |
2233 syntax table as well. | 2235 syntax table as well. |
2234 */ | 2236 */ |
2235 | 2237 |
2236 static int | 2238 static int |
2237 copy_to_mirrortab (struct chartab_range *range, Lisp_Object table, | 2239 copy_to_mirrortab (struct chartab_range *range, Lisp_Object UNUSED (table), |
2238 Lisp_Object val, void *arg) | 2240 Lisp_Object val, void *arg) |
2239 { | 2241 { |
2240 Lisp_Object mirrortab = VOID_TO_LISP (arg); | 2242 Lisp_Object mirrortab = VOID_TO_LISP (arg); |
2241 | 2243 |
2242 if (CONSP (val)) | 2244 if (CONSP (val)) |
2245 put_char_table (mirrortab, range, val); | 2247 put_char_table (mirrortab, range, val); |
2246 return 0; | 2248 return 0; |
2247 } | 2249 } |
2248 | 2250 |
2249 static int | 2251 static int |
2250 copy_if_not_already_present (struct chartab_range *range, Lisp_Object table, | 2252 copy_if_not_already_present (struct chartab_range *range, |
2253 Lisp_Object UNUSED (table), | |
2251 Lisp_Object val, void *arg) | 2254 Lisp_Object val, void *arg) |
2252 { | 2255 { |
2253 Lisp_Object mirrortab = VOID_TO_LISP (arg); | 2256 Lisp_Object mirrortab = VOID_TO_LISP (arg); |
2254 if (CONSP (val)) | 2257 if (CONSP (val)) |
2255 val = XCAR (val); | 2258 val = XCAR (val); |