 TYPEDEF: void* cairo_t
 TYPEDEF: void* cairo_surface_t
 
-C-STRUCT: cairo_matrix_t
-    { "double" "xx" }
-    { "double" "yx" }
-    { "double" "xy" }
-    { "double" "yy" }
-    { "double" "x0" }
-    { "double" "y0" } ;
+STRUCT: cairo_matrix_t
+    { xx double }
+    { yx double }
+    { xy double }
+    { yy double }
+    { x0 double }
+    { y0 double } ;
 
 TYPEDEF: void* cairo_pattern_t
 
 TYPEDEF: void* cairo_destroy_func_t
 : cairo-destroy-func ( quot -- callback )
-    [ "void" { "void*" } "cdecl" ] dip alien-callback ; inline
+    [ void { void* } "cdecl" ] dip alien-callback ; inline
 
 ! See cairo.h for details
-C-STRUCT: cairo_user_data_key_t
-    { "int" "unused" } ;
+STRUCT: cairo_user_data_key_t
+    { unused int } ;
 
 TYPEDEF: int cairo_status_t
 C-ENUM:


USING: system combinators alien alien.syntax alien.c-types
alien.destructors kernel accessors sequences arrays ui.gadgets
alien.libraries ;

IN: cairo.ffi
<< {


TYPEDEF: void* cairo_font_face_t

STRUCT: cairo_glyph_t
  { index ulong     }
  { x     double    }
  { y     double    } ;

STRUCT: cairo_text_extents_t
    { x_bearing double }
    { y_bearing double }
    { width     double }
    { height    double }
    { x_advance double }
    { y_advance double } ;

STRUCT: cairo_font_extents_t
    { ascent double }
    { descent double }
    { height double }
    { max_x_advance double }
    { max_y_advance double } ;

TYPEDEF: int cairo_font_slant_t
C-ENUM:
