|
3094
|
1 /* Lisp font data structures for X and Xft.
|
|
|
2
|
|
|
3 Copyright (C) 2003 Eric Knauel and Matthias Neubauer
|
|
|
4 Copyright (C) 2005 Eric Knauel
|
|
|
5 Copyright (C) 2004, 2005 Free Software Foundation, Inc.
|
|
|
6
|
|
|
7 Authors: Eric Knauel <knauel@informatik.uni-tuebingen.de>
|
|
|
8 Matthias Neubauer <neubauer@informatik.uni-freiburg.de>
|
|
|
9 Stephen J. Turnbull <stephen@xemacs.org>
|
|
|
10 Created: 27 Oct 2003
|
|
|
11 Updated: 05 Mar 2005 by Stephen J. Turnbull
|
|
|
12
|
|
|
13 This file is part of XEmacs.
|
|
|
14
|
|
|
15 XEmacs is free software; you can redistribute it and/or modify it
|
|
|
16 under the terms of the GNU General Public License as published by the
|
|
|
17 Free Software Foundation; either version 2, or (at your option) any
|
|
|
18 later version.
|
|
|
19
|
|
|
20 XEmacs is distributed in the hope that it will be useful, but WITHOUT
|
|
|
21 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
|
22 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
|
23 for more details.
|
|
|
24
|
|
|
25 You should have received a copy of the GNU General Public License
|
|
|
26 along with XEmacs; see the file COPYING. If not, write to
|
|
|
27 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
|
28 Boston, MA 02111-1307, USA. */
|
|
|
29
|
|
|
30 /* Synched up with: Not in GNU Emacs. */
|
|
|
31
|
|
|
32 /* This module provides the Lisp interface to fonts in X11, including Xft,
|
|
|
33 but (at least at first) not GTK+ or Qt.
|
|
|
34
|
|
|
35 It should be renamed to fonts-x.h.
|
|
|
36
|
|
|
37 Sealevel code should be in ../lwlib/lwlib-fonts.h or
|
|
|
38 ../lwlib/lwlib-colors.h.
|
|
|
39 */
|
|
|
40
|
|
|
41
|
|
|
42 #ifndef INCLUDED_xft_fonts_h_
|
|
|
43 #define INCLUDED_xft_fonts_h_
|
|
|
44
|
|
|
45 #include "../lwlib/lwlib-fonts.h"
|
|
|
46 #include "../lwlib/lwlib-colors.h"
|
|
|
47
|
|
|
48 extern Fixnum debug_xft;
|
|
|
49
|
|
|
50 /* Standard for fontconfig. Use a macro to show we're not guessing. */
|
|
|
51 #define Qxft_font_name_encoding Qutf_8
|
|
|
52
|
|
|
53 #define XE_XLFD_MAKE_LISP_STRING(s) (make_string(s, strlen(s)))
|
|
|
54
|
|
|
55 struct fc_pattern
|
|
|
56 {
|
|
|
57 struct LCRECORD_HEADER header;
|
|
|
58 FcPattern *fcpatPtr;
|
|
|
59 };
|
|
|
60
|
|
|
61 typedef struct fc_pattern fc_pattern;
|
|
|
62
|
|
|
63 DECLARE_LRECORD(fc_pattern, struct fc_pattern);
|
|
|
64 #define XFCPATTERN(x) XRECORD (x, fc_pattern, struct fc_pattern)
|
|
|
65 #define wrap_fcpattern(p) wrap_record (p, fc_pattern)
|
|
|
66 #define FCPATTERNP(x) RECORDP (x, fc_pattern)
|
|
|
67 #define CHECK_FCPATTERN(x) CHECK_RECORD (x, fc_pattern)
|
|
|
68 #define CONCHECK_FCPATTERN(x) CONCHECK_RECORD (x, fc_pattern)
|
|
|
69 #define XFCPATTERN_PTR(x) (XFCPATTERN(x)->fcpatPtr)
|
|
|
70
|
|
|
71 #endif /* INCLUDED_xft_fonts_h_ */
|
