aboutsummaryrefslogtreecommitdiff
path: root/game.ads
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 /game.ads
parent4b367c25b0365be8fe38381136353a659d5ce545 (diff)
downloadsnake-master.tar.gz
snake-master.tar.bz2
snake-master.zip
Game over if move in snake bodyHEADmaster
Diffstat (limited to 'game.ads')
-rw-r--r--game.ads1
1 files changed, 1 insertions, 0 deletions
diff --git a/game.ads b/game.ads
index 558f272..5da26ce 100644
--- a/game.ads
+++ b/game.ads
@@ -49,5 +49,6 @@ private
procedure Spawn_Food(game: in out T_Game);
function Next_Head(game: T_Game) return T_Position;
function In_Border(game: T_Game; pos: T_Position) return Boolean;
+ function In_Body(game: T_Game; pos: T_Position) return Boolean;
end Game;