diff options
author | Juanma Barranquero <[email protected]> | 2010-07-23 19:50:14 +0200 |
---|---|---|
committer | Juanma Barranquero <[email protected]> | 2010-07-23 19:50:14 +0200 |
commit | 33ac04147b6c42796f4c0c16d6aeb261033c171e (patch) | |
tree | 41a8f653f89ff485760e3fe495bc78fe24e4a967 /src/font.c | |
parent | 225d5e9e16070f908c22e1b40bf9db29fdf17c20 (diff) |
Remove unused static functions.
* alloc.c (free_float)
* font.c [ENABLE_CHECKING] (font_match_xlfd, font_check_xlfd_parse)
* frame.c (delete_frame_handler)
* ralloc.c (reorder_bloc)
* w32menu.c (menubar_id_to_frame, add_left_right_boundary)
Diffstat (limited to 'src/font.c')
-rw-r--r-- | src/font.c | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/src/font.c b/src/font.c index cb3e9c5d32..2302220472 100644 --- a/src/font.c +++ b/src/font.c @@ -980,39 +980,6 @@ font_expand_wildcards (Lisp_Object *field, int n) } -#ifdef ENABLE_CHECKING -/* Match a 14-field XLFD pattern against a full XLFD font name. */ -static int -font_match_xlfd (char *pattern, char *name) -{ - while (*pattern && *name) - { - if (*pattern == *name) - pattern++; - else if (*pattern == '*') - if (*name == pattern[1]) - pattern += 2; - else - ; - else - return 0; - name++; - } - return 1; -} - -/* Make sure the font object matches the XLFD font name. */ -static int -font_check_xlfd_parse (Lisp_Object font, char *name) -{ - char name_check[256]; - font_unparse_xlfd (font, 0, name_check, 255); - return font_match_xlfd (name_check, name); -} - -#endif - - /* Parse NAME (null terminated) as XLFD and store information in FONT (font-spec or font-entity). Size property of FONT is set as follows: |