with Raylib;
use  Raylib;

procedure Window is

begin

	Open_Window (720, 360, "Heyo Raylib!" & Character'Val (0));

	Main_Loop: loop
		exit when Window_Should_Close;
		--
		Begin_Drawing;
		--
		Clear_Background (Blue);
		--
		End_Drawing;
	end loop Main_Loop;

	Close_Window;

end Window;