`sig
val load : string -> Gdk.font
val load_fontset : string -> Gdk.font
val string_width : Gdk.font -> string -> int
val char_width : Gdk.font -> char -> int
val string_height : Gdk.font -> string -> int
val char_height : Gdk.font -> char -> int
val string_measure : Gdk.font -> string -> int
val char_measure : Gdk.font -> char -> int
val get_type : Gdk.font -> [ `FONT | `FONTSET ]
val ascent : Gdk.font -> int
val descent : Gdk.font -> int
end`