OCamlSDL 0.9.1 : Sdlttf

`sig
exception SDLttf_exception of string
val init : unit -> unit
val quit : unit -> unit
type font
val open_font : string -> ?index:int -> int -> Sdlttf.font
type font_style = NORMAL | BOLD | ITALIC | UNDERLINE
val get_font_style : Sdlttf.font -> Sdlttf.font_style list
val set_font_style : Sdlttf.font -> Sdlttf.font_style list -> unit
val font_height : Sdlttf.font -> int
val font_ascent : Sdlttf.font -> int
val font_descent : Sdlttf.font -> int
val font_lineskip : Sdlttf.font -> int
val font_faces : Sdlttf.font -> int
val is_fixed_width : Sdlttf.font -> bool
val family_name : Sdlttf.font -> string
val style_name : Sdlttf.font -> string
val size_text : Sdlttf.font -> string -> int * int
val size_utf8 : Sdlttf.font -> string -> int * int
val glyph_metrics : Sdlttf.font -> char -> int * int * int * int
type render_kind =
SOLID of Sdlvideo.color
| SHADED of Sdlvideo.color * Sdlvideo.color
| BLENDED of Sdlvideo.color
val render_text_solid :
Sdlttf.font -> string -> fg:Sdlvideo.color -> Sdlvideo.surface
val render_text_shaded :
Sdlttf.font ->
string -> fg:Sdlvideo.color -> bg:Sdlvideo.color -> Sdlvideo.surface
val render_text_blended :
Sdlttf.font -> string -> fg:Sdlvideo.color -> Sdlvideo.surface
val render_utf8_solid :
Sdlttf.font -> string -> fg:Sdlvideo.color -> Sdlvideo.surface
val render_utf8_shaded :
Sdlttf.font ->
string -> fg:Sdlvideo.color -> bg:Sdlvideo.color -> Sdlvideo.surface
val render_utf8_blended :
Sdlttf.font -> string -> fg:Sdlvideo.color -> Sdlvideo.surface
val render_text :
Sdlttf.font -> Sdlttf.render_kind -> string -> Sdlvideo.surface
val render_glyph_solid :
Sdlttf.font -> char -> fg:Sdlvideo.color -> Sdlvideo.surface
val render_glyph_shaded :
Sdlttf.font ->
char -> fg:Sdlvideo.color -> bg:Sdlvideo.color -> Sdlvideo.surface
val render_glyph_blended :
Sdlttf.font -> char -> fg:Sdlvideo.color -> Sdlvideo.surface
val render_glyph :
Sdlttf.font -> Sdlttf.render_kind -> char -> Sdlvideo.surface
end`