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