anchor.diff:    (mirrored_ch :pointer))
   
   (cffi:defcenum PangoBidiType
  -	:PANGO_BIDI_TYPE_L
  -	:PANGO_BIDI_TYPE_LRE
  -	:PANGO_BIDI_TYPE_LRO
  -	:PANGO_BIDI_TYPE_R
  -	:PANGO_BIDI_TYPE_AL
  -	:PANGO_BIDI_TYPE_RLE
  -	:PANGO_BIDI_TYPE_RLO
  -	:PANGO_BIDI_TYPE_PDF
  -	:PANGO_BIDI_TYPE_EN
  -	:PANGO_BIDI_TYPE_ES
  -	:PANGO_BIDI_TYPE_ET
  -	:PANGO_BIDI_TYPE_AN
  -	:PANGO_BIDI_TYPE_CS
  -	:PANGO_BIDI_TYPE_NSM
  -	:PANGO_BIDI_TYPE_BN
  -	:PANGO_BIDI_TYPE_B
  -	:PANGO_BIDI_TYPE_S
  -	:PANGO_BIDI_TYPE_WS
  -	:PANGO_BIDI_TYPE_ON)
  +  :PANGO_BIDI_TYPE_L
  +  :PANGO_BIDI_TYPE_LRE
  +  :PANGO_BIDI_TYPE_LRO
  +  :PANGO_BIDI_TYPE_R
  +  :PANGO_BIDI_TYPE_AL
  +  :PANGO_BIDI_TYPE_RLE
  +  :PANGO_BIDI_TYPE_RLO
  +  :PANGO_BIDI_TYPE_PDF
  +  :PANGO_BIDI_TYPE_EN
  +  :PANGO_BIDI_TYPE_ES
  +  :PANGO_BIDI_TYPE_ET
  +  :PANGO_BIDI_TYPE_AN
  +  :PANGO_BIDI_TYPE_CS
  +  :PANGO_BIDI_TYPE_NSM
  +  :PANGO_BIDI_TYPE_BN
  +  :PANGO_BIDI_TYPE_B
  +  :PANGO_BIDI_TYPE_S
  +  :PANGO_BIDI_TYPE_WS
  +  :PANGO_BIDI_TYPE_ON)
   
   (cffi:defcfun ("pango_bidi_type_for_unichar" pango_bidi_type_for_unichar) PangoBidiType
     (ch :pointer))
   
   (cffi:defcenum PangoGravity
  -	:PANGO_GRAVITY_SOUTH
  -	:PANGO_GRAVITY_EAST
  -	:PANGO_GRAVITY_NORTH
  -	:PANGO_GRAVITY_WEST
  -	:PANGO_GRAVITY_AUTO)
  +  :PANGO_GRAVITY_SOUTH
  +  :PANGO_GRAVITY_EAST
  +  :PANGO_GRAVITY_NORTH
  +  :PANGO_GRAVITY_WEST
  +  :PANGO_GRAVITY_AUTO)
   
   (cffi:defcenum PangoGravityHint
  -	:PANGO_GRAVITY_HINT_NATURAL
  -	:PANGO_GRAVITY_HINT_STRONG
  -	:PANGO_GRAVITY_HINT_LINE)
  +  :PANGO_GRAVITY_HINT_NATURAL
  +  :PANGO_GRAVITY_HINT_STRONG
  +  :PANGO_GRAVITY_HINT_LINE)
   
   (cffi:defcfun ("pango_gravity_get_for_matrix" pango_gravity_get_for_matrix) PangoGravity
     (matrix :pointer))
  
positive.code:   (tab_array :pointer))
  
  (cffi:defcvar ("PangoLayout" PangoLayout)
   :pointer)
  
  (cffi:defcvar ("PangoLayoutIter" PangoLayoutIter)
   :pointer)
  
  (cffi:defcenum PangoWrapMode
  	:PANGO_WRAP_WORD
  	:PANGO_WRAP_CHAR
  	:PANGO_WRAP_WORD_CHAR)
  
  (cffi:defcenum PangoEllipsizeMode
  	:PANGO_ELLIPSIZE_NONE
  	:PANGO_ELLIPSIZE_START
  	:PANGO_ELLIPSIZE_MIDDLE
  	:PANGO_ELLIPSIZE_END)
  
  (cffi:defcenum PangoAlignment
  	:PANGO_ALIGN_LEFT
  	:PANGO_ALIGN_CENTER
  	:PANGO_ALIGN_RIGHT)
  
  (cffi:defcstruct PangoGlyphItem
  	(item :pointer)
  	(glyphs :pointer))
  
  (cffi:defcfun ("pango_layout_new" pango_layout_new) :pointer
    (context :pointer))
  
negative.code:   (matrix :pointer))
  
  (cffi:defcvar ("PangoGlyph" PangoGlyph)
      :unsigned-int)
  
  (cffi:defcstruct PangoGlyphInfo
    (glyph :pointer)
    (geometry :pointer)
    (attr :pointer))
  
  (cffi:defcstruct PangoGlyphGeometry
    (width :pointer)
    (x_offset :pointer)
    (y_offset :pointer))
  
  (cffi:defcvar ("PangoGlyphUnit" PangoGlyphUnit)
      :int)
  
  (cffi:defcstruct PangoGlyphVisAttr
    (is_cluster_start :pointer))
  
  (cffi:defcstruct PangoGlyphString
    (num_glyphs :int)
    (glyphs :pointer)
    (log_clusters :pointer))
  
  (cffi:defcstruct PangoGlyphItemIter
    (glyph_item :pointer)
    (text :pointer)
    (start_glyph :int)
    (start_index :int)
    (start_char :int)
    (end_glyph :int)
    (end_index :int)
    (end_char :int))
  
  (cffi:defcfun ("pango_glyph_string_new" pango_glyph_string_new) :pointer)
  
  