From 2950872300a419344b39b9174f4b371a240272c6 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Sun, 30 Jul 2017 22:23:20 +1000
Subject: Basic game framework done, lacking any user input

---
 src/main.adb | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 src/main.adb

(limited to 'src/main.adb')

diff --git a/src/main.adb b/src/main.adb
new file mode 100644
index 0000000..41b106e
--- /dev/null
+++ b/src/main.adb
@@ -0,0 +1,16 @@
+
+
+with
+
+    FLTK,
+    Sokoban;
+
+
+function Main
+    return Integer is
+begin
+    Sokoban.Load_Level (Sokoban.LevelID'First);
+    Sokoban.Show;
+    return FLTK.Run;
+end Main;
+
-- 
cgit