diff options
Diffstat (limited to 'src/cairo.ml')
-rw-r--r-- | src/cairo.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/cairo.ml b/src/cairo.ml index 7ac4442..8703a0e 100644 --- a/src/cairo.ml +++ b/src/cairo.ml @@ -141,7 +141,7 @@ external set_miter_limit : t -> float -> unit = "ml_cairo_set_miter_limit" external translate : t -> tx:float -> ty:float -> unit = "ml_cairo_translate" external scale : t -> sx:float -> sy:float -> unit = "ml_cairo_scale" external rotate : t -> angle:float -> unit = "ml_cairo_rotate" -external transform : t -> matrix -> unit = "ml_cairo_trasnform" +external transform : t -> matrix -> unit = "ml_cairo_transform" external set_matrix : t -> matrix -> unit = "ml_cairo_set_matrix" external identity_matrix : t -> unit = "ml_cairo_identity_matrix" external user_to_device : t -> point -> point = "ml_cairo_user_to_device" @@ -307,7 +307,7 @@ let downcast_to_toy f = then (Obj.magic f : [`Any|`TOY] t) else invalid_arg "Cairo: scaled font downcast" external font_extents : [> `Any] t -> font_extents = "ml_cairo_scaled_font_extents" -external text_extents : [> `Any] t -> string -> text_extents = "ml_cairo_scaled_text_extents" +external text_extents : [> `Any] t -> string -> text_extents = "ml_cairo_scaled_font_text_extents" external glyph_extents : [> `Any] t -> glyph array -> text_extents = "ml_cairo_scaled_font_glyph_extents" external get_font_face : ([>`Any] as 'a) t -> 'a font_face = "ml_cairo_scaled_font_get_font_face" external get_font_matrix : ([>`Any] as 'a) t -> matrix = "ml_cairo_scaled_font_get_font_matrix" |