3 (defcfun (draw-rgb-image "gdk_draw_rgb_image") :void
4 (drawable (g-object drawable))
5 (gc (g-object graphics-context))
14 (export 'draw-rgb-image)
16 (defcfun (draw-rgb-image-dithalign "gdk_draw_rgb_image_dithalign") :void
17 (drawable (g-object drawable))
18 (gc (g-object graphics-context))
29 (export 'draw-rgb-image-dithalign)
31 (define-g-boxed-cstruct rgb-cmap nil
32 (colors :uint32 :count 256 :initform (make-array 256 :element-type '(unsigned-byte 32) :initial-element 0))
33 (n-colors :int :initform 0))
35 (defcfun (draw-indexed-image "gdk_draw_indexed_image") :void
36 (drawable (g-object drawable))
37 (gc (g-object graphics-context))
45 (cmap (g-boxed-foreign rgb-cmap)))
47 (export 'draw-indexed-image)
49 (defcfun (draw-gray-image "gdk_draw_gray_image") :void
50 (drawable (g-object drawable))
51 (gc (g-object graphics-context))
60 (export 'draw-gray-image)
62 (defcfun (draw-rgb-32-image "gdk_draw_rgb_32_image") :void
63 (drawable (g-object drawable))
64 (gc (g-object graphics-context))
73 (export 'draw-rgb-32-image)
75 (defcfun (draw-rgb-32-image-dithalign "gdk_draw_rgb_32_image_dithalign") :void
76 (drawable (g-object drawable))
77 (gc (g-object graphics-context))
88 (export 'draw-rgb-32-image-dithalign)
90 (defcfun (rgb-find-color "gdk_rgb_find_color") :void
91 (colormap (g-object colormap))
92 (color (g-boxed-foreign color)))
94 (export 'rgb-find-color)
96 (defcfun (rgb-set-install "gdk_rgb_set_install") :void
99 (export 'rgb-set-install)
101 (defcfun (rgb-set-min-colors "gdk_rgb_set_min_colors") :void
104 (export 'rgb-set-min-colors)
106 (defcfun (rgb-get-visual "gdk_rgb_get_visual") (g-object visual))
108 (export 'rgb-get-visual)
110 (defcfun (rgb-get-colormap "gdk_rgb_get_colormap") (g-object colormap))
112 (export 'rgb-get-colormap)
114 (defcfun (rgb-ditherable "gdk_rgb_ditherable") :boolean)
116 (export 'rgb-ditherable)
118 (defcfun (rgb-colormap-ditherable "gdk_rgb_colormap_ditherable") :boolean
119 (colormap (g-object colormap)))
121 (export 'rgb-colormap-ditherable)
123 (defcfun (rgb-set-verbose "gdk_rgb_set_verbose") :void
126 (export 'rgb-set-verbose)