;; -*- scheme -*-
; object definitions ...
(define-object Font
  (in-module "Pango")
  (parent "GObject")
  (c-name "PangoFont")
  (gtype-id "PANGO_TYPE_FONT")
)

(define-object FontFace
  (in-module "Pango")
  (parent "GObject")
  (c-name "PangoFontFace")
  (gtype-id "PANGO_TYPE_FONT_FACE")
)

(define-object FontFamily
  (in-module "Pango")
  (parent "GObject")
  (c-name "PangoFontFamily")
  (gtype-id "PANGO_TYPE_FONT_FAMILY")
)

(define-object FontMap
  (in-module "Pango")
  (parent "GObject")
  (c-name "PangoFontMap")
  (gtype-id "PANGO_TYPE_FONT_MAP")
)

(define-object Fontset
  (in-module "Pango")
  (parent "GObject")
  (c-name "PangoFontset")
  (gtype-id "PANGO_TYPE_FONTSET")
)

;; Enumerations and flags ...

(define-enum AttrType
  (in-module "Pango")
  (c-name "PangoAttrType")
  (gtype-id "PANGO_TYPE_ATTR_TYPE")
  (values
    '("invalid" "PANGO_ATTR_INVALID")
    '("language" "PANGO_ATTR_LANGUAGE")
    '("family" "PANGO_ATTR_FAMILY")
    '("style" "PANGO_ATTR_STYLE")
    '("weight" "PANGO_ATTR_WEIGHT")
    '("variant" "PANGO_ATTR_VARIANT")
    '("stretch" "PANGO_ATTR_STRETCH")
    '("size" "PANGO_ATTR_SIZE")
    '("font-desc" "PANGO_ATTR_FONT_DESC")
    '("foreground" "PANGO_ATTR_FOREGROUND")
    '("background" "PANGO_ATTR_BACKGROUND")
    '("underline" "PANGO_ATTR_UNDERLINE")
    '("strikethrough" "PANGO_ATTR_STRIKETHROUGH")
    '("rise" "PANGO_ATTR_RISE")
    '("shape" "PANGO_ATTR_SHAPE")
    '("scale" "PANGO_ATTR_SCALE")
  )
)

(define-enum Underline
  (in-module "Pango")
  (c-name "PangoUnderline")
  (gtype-id "PANGO_TYPE_UNDERLINE")
  (values
    '("none" "PANGO_UNDERLINE_NONE")
    '("single" "PANGO_UNDERLINE_SINGLE")
    '("double" "PANGO_UNDERLINE_DOUBLE")
    '("low" "PANGO_UNDERLINE_LOW")
  )
)

(define-enum CoverageLevel
  (in-module "Pango")
  (c-name "PangoCoverageLevel")
  (gtype-id "PANGO_TYPE_COVERAGE_LEVEL")
  (values
    '("none" "PANGO_COVERAGE_NONE")
    '("fallback" "PANGO_COVERAGE_FALLBACK")
    '("approximate" "PANGO_COVERAGE_APPROXIMATE")
    '("exact" "PANGO_COVERAGE_EXACT")
  )
)

(define-enum Style
  (in-module "Pango")
  (c-name "PangoStyle")
  (gtype-id "PANGO_TYPE_STYLE")
  (values
    '("normal" "PANGO_STYLE_NORMAL")
    '("oblique" "PANGO_STYLE_OBLIQUE")
    '("italic" "PANGO_STYLE_ITALIC")
  )
)

(define-enum Variant
  (in-module "Pango")
  (c-name "PangoVariant")
  (gtype-id "PANGO_TYPE_VARIANT")
  (values
    '("normal" "PANGO_VARIANT_NORMAL")
    '("small-caps" "PANGO_VARIANT_SMALL_CAPS")
  )
)

(define-enum Weight
  (in-module "Pango")
  (c-name "PangoWeight")
  (gtype-id "PANGO_TYPE_WEIGHT")
  (values
    '("ultralight" "PANGO_WEIGHT_ULTRALIGHT")
    '("light" "PANGO_WEIGHT_LIGHT")
    '("normal" "PANGO_WEIGHT_NORMAL")
    '("bold" "PANGO_WEIGHT_BOLD")
    '("ultrabold" "PANGO_WEIGHT_ULTRABOLD")
    '("heavy" "PANGO_WEIGHT_HEAVY")
  )
)

(define-enum Stretch
  (in-module "Pango")
  (c-name "PangoStretch")
  (gtype-id "PANGO_TYPE_STRETCH")
  (values
    '("ultra-condensed" "PANGO_STRETCH_ULTRA_CONDENSED")
    '("extra-condensed" "PANGO_STRETCH_EXTRA_CONDENSED")
    '("condensed" "PANGO_STRETCH_CONDENSED")
    '("semi-condensed" "PANGO_STRETCH_SEMI_CONDENSED")
    '("normal" "PANGO_STRETCH_NORMAL")
    '("semi-expanded" "PANGO_STRETCH_SEMI_EXPANDED")
    '("expanded" "PANGO_STRETCH_EXPANDED")
    '("extra-expanded" "PANGO_STRETCH_EXTRA_EXPANDED")
    '("ultra-expanded" "PANGO_STRETCH_ULTRA_EXPANDED")
  )
)

(define-flags FontMask
  (in-module "Pango")
  (c-name "PangoFontMask")
  (gtype-id "PANGO_TYPE_FONT_MASK")
  (values
    '("family" "PANGO_FONT_MASK_FAMILY")
    '("style" "PANGO_FONT_MASK_STYLE")
    '("variant" "PANGO_FONT_MASK_VARIANT")
    '("weight" "PANGO_FONT_MASK_WEIGHT")
    '("stretch" "PANGO_FONT_MASK_STRETCH")
    '("size" "PANGO_FONT_MASK_SIZE")
  )
)

(define-enum Alignment
  (in-module "Pango")
  (c-name "PangoAlignment")
  (gtype-id "PANGO_TYPE_ALIGNMENT")
  (values
    '("left" "PANGO_ALIGN_LEFT")
    '("center" "PANGO_ALIGN_CENTER")
    '("right" "PANGO_ALIGN_RIGHT")
  )
)

(define-enum WrapMode
  (in-module "Pango")
  (c-name "PangoWrapMode")
  (gtype-id "PANGO_TYPE_WRAP_MODE")
  (values
    '("word" "PANGO_WRAP_WORD")
    '("char" "PANGO_WRAP_CHAR")
    '("word-char" "PANGO_WRAP_WORD_CHAR")
  )
)

(define-enum OTTableType
  (in-module "Pango")
  (c-name "PangoOTTableType")
  (gtype-id "PANGO_TYPE_OT_TABLE_TYPE")
  (values
    '("sub" "PANGO_OT_TABLE_GSUB")
    '("pos" "PANGO_OT_TABLE_GPOS")
  )
)

(define-enum TabAlign
  (in-module "Pango")
  (c-name "PangoTabAlign")
  (gtype-id "PANGO_TYPE_TAB_ALIGN")
  (values
    '("t" "PANGO_TAB_LEFT")
  )
)

(define-enum Direction
  (in-module "Pango")
  (c-name "PangoDirection")
  (gtype-id "PANGO_TYPE_DIRECTION")
  (values
    '("ltr" "PANGO_DIRECTION_LTR")
    '("rtl" "PANGO_DIRECTION_RTL")
    '("ttb-ltr" "PANGO_DIRECTION_TTB_LTR")
    '("ttb-rtl" "PANGO_DIRECTION_TTB_RTL")
  )
)


;; From /gnome/head/cvs/pango/pango/module-defs.h



;; From /gnome/head/cvs/pango/pango/modules.h



;; From /gnome/head/cvs/pango/pango/pango-attributes.h

(define-function pango_color_get_type
  (c-name "pango_color_get_type")
  (return-type "GType")
)

(define-method copy
  (of-object "PangoColor")
  (c-name "pango_color_copy")
  (return-type "PangoColor*")
)

(define-method free
  (of-object "PangoColor")
  (c-name "pango_color_free")
  (return-type "none")
)

(define-method parse
  (of-object "PangoColor")
  (c-name "pango_color_parse")
  (return-type "gboolean")
  (parameters
    '("const-char*" "spec")
  )
)

(define-function pango_attr_type_register
  (c-name "pango_attr_type_register")
  (return-type "PangoAttrType")
  (parameters
    '("const-gchar*" "name")
  )
)

(define-method copy
  (of-object "PangoAttribute")
  (c-name "pango_attribute_copy")
  (return-type "PangoAttribute*")
)

(define-method destroy
  (of-object "PangoAttribute")
  (c-name "pango_attribute_destroy")
  (return-type "none")
)

(define-method equal
  (of-object "PangoAttribute")
  (c-name "pango_attribute_equal")
  (return-type "gboolean")
  (parameters
    '("const-PangoAttribute*" "attr2")
  )
)

(define-function pango_attr_language_new
  (c-name "pango_attr_language_new")
  (is-constructor-of "PangoAttrLanguage")
  (return-type "PangoAttribute*")
  (parameters
    '("PangoLanguage*" "language")
  )
)

(define-function pango_attr_family_new
  (c-name "pango_attr_family_new")
  (is-constructor-of "PangoAttrFamily")
  (return-type "PangoAttribute*")
  (parameters
    '("const-char*" "family")
  )
)

(define-function pango_attr_foreground_new
  (c-name "pango_attr_foreground_new")
  (is-constructor-of "PangoAttrForeground")
  (return-type "PangoAttribute*")
  (parameters
    '("guint16" "red")
    '("guint16" "green")
    '("guint16" "blue")
  )
)

(define-function pango_attr_background_new
  (c-name "pango_attr_background_new")
  (is-constructor-of "PangoAttrBackground")
  (return-type "PangoAttribute*")
  (parameters
    '("guint16" "red")
    '("guint16" "green")
    '("guint16" "blue")
  )
)

