(define-interface xpm-interface
  (export create-pixmap-from-data
	  read-file-to-pixmap
	  ((xpm-attribute) :syntax)))

(define-interface xft-interface
  (export
   xft-pattern?
   xft-font?
   xft-color?
   xft-objectset?
   xft-fontset?
   make-xft-pattern
   scx-xft-pattern-duplicate
   scx-xft-font-match
   scx-xft-font-open-pattern
   scx-xft-font-open-name
   scx-xft-font-open-xlfd
   scx-xft-draw-create
   scx-xft-draw-create-bitmap
   make-xft-objectset
   scx-xft-pattern-get
   scx-xft-pattern-add
   scx-xft-draw-create
   scx-xft-draw-create-bitmap
   scx-xft-draw-change
   scx-xft-text-extents-8bit
   scx-xft-draw-string-8bit
   scx-xft-draw-rect
   scx-xft-draw-set-clip
   scx-xft-objectset-add
   scx-xft-list-fonts-pattern-objects
   scx-xft-version-major
   scx-xft-version-minor
   scx-xft-fontset-add
   scx-xft-color-alloc-name
   scx-xft-pattern-print
   scx-xft-fontset-print
   scx-xft-default-has-render?
   ;; Xft version 2
   scx-xft-draw-display
   scx-xft-draw-drawable
   scx-xft-draw-colormap
   scx-xft-draw-visual))

(define-interface xrender-interface
  (export
   xglyphinfo?
   scx-xglyphinfo-width
   scx-xglyphinfo-height
   scx-xglyphinfo-x
   scx-xglyphinfo-y
   scx-xglyphinfo-xOff
   scx-xglyphinfo-yOff
   set-scx-xglyphinfo-width!
   set-scx-xglyphinfo-height!
   set-scx-xglyphinfo-x!
   set-scx-xglyphinfo-y!
   set-scx-xglyphinfo-xOff!
   set-scx-xglyphinfo-yOff!

   xrendercolor?
   scx-xrendercolor-red
   scx-xrendercolor-green
   scx-xrendercolor-blue
   scx-xrendercolor-alpha
   set-scx-xrendercolor-red!
   set-scx-xrendercolor-green!
   set-scx-xrendercolor-blue!
   set-scx-xrendercolor-alpha!))