sig
type t
external init :
size:CL_Sizef.t -> rounding_in_pixels:float -> CL_RoundedRect.t
= "caml_CL_RoundedRect_init"
external delete : CL_RoundedRect.t -> unit = "caml_CL_RoundedRect_delete"
external draw :
CL_RoundedRect.t ->
gc:CL_GraphicContext.t ->
position:CL_Pointf.t -> color:CL_Colorf.t -> unit
= "caml_CL_RoundedRect_draw"
external set_rounding : CL_RoundedRect.t -> offset:CL_Sizef.t -> unit
= "caml_CL_RoundedRect_set_rounding"
external set_rounding_top_left :
CL_RoundedRect.t -> offset:CL_Sizef.t -> unit
= "caml_CL_RoundedRect_set_rounding_top_left"
external set_rounding_top_right :
CL_RoundedRect.t -> offset:CL_Sizef.t -> unit
= "caml_CL_RoundedRect_set_rounding_top_right"
external set_rounding_bottom_left :
CL_RoundedRect.t -> offset:CL_Sizef.t -> unit
= "caml_CL_RoundedRect_set_rounding_bottom_left"
external set_rounding_bottom_right :
CL_RoundedRect.t -> offset:CL_Sizef.t -> unit
= "caml_CL_RoundedRect_set_rounding_bottom_right"
external set_rounding_offsets :
CL_RoundedRect.t ->
offsets:CL_Sizef.t * CL_Sizef.t * CL_Sizef.t * CL_Sizef.t -> unit
= "caml_CL_RoundedRect_set_rounding_offsets"
end