(define-function pango_attr_size_new
  (c-name "pango_attr_size_new")
  (is-constructor-of "PangoAttrSize")
  (return-type "PangoAttribute*")
  (parameters
    '("int" "size")
  )
)

(define-function pango_attr_style_new
  (c-name "pango_attr_style_new")
  (is-constructor-of "PangoAttrStyle")
  (return-type "PangoAttribute*")
  (parameters
    '("PangoStyle" "style")
  )
)

(define-function pango_attr_weight_new
  (c-name "pango_attr_weight_new")
  (is-constructor-of "PangoAttrWeight")
  (return-type "PangoAttribute*")
  (parameters
    '("PangoWeight" "weight")
  )
)

(define-function pango_attr_variant_new
  (c-name "pango_attr_variant_new")
  (is-constructor-of "PangoAttrVariant")
  (return-type "PangoAttribute*")
  (parameters
    '("PangoVariant" "variant")
  )
)

(define-function pango_attr_stretch_new
  (c-name "pango_attr_stretch_new")
  (is-constructor-of "PangoAttrStretch")
  (return-type "PangoAttribute*")
  (parameters
    '("PangoStretch" "stretch")
  )
)

(define-function pango_attr_font_desc_new
  (c-name "pango_attr_font_desc_new")
  (is-constructor-of "PangoAttrFontDesc")
  (return-type "PangoAttribute*")
  (parameters
    '("const-PangoFontDescription*" "desc")
  )
)

(define-function pango_attr_underline_new
  (c-name "pango_attr_underline_new")
  (is-constructor-of "PangoAttrUnderline")
  (return-type "PangoAttribute*")
  (parameters
    '("PangoUnderline" "underline")
  )
)

(define-function pango_attr_strikethrough_new
  (c-name "pango_attr_strikethrough_new")
  (is-constructor-of "PangoAttrStrikethrough")
  (return-type "PangoAttribute*")
  (parameters
    '("gboolean" "strikethrough")
  )
)

(define-function pango_attr_rise_new
  (c-name "pango_attr_rise_new")
  (is-constructor-of "PangoAttrRise")
  (return-type "PangoAttribute*")
  (parameters
    '("int" "rise")
  )
)

(define-function pango_attr_shape_new
  (c-name "pango_attr_shape_new")
  (is-constructor-of "PangoAttrShape")
  (return-type "PangoAttribute*")
  (parameters
    '("const-PangoRectangle*" "ink_rect")
    '("const-PangoRectangle*" "logical_rect")
  )
)

(define-function pango_attr_scale_new
  (c-name "pango_attr_scale_new")
  (is-constructor-of "PangoAttrScale")
  (return-type "PangoAttribute*")
  (parameters
    '("double" "scale_factor")
  )
)

(define-function pango_attr_list_get_type
  (c-name "pango_attr_list_get_type")
  (return-type "GType")
)

(define-function pango_attr_list_new
  (c-name "pango_attr_list_new")
  (is-constructor-of "PangoAttrList")
  (return-type "PangoAttrList*")
)

(define-method ref
  (of-object "PangoAttrList")
  (c-name "pango_attr_list_ref")
  (return-type "none")
)

(define-method unref
  (of-object "PangoAttrList")
  (c-name "pango_attr_list_unref")
  (return-type "none")
)

(define-method copy
  (of-object "PangoAttrList")
  (c-name "pango_attr_list_copy")
  (return-type "PangoAttrList*")
)

(define-method insert
  (of-object "PangoAttrList")
  (c-name "pango_attr_list_insert")
  (return-type "none")
  (parameters
    '("PangoAttribute*" "attr")
  )
)

(define-method insert_before
  (of-object "PangoAttrList")
  (c-name "pango_attr_list_insert_before")
  (return-type "none")
  (parameters
    '("PangoAttribute*" "attr")
  )
)

(define-method change
  (of-object "PangoAttrList")
  (c-name "pango_attr_list_change")
  (return-type "none")
  (parameters
    '("PangoAttribute*" "attr")
  )
)

(define-method splice
  (of-object "PangoAttrList")
  (c-name "pango_attr_list_splice")
  (return-type "none")
  (parameters
    '("PangoAttrList*" "other")
    '("gint" "pos")
    '("gint" "len")
  )
)

(define-method get_iterator
  (of-object "PangoAttrList")
  (c-name "pango_attr_list_get_iterator")
  (return-type "PangoAttrIterator*")
)

(define-method range
  (of-object "PangoAttrIterator")
  (c-name "pango_attr_iterator_range")
  (return-type "none")
  (parameters
    '("gint*" "start")
    '("gint*" "end")
  )
)

(define-method next
  (of-object "PangoAttrIterator")
  (c-name "pango_attr_iterator_next")
  (return-type "gboolean")
)

(define-method copy
  (of-object "PangoAttrIterator")
  (c-name "pango_attr_iterator_copy")
  (return-type "PangoAttrIterator*")
)

(define-method destroy
  (of-object "PangoAttrIterator")
  (c-name "pango_attr_iterator_destroy")
  (return-type "none")
)

(define-method get
  (of-object "PangoAttrIterator")
  (c-name "pango_attr_iterator_get")
  (return-type "PangoAttribute*")
  (parameters
    '("PangoAttrType" "type")
  )
)

(define-method get_font
  (of-object "PangoAttrIterator")
  (c-name "pango_attr_iterator_get_font")
  (return-type "none")
  (parameters
    '("PangoFontDescription*" "desc")
    '("PangoLanguage**" "language")
    '("GSList**" "extra_attrs")
  )
)

