aboutsummaryrefslogtreecommitdiff
path: root/graphics.adb
diff options
context:
space:
mode:
authorCharles <sircharlesaze@gmail.com>2019-12-08 12:24:57 +0100
committerCharles <sircharlesaze@gmail.com>2019-12-08 12:24:57 +0100
commit90e41c14a5e7fba3c6ad25afe729ba6bdbd73f88 (patch)
tree1112039ad0594a57f1e06352e0d7335733808256 /graphics.adb
parent4b367c25b0365be8fe38381136353a659d5ce545 (diff)
downloadsnake-master.tar.gz
snake-master.tar.bz2
snake-master.zip
Game over if move in snake bodyHEADmaster
Diffstat (limited to 'graphics.adb')
-rw-r--r--graphics.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/graphics.adb b/graphics.adb
index dba73b9..1381afc 100644
--- a/graphics.adb
+++ b/graphics.adb
@@ -7,7 +7,6 @@ with SDL.Video.Rectangles;
with SDL.Events;
with SDL.Events.Events;
with SDL.Events.Keyboards;
-use SDL.Events.Keyboards;
with SDL.Video.Windows;
with SDL.Video.Windows.Makers;
with SDL.Video.Renderers;
@@ -58,6 +57,7 @@ package body Graphics is
end Run;
procedure Event_Handler(state: in out T_State) is
+ use SDL.Events.Keyboards;
event: SDL.Events.Events.Events;
begin
while SDL.Events.Events.Poll(event) loop