annotate src/glyphs-gtk.h @ 5366:f00192e1cd49

Examining the result of #'length: `eql', not `=', it's better style & cheaper 2011-03-08 Aidan Kehoe <kehoea@parhasard.net> * buff-menu.el (list-buffers-noselect): * byte-optimize.el (byte-optimize-identity): * byte-optimize.el (byte-optimize-if): * byte-optimize.el (byte-optimize-nth): * byte-optimize.el (byte-optimize-nthcdr): * bytecomp.el (byte-compile-warn-wrong-args): * bytecomp.el (byte-compile-two-args-19->20): * bytecomp.el (byte-compile-list): * bytecomp.el (byte-compile-beginning-of-line): * bytecomp.el (byte-compile-set): * bytecomp.el (byte-compile-set-default): * bytecomp.el (byte-compile-values): * bytecomp.el (byte-compile-values-list): * bytecomp.el (byte-compile-integerp): * bytecomp.el (byte-compile-multiple-value-list-internal): * bytecomp.el (byte-compile-throw): * cl-macs.el (cl-do-arglist): * cl-macs.el (cl-parse-loop-clause): * cl-macs.el (multiple-value-bind): * cl-macs.el (multiple-value-setq): * cl-macs.el (get-setf-method): * cmdloop.el (command-error): * cmdloop.el (y-or-n-p-minibuf): * cmdloop.el (yes-or-no-p-minibuf): * coding.el (unencodable-char-position): * cus-edit.el (custom-face-prompt): * cus-edit.el (custom-buffer-create-internal): * cus-edit.el (widget-face-action): * cus-edit.el (custom-group-value-create): * descr-text.el (describe-char-unicode-data): * dialog-gtk.el (popup-builtin-question-dialog): * dragdrop.el (experimental-dragdrop-drop-log-function): * dragdrop.el (experimental-dragdrop-drop-mime-default): * easymenu.el (easy-menu-add): * easymenu.el (easy-menu-remove): * faces.el (read-face-name): * faces.el (set-face-stipple): * files.el (file-name-non-special): * font.el (font-combine-fonts): * font.el (font-set-face-font): * font.el (font-parse-rgb-components): * font.el (font-rgb-color-p): * font.el (font-color-rgb-components): * gnuserv.el (gnuserv-edit-files): * help.el (key-or-menu-binding): * help.el (function-documentation-1): * help.el (function-documentation): * info.el (info): * isearch-mode.el (isearch-exit): * isearch-mode.el (isearch-edit-string): * isearch-mode.el (isearch-*-char): * isearch-mode.el (isearch-complete1): * ldap.el (ldap-encode-country-string): * ldap.el (ldap-decode-string): * minibuf.el (read-file-name-internal-1): * minibuf.el (read-non-nil-coding-system): * minibuf.el (get-user-response): * mouse.el (drag-window-divider): * mule/ccl.el: * mule/ccl.el (ccl-compile-if): * mule/ccl.el (ccl-compile-break): * mule/ccl.el (ccl-compile-repeat): * mule/ccl.el (ccl-compile-write-repeat): * mule/ccl.el (ccl-compile-call): * mule/ccl.el (ccl-compile-end): * mule/ccl.el (ccl-compile-read-multibyte-character): * mule/ccl.el (ccl-compile-write-multibyte-character): * mule/ccl.el (ccl-compile-translate-character): * mule/ccl.el (ccl-compile-mule-to-unicode): * mule/ccl.el (ccl-compile-unicode-to-mule): * mule/ccl.el (ccl-compile-lookup-integer): * mule/ccl.el (ccl-compile-lookup-character): * mule/ccl.el (ccl-compile-map-multiple): * mule/ccl.el (ccl-compile-map-single): * mule/devan-util.el (devanagari-compose-to-one-glyph): * mule/devan-util.el (devanagari-composition-component): * mule/mule-cmds.el (finish-set-language-environment): * mule/viet-util.el: * mule/viet-util.el (viet-encode-viscii-char): * multicast.el (open-multicast-group): * newcomment.el (comment-quote-nested): * newcomment.el (comment-region): * newcomment.el (comment-dwim): * regexp-opt.el (regexp-opt-group): * replace.el (map-query-replace-regexp): * specifier.el (derive-device-type-from-tag-set): * subr.el (skip-chars-quote): * test-harness.el (test-harness-from-buffer): * test-harness.el (batch-test-emacs): * wid-edit.el (widget-choice-action): * wid-edit.el (widget-symbol-prompt-internal): * wid-edit.el (widget-color-action): * window-xemacs.el (push-window-configuration): * window-xemacs.el (pop-window-configuration): * window.el (quit-window): * x-compose.el (electric-diacritic): It's better style, and cheaper (often one assembler instruction vs. a C funcall in the byte code), to use `eql' instead of `=' when it's clear what numerical type a given result will be. Change much of our code to do this, with the help of a byte-compiler change (not comitted) that looked for calls to #'length (which always returns an integer) in its args.
author Aidan Kehoe <kehoea@parhasard.net>
date Tue, 08 Mar 2011 23:41:52 +0000
parents b3ce27ca7647
children 308d34e9f07d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
462
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
1 /* Gtk-specific glyphs and related.
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
2 Copyright (C) 1993, 1994 Free Software Foundation, Inc.
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
3 Copyright (C) 1995 Board of Trustees, University of Illinois.
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
4 Copyright (C) 1995, 1996 Ben Wing
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
5 Copyright (C) 1995 Sun Microsystems, Inc.
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
6
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
7 This file is part of XEmacs.
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
8
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
9 XEmacs is free software; you can redistribute it and/or modify it
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
10 under the terms of the GNU General Public License as published by the
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
11 Free Software Foundation; either version 2, or (at your option) any
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
12 later version.
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
13
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
14 XEmacs is distributed in the hope that it will be useful, but WITHOUT
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
15 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
16 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
17 for more details.
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
18
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
19 You should have received a copy of the GNU General Public License
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
20 along with XEmacs; see the file COPYING. If not, write to
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
21 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
22 Boston, MA 02111-1307, USA. */
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
23
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
24 /* Synched up with: Not in FSF. */
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
25 /* Gtk version by William Perry */
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
26
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
27 #ifndef _XEMACS_GLYPHS_GTK_H_
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
28 #define _XEMACS_GLYPHS_GTK_H_
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
29
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
30 #include "glyphs.h"
4908
b3ce27ca7647 various fixes related to gtk, redisplay-xlike-inc.c
Ben Wing <ben@xemacs.org>
parents: 3087
diff changeset
31 #include "sysgtk.h"
462
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
32
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
33 #ifdef HAVE_GTK
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
34
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
35 /****************************************************************************
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
36 * Image-Instance Object *
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
37 ****************************************************************************/
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
38
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
39 struct gtk_image_instance_data
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
40 {
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
41 GdkPixmap **pixmaps;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
42 GdkCursor *cursor;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
43
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
44 /* If depth>0, then that means that other colors were allocated when
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
45 this pixmap was loaded. These are they; we need to free them when
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
46 finalizing the image instance. */
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
47 GdkColormap *colormap;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
48 unsigned long *pixels;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
49 int npixels;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
50
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
51 /* Should we hang on to the extra info from the XpmAttributes, like
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
52 the textual color table and the comments? Is that useful? */
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
53 };
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
54
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
55 struct gtk_subwindow_data
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
56 {
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
57 union
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
58 {
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
59 struct
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
60 {
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
61 GtkWidget *parent_window;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
62 GtkWidget *clip_window;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
63 } sub;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
64 struct
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
65 {
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
66 GtkWidget *clip_window;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
67 Lisp_Object widget;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
68 guint x_offset;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
69 guint y_offset;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
70 gboolean added_to_fixed;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
71 } wid;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
72 } data;
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
73 };
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
74
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
75 void init_image_instance_from_gdk_pixmap (struct Lisp_Image_Instance *ii,
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
76 struct device *device,
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
77 GdkPixmap *gdk_pixmap,
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
78 int dest_mask,
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
79 Lisp_Object instantiator);
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
80
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
81 #define GTK_IMAGE_INSTANCE_DATA(i) ((struct gtk_image_instance_data *) (i)->data)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
82
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
83 #define IMAGE_INSTANCE_GTK_PIXMAP(i) (GTK_IMAGE_INSTANCE_DATA (i)->pixmaps[0])
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
84 #define IMAGE_INSTANCE_GTK_PIXMAP_SLICE(i,slice) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
85 (GTK_IMAGE_INSTANCE_DATA (i)->pixmaps[slice])
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
86 #define IMAGE_INSTANCE_GTK_PIXMAP_SLICES(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
87 (GTK_IMAGE_INSTANCE_DATA (i)->pixmaps)
3087
dbd2a866e38a [xemacs-hg @ 2005-11-22 11:24:40 by malcolmp]
malcolmp
parents: 2082
diff changeset
88 #define IMAGE_INSTANCE_GTK_MASK(i) ((GdkPixmap*)(IMAGE_INSTANCE_PIXMAP_MASK (i)))
462
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
89 #define IMAGE_INSTANCE_GTK_CURSOR(i) (GTK_IMAGE_INSTANCE_DATA (i)->cursor)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
90 #define IMAGE_INSTANCE_GTK_COLORMAP(i) (GTK_IMAGE_INSTANCE_DATA (i)->colormap)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
91 #define IMAGE_INSTANCE_GTK_PIXELS(i) (GTK_IMAGE_INSTANCE_DATA (i)->pixels)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
92 #define IMAGE_INSTANCE_GTK_NPIXELS(i) (GTK_IMAGE_INSTANCE_DATA (i)->npixels)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
93
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
94 #define XIMAGE_INSTANCE_GTK_PIXMAP(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
95 IMAGE_INSTANCE_GTK_PIXMAP (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
96 #define XIMAGE_INSTANCE_GTK_PIXMAP_SLICE(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
97 IMAGE_INSTANCE_GTK_PIXMAP_SLICE (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
98 #define XIMAGE_INSTANCE_GTK_PIXMAP_SLICES(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
99 IMAGE_INSTANCE_GTK_PIXMAP_SLICES (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
100 #define XIMAGE_INSTANCE_GTK_MASK(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
101 IMAGE_INSTANCE_GTK_MASK (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
102 #define XIMAGE_INSTANCE_GTK_CURSOR(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
103 IMAGE_INSTANCE_GTK_CURSOR (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
104 #define XIMAGE_INSTANCE_GTK_PIXELS(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
105 IMAGE_INSTANCE_GTK_PIXELS (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
106 #define XIMAGE_INSTANCE_GTK_NPIXELS(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
107 IMAGE_INSTANCE_GTK_NPIXELS (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
108
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
109 /* Subwindow / widget stuff */
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
110 #define GTK_SUBWINDOW_INSTANCE_DATA(i) ((struct gtk_subwindow_data *) (i)->data)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
111
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
112 #define IMAGE_INSTANCE_GTK_SUBWINDOW_PARENT(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
113 (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.sub.parent_window)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
114 #define IMAGE_INSTANCE_GTK_CLIPWINDOW(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
115 (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.sub.clip_window)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
116 #define IMAGE_INSTANCE_GTK_WIDGET_XOFFSET(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
117 (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.x_offset)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
118 #define IMAGE_INSTANCE_GTK_WIDGET_YOFFSET(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
119 (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.y_offset)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
120 #define IMAGE_INSTANCE_GTK_WIDGET_LWID(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
121 (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.id)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
122 #define IMAGE_INSTANCE_GTK_CLIPWIDGET(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
123 (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.clip_window)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
124 #define IMAGE_INSTANCE_GTK_ALREADY_PUT(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
125 (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.added_to_fixed)
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
126 #define IMAGE_INSTANCE_GTK_SUBWINDOW_ID(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
127 ((GdkWindow *) & IMAGE_INSTANCE_SUBWINDOW_ID (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
128 #define IMAGE_INSTANCE_GTK_WIDGET_ID(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
129 ((GtkWidget *) & IMAGE_INSTANCE_SUBWINDOW_ID (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
130
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
131 #define XIMAGE_INSTANCE_GTK_SUBWINDOW_PARENT(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
132 IMAGE_INSTANCE_GTK_SUBWINDOW_PARENT (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
133 #define XIMAGE_INSTANCE_GTK_SUBWINDOW_DISPLAY(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
134 IMAGE_INSTANCE_GTK_SUBWINDOW_DISPLAY (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
135 #define XIMAGE_INSTANCE_GTK_WIDGET_XOFFSET(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
136 IMAGE_INSTANCE_GTK_WIDGET_XOFFSET (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
137 #define XIMAGE_INSTANCE_GTK_WIDGET_YOFFSET(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
138 IMAGE_INSTANCE_GTK_WIDGET_YOFFSET (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
139 #define XIMAGE_INSTANCE_GTK_WIDGET_LWID(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
140 IMAGE_INSTANCE_GTK_WIDGET_LWID (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
141 #define XIMAGE_INSTANCE_GTK_CLIPWIDGET(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
142 IMAGE_INSTANCE_GTK_CLIPWIDGET (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
143 #define XIMAGE_INSTANCE_GTK_CLIPWINDOW(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
144 IMAGE_INSTANCE_GTK_CLIPWINDOW (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
145 #define XIMAGE_INSTANCE_GTK_WIDGET_ID(i) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
146 IMAGE_INSTANCE_GTK_WIDGET_ID (XIMAGE_INSTANCE (i))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
147
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
148 #define DOMAIN_GTK_WIDGET(domain) \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
149 ((IMAGE_INSTANCEP (domain) && \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
150 GTK_SUBWINDOW_INSTANCE_DATA (XIMAGE_INSTANCE (domain))) ? \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
151 XIMAGE_INSTANCE_GTK_WIDGET_ID (domain) : \
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
152 FRAME_GTK_CONTAINER_WIDGET (f) (DOMAIN_XFRAME (domain)))
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
153
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
154 #endif /* HAVE_GTK */
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents:
diff changeset
155 #endif /* _XEMACS_GLYPHS_GTK_H_ */