with Allegro.File_IO; use Allegro.File_IO;
package Allegro.Fonts.TTF is
function Al_Init_TTF_Addon return Boolean;
procedure Al_Shutdown_TTF_Addon;
pragma Import( C, Al_Shutdown_TTF_Addon, "al_shutdown_ttf_addon" );
function Al_Get_Allegro_TTF_Version return Unsigned_32;
pragma Import( C, Al_Get_Allegro_TTF_Version, "al_get_allegro_ttf_version" );
ALLEGRO_TTF_NO_KERNING : constant Font_Loading_Flags := 1;
ALLEGRO_TTF_MONOCHROME : constant Font_Loading_Flags := 2;
ALLEGRO_TTF_NO_AUTOHINT : constant Font_Loading_Flags := 4;
function Al_Load_TTF_Font( filename : String;
size : Integer;
flags : Font_Loading_Flags ) return A_Allegro_Font;
function Al_Load_TTF_Font_f( file : A_Allegro_File;
filename : String;
size : Integer;
flags : Font_Loading_Flags ) return A_Allegro_Font;
function Al_Load_TTF_Font_Stretch( filename : String;
w, h : Integer;
flags : Font_Loading_Flags ) return A_Allegro_Font;
function Al_Load_TTF_Font_Stretch_f( file : A_Allegro_File;
filename : String;
w, h : Integer;
flags : Font_Loading_Flags ) return A_Allegro_Font;
end Allegro.Fonts.TTF;