package Applications.Gui.Games.Keen is
pragma Elaborate_Body;
private
type Keen_Application is new Game_Application with null record;
procedure Construct( this : access Keen_Application );
procedure Draw_Loading_Screen( this : access Keen_Application;
dc : Drawing_Context );
function Init( this : access Keen_Application ) return Boolean;
end Applications.Gui.Games.Keen;