(define-function pango_parse_markup
  (c-name "pango_parse_markup")
  (return-type "gboolean")
  (parameters
    '("const-char*" "markup_text")
    '("int" "length")
    '("gunichar" "accel_marker")
    '("PangoAttrList**" "attr_list")
    '("char**" "text")
    '("gunichar*" "accel_char")
    '("GError**" "error")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-break.h

(define-function pango_break
  (c-name "pango_break")
  (return-type "none")
  (parameters
    '("const-gchar*" "text")
    '("int" "length")
    '("PangoAnalysis*" "analysis")
    '("PangoLogAttr*" "attrs")
    '("int" "attrs_len")
  )
)

(define-function pango_find_paragraph_boundary
  (c-name "pango_find_paragraph_boundary")
  (return-type "none")
  (parameters
    '("const-gchar*" "text")
    '("gint" "length")
    '("gint*" "paragraph_delimiter_index")
    '("gint*" "next_paragraph_start")
  )
)

(define-function pango_get_log_attrs
  (c-name "pango_get_log_attrs")
  (return-type "none")
  (parameters
    '("const-char*" "text")
    '("int" "length")
    '("int" "level")
    '("PangoLanguage*" "language")
    '("PangoLogAttr*" "log_attrs")
    '("int" "attrs_len")
  )
)

(define-function pango_default_break
  (c-name "pango_default_break")
  (return-type "none")
  (parameters
    '("const-gchar*" "text")
    '("int" "length")
    '("PangoAnalysis*" "analysis")
    '("PangoLogAttr*" "attrs")
    '("int" "attrs_len")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-context.h

(define-function pango_context_new
  (c-name "pango_context_new")
  (is-constructor-of "PangoContext")
  (return-type "PangoContext*")
)

(define-method set_font_map
  (of-object "PangoContext")
  (c-name "pango_context_set_font_map")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "font_map")
  )
)

(define-method list_families
  (of-object "PangoContext")
  (c-name "pango_context_list_families")
  (return-type "none")
  (parameters
    '("PangoFontFamily***" "families")
    '("int*" "n_families")
  )
)

(define-method load_font
  (of-object "PangoContext")
  (c-name "pango_context_load_font")
  (return-type "PangoFont*")
  (parameters
    '("const-PangoFontDescription*" "desc")
  )
)

(define-method load_fontset
  (of-object "PangoContext")
  (c-name "pango_context_load_fontset")
  (return-type "PangoFontset*")
  (parameters
    '("const-PangoFontDescription*" "desc")
    '("PangoLanguage*" "language")
  )
)

(define-method get_metrics
  (of-object "PangoContext")
  (c-name "pango_context_get_metrics")
  (return-type "PangoFontMetrics*")
  (parameters
    '("const-PangoFontDescription*" "desc")
    '("PangoLanguage*" "language")
  )
)

(define-method set_font_description
  (of-object "PangoContext")
  (c-name "pango_context_set_font_description")
  (return-type "none")
  (parameters
    '("const-PangoFontDescription*" "desc")
  )
)

(define-method get_font_description
  (of-object "PangoContext")
  (c-name "pango_context_get_font_description")
  (return-type "PangoFontDescription*")
)

(define-method get_language
  (of-object "PangoContext")
  (c-name "pango_context_get_language")
  (return-type "PangoLanguage*")
)

(define-method set_language
  (of-object "PangoContext")
  (c-name "pango_context_set_language")
  (return-type "none")
  (parameters
    '("PangoLanguage*" "language")
  )
)

(define-method set_base_dir
  (of-object "PangoContext")
  (c-name "pango_context_set_base_dir")
  (return-type "none")
  (parameters
    '("PangoDirection" "direction")
  )
)

(define-method get_base_dir
  (of-object "PangoContext")
  (c-name "pango_context_get_base_dir")
  (return-type "PangoDirection")
)

(define-function pango_itemize
  (c-name "pango_itemize")
  (return-type "GList*")
  (parameters
    '("PangoContext*" "context")
    '("const-char*" "text")
    '("int" "start_index")
    '("int" "length")
    '("PangoAttrList*" "attrs")
    '("PangoAttrIterator*" "cached_iter")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-coverage.h

(define-method ref
  (of-object "PangoCoverage")
  (c-name "pango_coverage_ref")
  (return-type "PangoCoverage*")
)

(define-method unref
  (of-object "PangoCoverage")
  (c-name "pango_coverage_unref")
  (return-type "none")
)

(define-method copy
  (of-object "PangoCoverage")
  (c-name "pango_coverage_copy")
  (return-type "PangoCoverage*")
)

(define-method get
  (of-object "PangoCoverage")
  (c-name "pango_coverage_get")
  (return-type "PangoCoverageLevel")
  (parameters
    '("int" "index_")
  )
)

(define-method set
  (of-object "PangoCoverage")
  (c-name "pango_coverage_set")
  (return-type "none")
  (parameters
    '("int" "index_")
    '("PangoCoverageLevel" "level")
  )
)

(define-method max
  (of-object "PangoCoverage")
  (c-name "pango_coverage_max")
  (return-type "none")
  (parameters
    '("PangoCoverage*" "other")
  )
)

(define-method to_bytes
  (of-object "PangoCoverage")
  (c-name "pango_coverage_to_bytes")
  (return-type "none")
  (parameters
    '("guchar**" "bytes")
    '("int*" "n_bytes")
  )
)

(define-function pango_coverage_from_bytes
  (c-name "pango_coverage_from_bytes")
  (return-type "PangoCoverage*")
  (parameters
    '("guchar*" "bytes")
    '("int" "n_bytes")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-engine.h

(define-function script_engine_list
  (c-name "script_engine_list")
  (return-type "none")
  (parameters
    '("PangoEngineInfo**" "engines")
    '("int*" "n_engines")
  )
)

(define-function script_engine_load
  (c-name "script_engine_load")
  (return-type "PangoEngine*")
  (parameters
    '("const-char*" "id")
  )
)

(define-function script_engine_unload
  (c-name "script_engine_unload")
  (return-type "none")
  (parameters
    '("PangoEngine*" "engine")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-enum-types.h

(define-function pango_underline_get_type
  (c-name "pango_underline_get_type")
  (return-type "GType")
)

(define-function pango_coverage_level_get_type
  (c-name "pango_coverage_level_get_type")
  (return-type "GType")
)

(define-function pango_style_get_type
  (c-name "pango_style_get_type")
  (return-type "GType")
)

(define-function pango_variant_get_type
  (c-name "pango_variant_get_type")
  (return-type "GType")
)

(define-function pango_weight_get_type
  (c-name "pango_weight_get_type")
  (return-type "GType")
)

(define-function pango_stretch_get_type
  (c-name "pango_stretch_get_type")
  (return-type "GType")
)

(define-function pango_font_mask_get_type
  (c-name "pango_font_mask_get_type")
  (return-type "GType")
)

(define-function pango_alignment_get_type
  (c-name "pango_alignment_get_type")
  (return-type "GType")
)

(define-function pango_wrap_mode_get_type
  (c-name "pango_wrap_mode_get_type")
  (return-type "GType")
)

(define-function pango_tab_align_get_type
  (c-name "pango_tab_align_get_type")
  (return-type "GType")
)

(define-function pango_direction_get_type
  (c-name "pango_direction_get_type")
  (return-type "GType")
)



;; From /gnome/head/cvs/pango/pango/pango-font.h

(define-function pango_font_description_new
  (c-name "pango_font_description_new")
  (is-constructor-of "PangoFontDescription")
  (return-type "PangoFontDescription*")
)

(define-method copy
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_copy")
  (return-type "PangoFontDescription*")
)

(define-method copy_static
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_copy_static")
  (return-type "PangoFontDescription*")
)

(define-method hash
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_hash")
  (return-type "guint")
)

(define-method equal
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_equal")
  (return-type "gboolean")
  (parameters
    '("const-PangoFontDescription*" "desc2")
  )
)

(define-method free
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_free")
  (return-type "none")
)

(define-function pango_font_descriptions_free
  (c-name "pango_font_descriptions_free")
  (return-type "none")
  (parameters
    '("PangoFontDescription**" "descs")
    '("int" "n_descs")
  )
)

(define-method set_family
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_set_family")
  (return-type "none")
  (parameters
    '("const-char*" "family")
  )
)

(define-method set_family_static
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_set_family_static")
  (return-type "none")
  (parameters
    '("const-char*" "family")
  )
)

(define-method get_family
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_get_family")
  (return-type "const-char*")
)

(define-method set_style
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_set_style")
  (return-type "none")
  (parameters
    '("PangoStyle" "style")
  )
)

(define-method get_style
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_get_style")
  (return-type "PangoStyle")
)

(define-method set_variant
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_set_variant")
  (return-type "none")
  (parameters
    '("PangoVariant" "variant")
  )
)

(define-method get_variant
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_get_variant")
  (return-type "PangoVariant")
)

(define-method set_weight
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_set_weight")
  (return-type "none")
  (parameters
    '("PangoWeight" "weight")
  )
)

(define-method get_weight
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_get_weight")
  (return-type "PangoWeight")
)

(define-method set_stretch
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_set_stretch")
  (return-type "none")
  (parameters
    '("PangoStretch" "stretch")
  )
)

(define-method get_stretch
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_get_stretch")
  (return-type "PangoStretch")
)

(define-method set_size
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_set_size")
  (return-type "none")
  (parameters
    '("gint" "size")
  )
)

(define-method get_size
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_get_size")
  (return-type "gint")
)

(define-method get_set_fields
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_get_set_fields")
  (return-type "PangoFontMask")
)

(define-method unset_fields
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_unset_fields")
  (return-type "none")
  (parameters
    '("PangoFontMask" "to_unset")
  )
)

(define-method merge
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_merge")
  (return-type "none")
  (parameters
    '("const-PangoFontDescription*" "desc_to_merge")
    '("gboolean" "replace_existing")
  )
)

(define-method merge_static
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_merge_static")
  (return-type "none")
  (parameters
    '("const-PangoFontDescription*" "desc_to_merge")
    '("gboolean" "replace_existing")
  )
)

(define-method better_match
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_better_match")
  (return-type "gboolean")
  (parameters
    '("const-PangoFontDescription*" "old_match")
    '("const-PangoFontDescription*" "new_match")
  )
)

(define-function pango_font_description_from_string
  (c-name "pango_font_description_from_string")
  (return-type "PangoFontDescription*")
  (parameters
    '("const-char*" "str")
  )
)

(define-method to_string
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_to_string")
  (return-type "char*")
)

(define-method to_filename
  (of-object "PangoFontDescription")
  (c-name "pango_font_description_to_filename")
  (return-type "char*")
)

(define-function pango_font_metrics_get_type
  (c-name "pango_font_metrics_get_type")
  (return-type "GType")
)

(define-method ref
  (of-object "PangoFontMetrics")
  (c-name "pango_font_metrics_ref")
  (return-type "PangoFontMetrics*")
)

(define-method unref
  (of-object "PangoFontMetrics")
  (c-name "pango_font_metrics_unref")
  (return-type "none")
)

(define-method get_ascent
  (of-object "PangoFontMetrics")
  (c-name "pango_font_metrics_get_ascent")
  (return-type "int")
)

(define-method get_descent
  (of-object "PangoFontMetrics")
  (c-name "pango_font_metrics_get_descent")
  (return-type "int")
)

(define-method get_approximate_char_width
  (of-object "PangoFontMetrics")
  (c-name "pango_font_metrics_get_approximate_char_width")
  (return-type "int")
)

(define-method get_approximate_digit_width
  (of-object "PangoFontMetrics")
  (c-name "pango_font_metrics_get_approximate_digit_width")
  (return-type "int")
)

(define-function pango_font_metrics_new
  (c-name "pango_font_metrics_new")
  (is-constructor-of "PangoFontMetrics")
  (return-type "PangoFontMetrics*")
)

(define-function pango_font_family_get_type
  (c-name "pango_font_family_get_type")
  (return-type "GType")
)

(define-method list_faces
  (of-object "PangoFontFamily")
  (c-name "pango_font_family_list_faces")
  (return-type "none")
  (parameters
    '("PangoFontFace***" "faces")
    '("int*" "n_faces")
  )
)

(define-method get_name
  (of-object "PangoFontFamily")
  (c-name "pango_font_family_get_name")
  (return-type "const-char*")
)

(define-function pango_font_face_get_type
  (c-name "pango_font_face_get_type")
  (return-type "GType")
)

(define-method describe
  (of-object "PangoFontFace")
  (c-name "pango_font_face_describe")
  (return-type "PangoFontDescription*")
)

(define-method get_face_name
  (of-object "PangoFontFace")
  (c-name "pango_font_face_get_face_name")
  (return-type "const-char*")
)

(define-function pango_font_get_type
  (c-name "pango_font_get_type")
  (return-type "GType")
)

(define-method describe
  (of-object "PangoFont")
  (c-name "pango_font_describe")
  (return-type "PangoFontDescription*")
)

(define-method get_coverage
  (of-object "PangoFont")
  (c-name "pango_font_get_coverage")
  (return-type "PangoCoverage*")
  (parameters
    '("PangoLanguage*" "language")
  )
)

(define-method find_shaper
  (of-object "PangoFont")
  (c-name "pango_font_find_shaper")
  (return-type "PangoEngineShape*")
  (parameters
    '("PangoLanguage*" "language")
    '("guint32" "ch")
  )
)

(define-method get_metrics
  (of-object "PangoFont")
  (c-name "pango_font_get_metrics")
  (return-type "PangoFontMetrics*")
  (parameters
    '("PangoLanguage*" "language")
  )
)

(define-method get_glyph_extents
  (of-object "PangoFont")
  (c-name "pango_font_get_glyph_extents")
  (return-type "none")
  (parameters
    '("PangoGlyph" "glyph")
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-fontmap.h

(define-method load_font
  (of-object "PangoFontMap")
  (c-name "pango_font_map_load_font")
  (return-type "PangoFont*")
  (parameters
    '("PangoContext*" "context")
    '("const-PangoFontDescription*" "desc")
  )
)

(define-method load_fontset
  (of-object "PangoFontMap")
  (c-name "pango_font_map_load_fontset")
  (return-type "PangoFontset*")
  (parameters
    '("PangoContext*" "context")
    '("const-PangoFontDescription*" "desc")
    '("PangoLanguage*" "language")
  )
)

(define-method list_families
  (of-object "PangoFontMap")
  (c-name "pango_font_map_list_families")
  (return-type "none")
  (parameters
    '("PangoFontFamily***" "families")
    '("int*" "n_families")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-fontset.h

(define-method get_font
  (of-object "PangoFontset")
  (c-name "pango_fontset_get_font")
  (return-type "PangoFont*")
  (parameters
    '("guint" "wc")
  )
)

(define-method get_metrics
  (of-object "PangoFontset")
  (c-name "pango_fontset_get_metrics")
  (return-type "PangoFontMetrics*")
)

(define-function pango_fontset_simple_get_type
  (c-name "pango_fontset_simple_get_type")
  (return-type "GType")
)

(define-function pango_fontset_simple_new
  (c-name "pango_fontset_simple_new")
  (is-constructor-of "PangoFontsetSimple")
  (return-type "PangoFontsetSimple*")
  (parameters
    '("PangoLanguage*" "language")
  )
)

(define-method append
  (of-object "PangoFontsetSimple")
  (c-name "pango_fontset_simple_append")
  (return-type "none")
  (parameters
    '("PangoFont*" "font")
  )
)

(define-method size
  (of-object "PangoFontsetSimple")
  (c-name "pango_fontset_simple_size")
  (return-type "int")
)



;; From /gnome/head/cvs/pango/pango/pangoft2.h

(define-function pango_ft2_font_map_for_display
  (c-name "pango_ft2_font_map_for_display")
  (return-type "PangoFontMap*")
)

(define-function pango_ft2_shutdown_display
  (c-name "pango_ft2_shutdown_display")
  (return-type "none")
)

(define-function pango_ft2_render
  (c-name "pango_ft2_render")
  (return-type "none")
  (parameters
    '("FT_Bitmap*" "bitmap")
    '("PangoFont*" "font")
    '("PangoGlyphString*" "glyphs")
    '("gint" "x")
    '("gint" "y")
  )
)

(define-function pango_ft2_render_layout_line
  (c-name "pango_ft2_render_layout_line")
  (return-type "none")
  (parameters
    '("FT_Bitmap*" "bitmap")
    '("PangoLayoutLine*" "line")
    '("int" "x")
    '("int" "y")
  )
)

(define-function pango_ft2_render_layout
  (c-name "pango_ft2_render_layout")
  (return-type "none")
  (parameters
    '("FT_Bitmap*" "bitmap")
    '("PangoLayout*" "layout")
    '("int" "x")
    '("int" "y")
  )
)

(define-function pango_ft2_font_map_get_type
  (c-name "pango_ft2_font_map_get_type")
  (return-type "GType")
)

(define-function pango_ft2_font_map_new
  (c-name "pango_ft2_font_map_new")
  (is-constructor-of "PangoFt2FontMap")
  (return-type "PangoFontMap*")
)

(define-method set_resolution
  (of-object "PangoFT2FontMap")
  (c-name "pango_ft2_font_map_set_resolution")
  (return-type "none")
  (parameters
    '("double" "dpi_x")
    '("double" "dpi_y")
  )
)

(define-method set_default_substitute
  (of-object "PangoFT2FontMap")
  (c-name "pango_ft2_font_map_set_default_substitute")
  (return-type "none")
  (parameters
    '("PangoFT2SubstituteFunc" "func")
    '("gpointer" "data")
    '("GDestroyNotify" "notify")
  )
)

(define-method substitute_changed
  (of-object "PangoFT2FontMap")
  (c-name "pango_ft2_font_map_substitute_changed")
  (return-type "none")
)

(define-method create_context
  (of-object "PangoFT2FontMap")
  (c-name "pango_ft2_font_map_create_context")
  (return-type "PangoContext*")
)

(define-function pango_ft2_get_unknown_glyph
  (c-name "pango_ft2_get_unknown_glyph")
  (return-type "PangoGlyph")
  (parameters
    '("PangoFont*" "font")
  )
)

(define-function pango_ft2_font_get_kerning
  (c-name "pango_ft2_font_get_kerning")
  (return-type "int")
  (parameters
    '("PangoFont*" "font")
    '("PangoGlyph" "left")
    '("PangoGlyph" "right")
  )
)

(define-function pango_ft2_font_get_face
  (c-name "pango_ft2_font_get_face")
  (return-type "FT_Face")
  (parameters
    '("PangoFont*" "font")
  )
)

(define-function pango_ft2_font_get_coverage
  (c-name "pango_ft2_font_get_coverage")
  (return-type "PangoCoverage*")
  (parameters
    '("PangoFont*" "font")
    '("PangoLanguage*" "language")
  )
)



;; From /gnome/head/cvs/pango/pango/pangoft2-private.h

(define-function _pango_ft2_font_new
  (c-name "_pango_ft2_font_new")
  (is-constructor-of "PangoFt2Font")
  (return-type "PangoFT2Font*")
  (parameters
    '("PangoFontMap*" "font")
    '("FcPattern*" "pattern")
  )
)

(define-function _pango_ft2_get_shaper_map
  (c-name "_pango_ft2_get_shaper_map")
  (return-type "PangoMap*")
  (parameters
    '("PangoLanguage*" "language")
  )
)

(define-function _pango_ft2_font_map_get_coverage
  (c-name "_pango_ft2_font_map_get_coverage")
  (return-type "PangoCoverage*")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("FcPattern*" "pattern")
  )
)

(define-function _pango_ft2_font_map_get_library
  (c-name "_pango_ft2_font_map_get_library")
  (return-type "FT_Library")
  (parameters
    '("PangoFontMap*" "fontmap")
  )
)

(define-function _pango_ft2_font_map_cache_add
  (c-name "_pango_ft2_font_map_cache_add")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoFT2Font*" "ft2font")
  )
)

(define-function _pango_ft2_font_map_cache_remove
  (c-name "_pango_ft2_font_map_cache_remove")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoFT2Font*" "ft2font")
  )
)

(define-function _pango_ft2_font_map_add
  (c-name "_pango_ft2_font_map_add")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoFT2Font*" "ft2font")
  )
)

(define-function _pango_ft2_font_map_remove
  (c-name "_pango_ft2_font_map_remove")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoFT2Font*" "ft2font")
  )
)

(define-function _pango_ft2_ft_strerror
  (c-name "_pango_ft2_ft_strerror")
  (return-type "const-char*")
  (parameters
    '("FT_Error" "error")
  )
)

(define-function _pango_ft2_font_desc_from_pattern
  (c-name "_pango_ft2_font_desc_from_pattern")
  (return-type "PangoFontDescription*")
  (parameters
    '("FcPattern*" "pattern")
    '("gboolean" "include_size")
  )
)

(define-function pango_ft2_font_get_cache_glyph_data
  (c-name "pango_ft2_font_get_cache_glyph_data")
  (return-type "void*")
  (parameters
    '("PangoFont*" "font")
    '("int" "glyph_index")
  )
)

(define-function pango_ft2_font_set_cache_glyph_data
  (c-name "pango_ft2_font_set_cache_glyph_data")
  (return-type "none")
  (parameters
    '("PangoFont*" "font")
    '("int" "glyph_index")
    '("void*" "cached_glyph")
  )
)

(define-function pango_ft2_font_set_glyph_cache_destroy
  (c-name "pango_ft2_font_set_glyph_cache_destroy")
  (return-type "none")
  (parameters
    '("PangoFont*" "font")
    '("GDestroyNotify" "destroy_notify")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-glyph.h

(define-function pango_glyph_string_new
  (c-name "pango_glyph_string_new")
  (is-constructor-of "PangoGlyphString")
  (return-type "PangoGlyphString*")
)

(define-method set_size
  (of-object "PangoGlyphString")
  (c-name "pango_glyph_string_set_size")
  (return-type "none")
  (parameters
    '("gint" "new_len")
  )
)

(define-function pango_glyph_string_get_type
  (c-name "pango_glyph_string_get_type")
  (return-type "GType")
)

(define-method copy
  (of-object "PangoGlyphString")
  (c-name "pango_glyph_string_copy")
  (return-type "PangoGlyphString*")
)

(define-method free
  (of-object "PangoGlyphString")
  (c-name "pango_glyph_string_free")
  (return-type "none")
)

(define-method extents
  (of-object "PangoGlyphString")
  (c-name "pango_glyph_string_extents")
  (return-type "none")
  (parameters
    '("PangoFont*" "font")
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method extents_range
  (of-object "PangoGlyphString")
  (c-name "pango_glyph_string_extents_range")
  (return-type "none")
  (parameters
    '("int" "start")
    '("int" "end")
    '("PangoFont*" "font")
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_logical_widths
  (of-object "PangoGlyphString")
  (c-name "pango_glyph_string_get_logical_widths")
  (return-type "none")
  (parameters
    '("const-char*" "text")
    '("int" "length")
    '("int" "embedding_level")
    '("int*" "logical_widths")
  )
)

(define-method index_to_x
  (of-object "PangoGlyphString")
  (c-name "pango_glyph_string_index_to_x")
  (return-type "none")
  (parameters
    '("char*" "text")
    '("int" "length")
    '("PangoAnalysis*" "analysis")
    '("int" "index_")
    '("gboolean" "trailing")
    '("int*" "x_pos")
  )
)

(define-method x_to_index
  (of-object "PangoGlyphString")
  (c-name "pango_glyph_string_x_to_index")
  (return-type "none")
  (parameters
    '("char*" "text")
    '("int" "length")
    '("PangoAnalysis*" "analysis")
    '("int" "x_pos")
    '("int*" "index_")
    '("int*" "trailing")
  )
)

(define-function pango_shape
  (c-name "pango_shape")
  (return-type "none")
  (parameters
    '("const-gchar*" "text")
    '("gint" "length")
    '("PangoAnalysis*" "analysis")
    '("PangoGlyphString*" "glyphs")
  )
)

(define-function pango_reorder_items
  (c-name "pango_reorder_items")
  (return-type "GList*")
  (parameters
    '("GList*" "logical_items")
  )
)



;; From /gnome/head/cvs/pango/pango/pango.h



;; From /gnome/head/cvs/pango/pango/pango-indic.h

(define-function gboolean
  (c-name "gboolean")
  (return-type "G_BEGIN_DECLS")
  (parameters
  )
)

(define-function pango_indic_shift_vowels
  (c-name "pango_indic_shift_vowels")
  (return-type "none")
  (parameters
    '("PangoIndicScript*" "script")
    '("gunichar*" "chars")
    '("gunichar*" "end")
  )
)

(define-function pango_indic_compact
  (c-name "pango_indic_compact")
  (return-type "none")
  (parameters
    '("PangoIndicScript*" "script")
    '("int*" "num")
    '("gunichar*" "chars")
    '("int*" "cluster")
  )
)

(define-function pango_indic_convert_vowels
  (c-name "pango_indic_convert_vowels")
  (return-type "none")
  (parameters
    '("PangoIndicScript*" "script")
    '("gboolean" "in_middle")
    '("int*" "num")
    '("gunichar*" "chars")
    '("gboolean" "has_standalone_vowels")
  )
)

(define-function pango_indic_split_out_characters
  (c-name "pango_indic_split_out_characters")
  (return-type "none")
  (parameters
    '("PangoIndicScript*" "script")
    '("const-gchar*" "text")
    '("int" "n_chars")
    '("gunichar**" "wc")
    '("int*" "n_glyph")
    '("PangoGlyphString*" "glyphs")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-intset.h

(define-function pango_int_set_new
  (c-name "pango_int_set_new")
  (is-constructor-of "PangoIntSet")
  (return-type "PangoIntSet*")
)

(define-method add
  (of-object "PangoIntSet")
  (c-name "pango_int_set_add")
  (return-type "none")
  (parameters
    '("int" "glyph")
  )
)

(define-method destroy
  (of-object "PangoIntSet")
  (c-name "pango_int_set_destroy")
  (return-type "none")
)

(define-method add_range
  (of-object "PangoIntSet")
  (c-name "pango_int_set_add_range")
  (return-type "none")
  (parameters
    '("int" "start")
    '("int" "end")
  )
)

(define-method contains
  (of-object "PangoIntSet")
  (c-name "pango_int_set_contains")
  (return-type "gboolean")
  (parameters
    '("int" "member")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-item.h

(define-function pango_item_new
  (c-name "pango_item_new")
  (is-constructor-of "PangoItem")
  (return-type "PangoItem*")
)

(define-method copy
  (of-object "PangoItem")
  (c-name "pango_item_copy")
  (return-type "PangoItem*")
)

(define-method free
  (of-object "PangoItem")
  (c-name "pango_item_free")
  (return-type "none")
)

(define-method split
  (of-object "PangoItem")
  (c-name "pango_item_split")
  (return-type "PangoItem*")
  (parameters
    '("int" "split_index")
    '("int" "split_offset")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-layout.h

(define-function pango_layout_get_type
  (c-name "pango_layout_get_type")
  (return-type "GType")
)

(define-function pango_layout_new
  (c-name "pango_layout_new")
  (is-constructor-of "PangoLayout")
  (return-type "PangoLayout*")
  (parameters
    '("PangoContext*" "context")
  )
)

(define-method copy
  (of-object "PangoLayout")
  (c-name "pango_layout_copy")
  (return-type "PangoLayout*")
)

(define-method get_context
  (of-object "PangoLayout")
  (c-name "pango_layout_get_context")
  (return-type "PangoContext*")
)

(define-method set_attributes
  (of-object "PangoLayout")
  (c-name "pango_layout_set_attributes")
  (return-type "none")
  (parameters
    '("PangoAttrList*" "attrs")
  )
)

(define-method get_attributes
  (of-object "PangoLayout")
  (c-name "pango_layout_get_attributes")
  (return-type "PangoAttrList*")
)

(define-method set_text
  (of-object "PangoLayout")
  (c-name "pango_layout_set_text")
  (return-type "none")
  (parameters
    '("const-char*" "text")
    '("int" "length")
  )
)

(define-method get_text
  (of-object "PangoLayout")
  (c-name "pango_layout_get_text")
  (return-type "const-char*")
)

(define-method set_markup
  (of-object "PangoLayout")
  (c-name "pango_layout_set_markup")
  (return-type "none")
  (parameters
    '("const-char*" "markup")
    '("int" "length")
  )
)

(define-method set_markup_with_accel
  (of-object "PangoLayout")
  (c-name "pango_layout_set_markup_with_accel")
  (return-type "none")
  (parameters
    '("const-char*" "markup")
    '("int" "length")
    '("gunichar" "accel_marker")
    '("gunichar*" "accel_char")
  )
)

(define-method set_font_description
  (of-object "PangoLayout")
  (c-name "pango_layout_set_font_description")
  (return-type "none")
  (parameters
    '("const-PangoFontDescription*" "desc")
  )
)

(define-method set_width
  (of-object "PangoLayout")
  (c-name "pango_layout_set_width")
  (return-type "none")
  (parameters
    '("int" "width")
  )
)

(define-method get_width
  (of-object "PangoLayout")
  (c-name "pango_layout_get_width")
  (return-type "int")
)

(define-method set_wrap
  (of-object "PangoLayout")
  (c-name "pango_layout_set_wrap")
  (return-type "none")
  (parameters
    '("PangoWrapMode" "wrap")
  )
)

(define-method get_wrap
  (of-object "PangoLayout")
  (c-name "pango_layout_get_wrap")
  (return-type "PangoWrapMode")
)

(define-method set_indent
  (of-object "PangoLayout")
  (c-name "pango_layout_set_indent")
  (return-type "none")
  (parameters
    '("int" "indent")
  )
)

(define-method get_indent
  (of-object "PangoLayout")
  (c-name "pango_layout_get_indent")
  (return-type "int")
)

(define-method set_spacing
  (of-object "PangoLayout")
  (c-name "pango_layout_set_spacing")
  (return-type "none")
  (parameters
    '("int" "spacing")
  )
)

(define-method get_spacing
  (of-object "PangoLayout")
  (c-name "pango_layout_get_spacing")
  (return-type "int")
)

(define-method set_justify
  (of-object "PangoLayout")
  (c-name "pango_layout_set_justify")
  (return-type "none")
  (parameters
    '("gboolean" "justify")
  )
)

(define-method get_justify
  (of-object "PangoLayout")
  (c-name "pango_layout_get_justify")
  (return-type "gboolean")
)

(define-method set_alignment
  (of-object "PangoLayout")
  (c-name "pango_layout_set_alignment")
  (return-type "none")
  (parameters
    '("PangoAlignment" "alignment")
  )
)

(define-method get_alignment
  (of-object "PangoLayout")
  (c-name "pango_layout_get_alignment")
  (return-type "PangoAlignment")
)

(define-method set_tabs
  (of-object "PangoLayout")
  (c-name "pango_layout_set_tabs")
  (return-type "none")
  (parameters
    '("PangoTabArray*" "tabs")
  )
)

(define-method get_tabs
  (of-object "PangoLayout")
  (c-name "pango_layout_get_tabs")
  (return-type "PangoTabArray*")
)

(define-method set_single_paragraph_mode
  (of-object "PangoLayout")
  (c-name "pango_layout_set_single_paragraph_mode")
  (return-type "none")
  (parameters
    '("gboolean" "setting")
  )
)

(define-method get_single_paragraph_mode
  (of-object "PangoLayout")
  (c-name "pango_layout_get_single_paragraph_mode")
  (return-type "gboolean")
)

(define-method context_changed
  (of-object "PangoLayout")
  (c-name "pango_layout_context_changed")
  (return-type "none")
)

(define-method get_log_attrs
  (of-object "PangoLayout")
  (c-name "pango_layout_get_log_attrs")
  (return-type "none")
  (parameters
    '("PangoLogAttr**" "attrs")
    '("gint*" "n_attrs")
  )
)

(define-method index_to_pos
  (of-object "PangoLayout")
  (c-name "pango_layout_index_to_pos")
  (return-type "none")
  (parameters
    '("int" "index_")
    '("PangoRectangle*" "pos")
  )
)

(define-method get_cursor_pos
  (of-object "PangoLayout")
  (c-name "pango_layout_get_cursor_pos")
  (return-type "none")
  (parameters
    '("int" "index_")
    '("PangoRectangle*" "strong_pos")
    '("PangoRectangle*" "weak_pos")
  )
)

(define-method move_cursor_visually
  (of-object "PangoLayout")
  (c-name "pango_layout_move_cursor_visually")
  (return-type "none")
  (parameters
    '("gboolean" "strong")
    '("int" "old_index")
    '("int" "old_trailing")
    '("int" "direction")
    '("int*" "new_index")
    '("int*" "new_trailing")
  )
)

(define-method xy_to_index
  (of-object "PangoLayout")
  (c-name "pango_layout_xy_to_index")
  (return-type "gboolean")
  (parameters
    '("int" "x")
    '("int" "y")
    '("int*" "index_")
    '("int*" "trailing")
  )
)

(define-method get_extents
  (of-object "PangoLayout")
  (c-name "pango_layout_get_extents")
  (return-type "none")
  (parameters
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_pixel_extents
  (of-object "PangoLayout")
  (c-name "pango_layout_get_pixel_extents")
  (return-type "none")
  (parameters
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_size
  (of-object "PangoLayout")
  (c-name "pango_layout_get_size")
  (return-type "none")
  (parameters
    '("int*" "width")
    '("int*" "height")
  )
)

(define-method get_pixel_size
  (of-object "PangoLayout")
  (c-name "pango_layout_get_pixel_size")
  (return-type "none")
  (parameters
    '("int*" "width")
    '("int*" "height")
  )
)

(define-method get_line_count
  (of-object "PangoLayout")
  (c-name "pango_layout_get_line_count")
  (return-type "int")
)

(define-method get_line
  (of-object "PangoLayout")
  (c-name "pango_layout_get_line")
  (return-type "PangoLayoutLine*")
  (parameters
    '("int" "line")
  )
)

(define-method get_lines
  (of-object "PangoLayout")
  (c-name "pango_layout_get_lines")
  (return-type "GSList*")
)

(define-method ref
  (of-object "PangoLayoutLine")
  (c-name "pango_layout_line_ref")
  (return-type "none")
)

(define-method unref
  (of-object "PangoLayoutLine")
  (c-name "pango_layout_line_unref")
  (return-type "none")
)

(define-method x_to_index
  (of-object "PangoLayoutLine")
  (c-name "pango_layout_line_x_to_index")
  (return-type "gboolean")
  (parameters
    '("int" "x_pos")
    '("int*" "index_")
    '("int*" "trailing")
  )
)

(define-method index_to_x
  (of-object "PangoLayoutLine")
  (c-name "pango_layout_line_index_to_x")
  (return-type "none")
  (parameters
    '("int" "index_")
    '("gboolean" "trailing")
    '("int*" "x_pos")
  )
)

(define-method get_x_ranges
  (of-object "PangoLayoutLine")
  (c-name "pango_layout_line_get_x_ranges")
  (return-type "none")
  (parameters
    '("int" "start_index")
    '("int" "end_index")
    '("int**" "ranges")
    '("int*" "n_ranges")
  )
)

(define-method get_extents
  (of-object "PangoLayoutLine")
  (c-name "pango_layout_line_get_extents")
  (return-type "none")
  (parameters
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_pixel_extents
  (of-object "PangoLayoutLine")
  (c-name "pango_layout_line_get_pixel_extents")
  (return-type "none")
  (parameters
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_iter
  (of-object "PangoLayout")
  (c-name "pango_layout_get_iter")
  (return-type "PangoLayoutIter*")
)

(define-method free
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_free")
  (return-type "none")
)

(define-method get_index
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_index")
  (return-type "int")
)

(define-method get_run
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_run")
  (return-type "PangoLayoutRun*")
)

(define-method get_line
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_line")
  (return-type "PangoLayoutLine*")
)

(define-method at_last_line
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_at_last_line")
  (return-type "gboolean")
)

(define-method next_char
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_next_char")
  (return-type "gboolean")
)

(define-method next_cluster
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_next_cluster")
  (return-type "gboolean")
)

(define-method next_run
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_next_run")
  (return-type "gboolean")
)

(define-method next_line
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_next_line")
  (return-type "gboolean")
)

(define-method get_char_extents
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_char_extents")
  (return-type "none")
  (parameters
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_cluster_extents
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_cluster_extents")
  (return-type "none")
  (parameters
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_run_extents
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_run_extents")
  (return-type "none")
  (parameters
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_line_extents
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_line_extents")
  (return-type "none")
  (parameters
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_line_yrange
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_line_yrange")
  (return-type "none")
  (parameters
    '("int*" "y0_")
    '("int*" "y1_")
  )
)

(define-method get_layout_extents
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_layout_extents")
  (return-type "none")
  (parameters
    '("PangoRectangle*" "ink_rect")
    '("PangoRectangle*" "logical_rect")
  )
)

(define-method get_baseline
  (of-object "PangoLayoutIter")
  (c-name "pango_layout_iter_get_baseline")
  (return-type "int")
)



;; From /gnome/head/cvs/pango/pango/pango-modules.h

(define-function pango_find_map
  (c-name "pango_find_map")
  (return-type "PangoMap*")
  (parameters
    '("PangoLanguage*" "language")
    '("guint" "engine_type_id")
    '("guint" "render_type_id")
  )
)

(define-method get_entry
  (of-object "PangoMap")
  (c-name "pango_map_get_entry")
  (return-type "PangoMapEntry*")
  (parameters
    '("guint32" "wc")
  )
)

(define-method get_engine
  (of-object "PangoMap")
  (c-name "pango_map_get_engine")
  (return-type "PangoEngine*")
  (parameters
    '("guint32" "wc")
  )
)

(define-function pango_module_register
  (c-name "pango_module_register")
  (return-type "none")
  (parameters
    '("PangoIncludedModule*" "module")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-ot.h

(define-method find_script
  (of-object "PangoOTInfo")
  (c-name "pango_ot_info_find_script")
  (return-type "gboolean")
  (parameters
    '("PangoOTTableType" "table_type")
    '("PangoOTTag" "script_tag")
    '("guint*" "script_index")
  )
)

(define-method find_language
  (of-object "PangoOTInfo")
  (c-name "pango_ot_info_find_language")
  (return-type "gboolean")
  (parameters
    '("PangoOTTableType" "table_type")
    '("guint" "script_index")
    '("PangoOTTag" "language_tag")
    '("guint*" "language_index")
    '("guint*" "required_feature_index")
  )
)

(define-method find_feature
  (of-object "PangoOTInfo")
  (c-name "pango_ot_info_find_feature")
  (return-type "gboolean")
  (parameters
    '("PangoOTTableType" "table_type")
    '("PangoOTTag" "feature_tag")
    '("guint" "script_index")
    '("guint" "language_index")
    '("guint*" "feature_index")
  )
)

(define-method list_scripts
  (of-object "PangoOTInfo")
  (c-name "pango_ot_info_list_scripts")
  (return-type "PangoOTTag*")
  (parameters
    '("PangoOTTableType" "table_type")
  )
)

(define-method list_languages
  (of-object "PangoOTInfo")
  (c-name "pango_ot_info_list_languages")
  (return-type "PangoOTTag*")
  (parameters
    '("PangoOTTableType" "table_type")
    '("guint" "script_index")
    '("PangoOTTag" "language_tag")
  )
)

(define-method list_features
  (of-object "PangoOTInfo")
  (c-name "pango_ot_info_list_features")
  (return-type "PangoOTTag*")
  (parameters
    '("PangoOTTableType" "table_type")
    '("PangoOTTag" "tag")
    '("guint" "script_index")
    '("guint" "language_index")
  )
)

(define-function pango_ot_ruleset_new
  (c-name "pango_ot_ruleset_new")
  (is-constructor-of "PangoOtRuleset")
  (return-type "PangoOTRuleset*")
  (parameters
    '("PangoOTInfo*" "info")
  )
)

(define-method add_feature
  (of-object "PangoOTRuleset")
  (c-name "pango_ot_ruleset_add_feature")
  (return-type "none")
  (parameters
    '("PangoOTTableType" "table_type")
    '("guint" "feature_index")
    '("gulong" "property_bit")
  )
)

(define-method shape
  (of-object "PangoOTRuleset")
  (c-name "pango_ot_ruleset_shape")
  (return-type "none")
  (parameters
    '("PangoGlyphString*" "glyphs")
    '("gulong*" "properties")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-tabs.h

(define-function pango_tab_array_new_with_positions
  (c-name "pango_tab_array_new_with_positions")
  (return-type "PangoTabArray*")
  (parameters
    '("gint" "size")
    '("gboolean" "positions_in_pixels")
    '("PangoTabAlign" "first_alignment")
    '("gint" "first_position")
  )
  (varargs #t)
)

(define-function pango_tab_array_get_type
  (c-name "pango_tab_array_get_type")
  (return-type "GType")
)

(define-method copy
  (of-object "PangoTabArray")
  (c-name "pango_tab_array_copy")
  (return-type "PangoTabArray*")
)

(define-method free
  (of-object "PangoTabArray")
  (c-name "pango_tab_array_free")
  (return-type "none")
)

(define-method get_size
  (of-object "PangoTabArray")
  (c-name "pango_tab_array_get_size")
  (return-type "gint")
)

(define-method resize
  (of-object "PangoTabArray")
  (c-name "pango_tab_array_resize")
  (return-type "none")
  (parameters
    '("gint" "new_size")
  )
)

(define-method set_tab
  (of-object "PangoTabArray")
  (c-name "pango_tab_array_set_tab")
  (return-type "none")
  (parameters
    '("gint" "tab_index")
    '("PangoTabAlign" "alignment")
    '("gint" "location")
  )
)

(define-method get_tab
  (of-object "PangoTabArray")
  (c-name "pango_tab_array_get_tab")
  (return-type "none")
  (parameters
    '("gint" "tab_index")
    '("PangoTabAlign*" "alignment")
    '("gint*" "location")
  )
)

(define-method get_tabs
  (of-object "PangoTabArray")
  (c-name "pango_tab_array_get_tabs")
  (return-type "none")
  (parameters
    '("PangoTabAlign**" "alignments")
    '("gint**" "locations")
  )
)

(define-method get_positions_in_pixels
  (of-object "PangoTabArray")
  (c-name "pango_tab_array_get_positions_in_pixels")
  (return-type "gboolean")
)



;; From /gnome/head/cvs/pango/pango/pango-types.h

(define-function pango_language_get_type
  (c-name "pango_language_get_type")
  (return-type "GType")
)

(define-function pango_language_from_string
  (c-name "pango_language_from_string")
  (return-type "PangoLanguage*")
  (parameters
    '("const-char*" "language")
  )
)

(define-method matches
  (of-object "PangoLanguage")
  (c-name "pango_language_matches")
  (return-type "gboolean")
  (parameters
    '("const-char*" "range_list")
  )
)



;; From /gnome/head/cvs/pango/pango/pango-utils.h

(define-function pango_split_file_list
  (c-name "pango_split_file_list")
  (return-type "char**")
  (parameters
    '("const-char*" "str")
  )
)

(define-function pango_trim_string
  (c-name "pango_trim_string")
  (return-type "char*")
  (parameters
    '("const-char*" "str")
  )
)

(define-function pango_read_line
  (c-name "pango_read_line")
  (return-type "gint")
  (parameters
    '("FILE*" "stream")
    '("GString*" "str")
  )
)

(define-function pango_skip_space
  (c-name "pango_skip_space")
  (return-type "gboolean")
  (parameters
    '("const-char**" "pos")
  )
)

(define-function pango_scan_word
  (c-name "pango_scan_word")
  (return-type "gboolean")
  (parameters
    '("const-char**" "pos")
    '("GString*" "out")
  )
)

(define-function pango_scan_string
  (c-name "pango_scan_string")
  (return-type "gboolean")
  (parameters
    '("const-char**" "pos")
    '("GString*" "out")
  )
)

(define-function pango_scan_int
  (c-name "pango_scan_int")
  (return-type "gboolean")
  (parameters
    '("const-char**" "pos")
    '("int*" "out")
  )
)

(define-function pango_config_key_get
  (c-name "pango_config_key_get")
  (return-type "char*")
  (parameters
    '("const-char*" "key")
  )
)

(define-function pango_lookup_aliases
  (c-name "pango_lookup_aliases")
  (return-type "none")
  (parameters
    '("const-char*" "fontname")
    '("char***" "families")
    '("int*" "n_families")
  )
)

(define-function pango_parse_style
  (c-name "pango_parse_style")
  (return-type "gboolean")
  (parameters
    '("const-char*" "str")
    '("PangoStyle*" "style")
    '("gboolean" "warn")
  )
)

(define-function pango_parse_variant
  (c-name "pango_parse_variant")
  (return-type "gboolean")
  (parameters
    '("const-char*" "str")
    '("PangoVariant*" "variant")
    '("gboolean" "warn")
  )
)

(define-function pango_parse_weight
  (c-name "pango_parse_weight")
  (return-type "gboolean")
  (parameters
    '("const-char*" "str")
    '("PangoWeight*" "weight")
    '("gboolean" "warn")
  )
)

(define-function pango_parse_stretch
  (c-name "pango_parse_stretch")
  (return-type "gboolean")
  (parameters
    '("const-char*" "str")
    '("PangoStretch*" "stretch")
    '("gboolean" "warn")
  )
)

(define-function pango_get_sysconf_subdirectory
  (c-name "pango_get_sysconf_subdirectory")
  (return-type "const-char*")
)

(define-function pango_get_lib_subdirectory
  (c-name "pango_get_lib_subdirectory")
  (return-type "const-char*")
)

(define-function pango_log2vis_get_embedding_levels
  (c-name "pango_log2vis_get_embedding_levels")
  (return-type "gboolean")
  (parameters
    '("gunichar*" "str")
    '("int" "len")
    '("PangoDirection*" "pbase_dir")
    '("guint8*" "embedding_level_list")
  )
)

(define-function pango_get_mirror_char
  (c-name "pango_get_mirror_char")
  (return-type "gboolean")
  (parameters
    '("gunichar" "ch")
    '("gunichar*" "mirrored_ch")
  )
)

(define-method get_sample_string
  (of-object "PangoLanguage")
  (c-name "pango_language_get_sample_string")
  (return-type "const-char*")
)



;; From /gnome/head/cvs/pango/pango/pangowin32.h

(define-function pango_win32_render
  (c-name "pango_win32_render")
  (return-type "none")
  (parameters
    '("HDC" "hdc")
    '("PangoFont*" "font")
    '("PangoGlyphString*" "glyphs")
    '("gint" "x")
    '("gint" "y")
  )
)

(define-function pango_win32_render_layout_line
  (c-name "pango_win32_render_layout_line")
  (return-type "none")
  (parameters
    '("HDC" "hdc")
    '("PangoLayoutLine*" "line")
    '("int" "x")
    '("int" "y")
  )
)

(define-function pango_win32_render_layout
  (c-name "pango_win32_render_layout")
  (return-type "none")
  (parameters
    '("HDC" "hdc")
    '("PangoLayout*" "layout")
    '("int" "x")
    '("int" "y")
  )
)

(define-function pango_win32_get_unknown_glyph
  (c-name "pango_win32_get_unknown_glyph")
  (return-type "PangoGlyph")
  (parameters
    '("PangoFont*" "font")
    '("gunichar" "wc")
  )
)

(define-function pango_win32_font_get_glyph_index
  (c-name "pango_win32_font_get_glyph_index")
  (return-type "gint")
  (parameters
    '("PangoFont*" "font")
    '("gunichar" "wc")
  )
)

(define-function pango_win32_get_dc
  (c-name "pango_win32_get_dc")
  (return-type "HDC")
)

(define-function pango_win32_get_debug_flag
  (c-name "pango_win32_get_debug_flag")
  (return-type "gboolean")
)

(define-function pango_win32_font_cache_new
  (c-name "pango_win32_font_cache_new")
  (is-constructor-of "PangoWin32FontCache")
  (return-type "PangoWin32FontCache*")
)

(define-method free
  (of-object "PangoWin32FontCache")
  (c-name "pango_win32_font_cache_free")
  (return-type "none")
)

(define-method load
  (of-object "PangoWin32FontCache")
  (c-name "pango_win32_font_cache_load")
  (return-type "HFONT")
  (parameters
    '("const-LOGFONT*" "logfont")
  )
)

(define-method unload
  (of-object "PangoWin32FontCache")
  (c-name "pango_win32_font_cache_unload")
  (return-type "none")
  (parameters
    '("HFONT" "hfont")
  )
)

(define-function pango_win32_font_map_for_display
  (c-name "pango_win32_font_map_for_display")
  (return-type "PangoFontMap*")
)

(define-function pango_win32_shutdown_display
  (c-name "pango_win32_shutdown_display")
  (return-type "none")
)

(define-function pango_win32_font_map_get_font_cache
  (c-name "pango_win32_font_map_get_font_cache")
  (return-type "PangoWin32FontCache*")
  (parameters
    '("PangoFontMap*" "font_map")
  )
)

(define-function pango_win32_font_logfont
  (c-name "pango_win32_font_logfont")
  (return-type "LOGFONT*")
  (parameters
    '("PangoFont*" "font")
  )
)



;; From /gnome/head/cvs/pango/pango/pangowin32-private.h

(define-function pango_win32_font_new
  (c-name "pango_win32_font_new")
  (is-constructor-of "PangoWin32Font")
  (return-type "PangoWin32Font*")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("const-LOGFONT*" "lfp")
    '("int" "size")
  )
)

(define-function pango_win32_get_shaper_map
  (c-name "pango_win32_get_shaper_map")
  (return-type "PangoMap*")
  (parameters
    '("PangoLanguage*" "lang")
  )
)

(define-function pango_win32_make_matching_logfont
  (c-name "pango_win32_make_matching_logfont")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("const-LOGFONT*" "lfp")
    '("int" "size")
    '("LOGFONT*" "out")
  )
)

(define-function pango_win32_font_entry_get_coverage
  (c-name "pango_win32_font_entry_get_coverage")
  (return-type "PangoCoverage*")
  (parameters
    '("PangoWin32Face*" "face")
    '("PangoLanguage*" "lang")
  )
)

(define-function pango_win32_font_entry_set_coverage
  (c-name "pango_win32_font_entry_set_coverage")
  (return-type "none")
  (parameters
    '("PangoWin32Face*" "face")
    '("PangoCoverage*" "coverage")
    '("PangoLanguage*" "lang")
  )
)

(define-function pango_win32_font_entry_remove
  (c-name "pango_win32_font_entry_remove")
  (return-type "none")
  (parameters
    '("PangoWin32Face*" "face")
    '("PangoFont*" "font")
  )
)

(define-function pango_win32_fontmap_cache_add
  (c-name "pango_win32_fontmap_cache_add")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoWin32Font*" "xfont")
  )
)

(define-function pango_win32_fontmap_cache_remove
  (c-name "pango_win32_fontmap_cache_remove")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoWin32Font*" "xfont")
  )
)

(define-function pango_win32_coverage_language_classify
  (c-name "pango_win32_coverage_language_classify")
  (return-type "gint")
  (parameters
    '("PangoLanguage*" "lang")
  )
)

(define-function pango_win32_get_name_header
  (c-name "pango_win32_get_name_header")
  (return-type "gboolean")
  (parameters
    '("HDC" "hdc")
    '("struct-name_header*" "header")
  )
)

(define-function pango_win32_get_name_record
  (c-name "pango_win32_get_name_record")
  (return-type "gboolean")
  (parameters
    '("HDC" "hdc")
    '("gint" "i")
    '("struct-name_record*" "record")
  )
)



;; From /gnome/head/cvs/pango/pango/pangoxft.h

(define-function pango_xft_get_context
  (c-name "pango_xft_get_context")
  (return-type "PangoContext*")
  (parameters
    '("Display*" "display")
    '("int" "screen")
  )
)

(define-function pango_xft_shutdown_display
  (c-name "pango_xft_shutdown_display")
  (return-type "none")
  (parameters
    '("Display*" "display")
    '("int" "screen")
  )
)

(define-function pango_xft_render
  (c-name "pango_xft_render")
  (return-type "none")
  (parameters
    '("XftDraw*" "draw")
    '("XftColor*" "color")
    '("PangoFont*" "font")
    '("PangoGlyphString*" "glyphs")
    '("gint" "x")
    '("gint" "y")
  )
)

(define-function pango_xft_picture_render
  (c-name "pango_xft_picture_render")
  (return-type "none")
  (parameters
    '("Display*" "display")
    '("Picture" "src_picture")
    '("Picture" "dest_picture")
    '("PangoFont*" "font")
    '("PangoGlyphString*" "glyphs")
    '("gint" "x")
    '("gint" "y")
  )
)

(define-function pango_xft_set_default_substitute
  (c-name "pango_xft_set_default_substitute")
  (return-type "none")
  (parameters
    '("Display*" "display")
    '("int" "screen")
    '("PangoXftSubstituteFunc" "func")
    '("gpointer" "data")
    '("GDestroyNotify" "notify")
  )
)

(define-function pango_xft_substitute_changed
  (c-name "pango_xft_substitute_changed")
  (return-type "none")
  (parameters
    '("Display*" "display")
    '("int" "screen")
  )
)

(define-function pango_xft_font_get_type
  (c-name "pango_xft_font_get_type")
  (return-type "GType")
)

(define-function pango_xft_font_get_font
  (c-name "pango_xft_font_get_font")
  (return-type "XftFont*")
  (parameters
    '("PangoFont*" "font")
  )
)

(define-function pango_xft_font_lock_face
  (c-name "pango_xft_font_lock_face")
  (return-type "FT_Face")
  (parameters
    '("PangoFont*" "font")
  )
)

(define-function pango_xft_font_unlock_face
  (c-name "pango_xft_font_unlock_face")
  (return-type "none")
  (parameters
    '("PangoFont*" "font")
  )
)

(define-function pango_xft_font_get_glyph
  (c-name "pango_xft_font_get_glyph")
  (return-type "guint")
  (parameters
    '("PangoFont*" "font")
    '("gunichar" "wc")
  )
)

(define-function pango_xft_font_has_char
  (c-name "pango_xft_font_has_char")
  (return-type "gboolean")
  (parameters
    '("PangoFont*" "font")
    '("gunichar" "wc")
  )
)

(define-function pango_xft_font_get_display
  (c-name "pango_xft_font_get_display")
  (return-type "Display*")
  (parameters
    '("PangoFont*" "font")
  )
)

(define-function pango_xft_font_get_unknown_glyph
  (c-name "pango_xft_font_get_unknown_glyph")
  (return-type "PangoGlyph")
  (parameters
    '("PangoFont*" "font")
    '("gunichar" "wc")
  )
)



;; From /gnome/head/cvs/pango/pango/pangoxft-private.h

(define-function _pango_xft_font_new
  (c-name "_pango_xft_font_new")
  (is-constructor-of "PangoXftFont")
  (return-type "PangoXftFont*")
  (parameters
    '("PangoFontMap*" "font")
    '("FcPattern*" "pattern")
  )
)

(define-function _pango_xft_font_map_cache_add
  (c-name "_pango_xft_font_map_cache_add")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoXftFont*" "xfont")
  )
)

(define-function _pango_xft_font_map_add
  (c-name "_pango_xft_font_map_add")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoXftFont*" "xfont")
  )
)

(define-function _pango_xft_font_map_remove
  (c-name "_pango_xft_font_map_remove")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoXftFont*" "xfont")
  )
)

(define-function _pango_xft_font_map_get_coverage
  (c-name "_pango_xft_font_map_get_coverage")
  (return-type "PangoCoverage*")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("FcPattern*" "pattern")
  )
)

(define-function _pango_xft_font_map_get_info
  (c-name "_pango_xft_font_map_get_info")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("Display**" "display")
    '("int*" "screen")
  )
)

(define-function _pango_xft_font_desc_from_pattern
  (c-name "_pango_xft_font_desc_from_pattern")
  (return-type "PangoFontDescription*")
  (parameters
    '("FcPattern*" "pattern")
    '("gboolean" "include_size")
  )
)



;; From /gnome/head/cvs/pango/pango/pangox.h

(define-function pango_x_context_set_funcs
  (c-name "pango_x_context_set_funcs")
  (return-type "none")
  (parameters
    '("PangoContext*" "context")
    '("PangoGetGCFunc" "get_gc_func")
    '("PangoFreeGCFunc" "free_gc_func")
  )
)

(define-function pango_x_load_font
  (c-name "pango_x_load_font")
  (return-type "PangoFont*")
  (parameters
    '("Display*" "display")
    '("const-gchar*" "spec")
  )
)

(define-function pango_x_render
  (c-name "pango_x_render")
  (return-type "none")
  (parameters
    '("Display*" "display")
    '("Drawable" "d")
    '("GC" "gc")
    '("PangoFont*" "font")
    '("PangoGlyphString*" "glyphs")
    '("gint" "x")
    '("gint" "y")
  )
)

(define-function pango_x_render_layout_line
  (c-name "pango_x_render_layout_line")
  (return-type "none")
  (parameters
    '("Display*" "display")
    '("Drawable" "drawable")
    '("GC" "gc")
    '("PangoLayoutLine*" "line")
    '("int" "x")
    '("int" "y")
  )
)

(define-function pango_x_render_layout
  (c-name "pango_x_render_layout")
  (return-type "none")
  (parameters
    '("Display*" "display")
    '("Drawable" "drawable")
    '("GC" "gc")
    '("PangoLayout*" "layout")
    '("int" "x")
    '("int" "y")
  )
)

(define-function pango_x_list_subfonts
  (c-name "pango_x_list_subfonts")
  (return-type "int")
  (parameters
    '("PangoFont*" "font")
    '("char**" "charsets")
    '("int" "n_charsets")
    '("PangoXSubfont**" "subfont_ids")
    '("int**" "subfont_charsets")
  )
)

(define-function pango_x_has_glyph
  (c-name "pango_x_has_glyph")
  (return-type "gboolean")
  (parameters
    '("PangoFont*" "font")
    '("PangoGlyph" "glyph")
  )
)

(define-function pango_x_get_unknown_glyph
  (c-name "pango_x_get_unknown_glyph")
  (return-type "PangoGlyph")
  (parameters
    '("PangoFont*" "font")
  )
)

(define-function pango_x_font_get_unknown_glyph
  (c-name "pango_x_font_get_unknown_glyph")
  (return-type "PangoGlyph")
  (parameters
    '("PangoFont*" "font")
    '("gunichar" "wc")
  )
)

(define-function pango_x_font_cache_new
  (c-name "pango_x_font_cache_new")
  (is-constructor-of "PangoXFontCache")
  (return-type "PangoXFontCache*")
  (parameters
    '("Display*" "display")
  )
)

(define-method free
  (of-object "PangoXFontCache")
  (c-name "pango_x_font_cache_free")
  (return-type "none")
)

(define-method load
  (of-object "PangoXFontCache")
  (c-name "pango_x_font_cache_load")
  (return-type "XFontStruct*")
  (parameters
    '("const-char*" "xlfd")
  )
)

(define-method unload
  (of-object "PangoXFontCache")
  (c-name "pango_x_font_cache_unload")
  (return-type "none")
  (parameters
    '("XFontStruct*" "fs")
  )
)

(define-function pango_x_font_map_for_display
  (c-name "pango_x_font_map_for_display")
  (return-type "PangoFontMap*")
  (parameters
    '("Display*" "display")
  )
)

(define-function pango_x_shutdown_display
  (c-name "pango_x_shutdown_display")
  (return-type "none")
  (parameters
    '("Display*" "display")
  )
)

(define-function pango_x_font_map_get_font_cache
  (c-name "pango_x_font_map_get_font_cache")
  (return-type "PangoXFontCache*")
  (parameters
    '("PangoFontMap*" "font_map")
  )
)

(define-function pango_x_font_subfont_xlfd
  (c-name "pango_x_font_subfont_xlfd")
  (return-type "char*")
  (parameters
    '("PangoFont*" "font")
    '("PangoXSubfont" "subfont_id")
  )
)

(define-function pango_x_find_first_subfont
  (c-name "pango_x_find_first_subfont")
  (return-type "gboolean")
  (parameters
    '("PangoFont*" "font")
    '("char**" "charsets")
    '("int" "n_charsets")
    '("PangoXSubfont*" "rfont")
  )
)

(define-function pango_x_fallback_shape
  (c-name "pango_x_fallback_shape")
  (return-type "none")
  (parameters
    '("PangoFont*" "font")
    '("PangoGlyphString*" "glyphs")
    '("const-char*" "text")
    '("int" "n_chars")
  )
)

(define-function pango_x_apply_ligatures
  (c-name "pango_x_apply_ligatures")
  (return-type "gboolean")
  (parameters
    '("PangoFont*" "font")
    '("PangoXSubfont" "subfont")
    '("gunichar**" "glyphs")
    '("int*" "n_glyphs")
    '("int**" "clusters")
  )
)



;; From /gnome/head/cvs/pango/pango/pangox-private.h

(define-function pango_x_font_map_get_type
  (c-name "pango_x_font_map_get_type")
  (return-type "GType")
)

(define-function pango_x_font_new
  (c-name "pango_x_font_new")
  (is-constructor-of "PangoXFont")
  (return-type "PangoXFont*")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("const-char*" "spec")
    '("int" "size")
  )
)

(define-function pango_x_get_shaper_map
  (c-name "pango_x_get_shaper_map")
  (return-type "PangoMap*")
  (parameters
    '("PangoLanguage*" "language")
  )
)

(define-function pango_x_make_matching_xlfd
  (c-name "pango_x_make_matching_xlfd")
  (return-type "char*")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("char*" "xlfd")
    '("const-char*" "charset")
    '("int" "size")
  )
)

(define-method get_coverage
  (of-object "PangoXFace")
  (c-name "pango_x_face_get_coverage")
  (return-type "PangoCoverage*")
  (parameters
    '("PangoFont*" "font")
    '("PangoLanguage*" "language")
  )
)

(define-method remove
  (of-object "PangoXFace")
  (c-name "pango_x_face_remove")
  (return-type "none")
  (parameters
    '("PangoFont*" "font")
  )
)

(define-function pango_x_fontmap_get_display
  (c-name "pango_x_fontmap_get_display")
  (return-type "Display*")
  (parameters
    '("PangoFontMap*" "fontmap")
  )
)

(define-function pango_x_fontmap_cache_add
  (c-name "pango_x_fontmap_cache_add")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoXFont*" "xfont")
  )
)

(define-function pango_x_fontmap_cache_remove
  (c-name "pango_x_fontmap_cache_remove")
  (return-type "none")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("PangoXFont*" "xfont")
  )
)

(define-function pango_x_fontmap_atom_from_name
  (c-name "pango_x_fontmap_atom_from_name")
  (return-type "Atom")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("const-char*" "atomname")
  )
)

(define-function pango_x_fontmap_name_from_atom
  (c-name "pango_x_fontmap_name_from_atom")
  (return-type "const-char*")
  (parameters
    '("PangoFontMap*" "fontmap")
    '("Atom" "atom")
  )
)