From 074c3b9d787aacd13ba87fd49b01537fb99bbac0 Mon Sep 17 00:00:00 2001
From: rexim <reximkut@gmail.com>
Date: Sun, 17 Mar 2024 01:53:34 +0700
Subject: Instantiate IVector2_Queue

---
 game.adb | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'game.adb')

diff --git a/game.adb b/game.adb
index 22890c0..7dbe7f0 100644
--- a/game.adb
+++ b/game.adb
@@ -12,6 +12,7 @@ use Ada.Containers;
 with Ada.Strings.Fixed; use Ada.Strings.Fixed;
 with Ada.Strings;
 with Ada.Exceptions; use Ada.Exceptions;
+with Queue;
 
 procedure Game is
     DEVELOPMENT : constant Boolean := True;
@@ -266,6 +267,9 @@ procedure Game is
         Items: Hashed_Map_Items.Map;
     end record;
 
+    package IVector2_Queue is new Queue(Item => IVector2);
+    use IVector2_Queue;
+
     type Game_State is record
         Map: Map_Access := Null;
         Player: Player_State;
@@ -282,6 +286,8 @@ procedure Game is
         Camera_Velocity: Vector2 := (x => 0.0, y => 0.0);
 
         Checkpoint: Checkpoint_State;
+
+        Q: IVector2_Queue.Queue;
         Duration_Of_Last_Turn: Double;
     end record;
 
-- 
cgit v1.2.3