From 525b5641fee7154d5be1a66420ca15d54bb6f6ce Mon Sep 17 00:00:00 2001 From: Jedidiah Barber Date: Fri, 18 Apr 2025 20:13:41 +1200 Subject: Consolidated image data --- src/misc.ads | 47 ----------------------------------------------- 1 file changed, 47 deletions(-) delete mode 100644 src/misc.ads (limited to 'src/misc.ads') diff --git a/src/misc.ads b/src/misc.ads deleted file mode 100644 index 7108f63..0000000 --- a/src/misc.ads +++ /dev/null @@ -1,47 +0,0 @@ - - --- Programmed by Jedidiah Barber --- Licensed under the Sunset License v1.0 - --- See license.txt for further details - - -private with - - Ada.Directories, - Here_I_Am; - - -package Misc is - - - pragma Elaborate_Body; - - - Origin, Image_Path, Level_Path : constant String; - - -private - - - package ADir renames Ada.Directories; - - - Origin : constant String := ADir.Containing_Directory (Here_I_Am.Executable); - - Image_Path : constant String := - ADir.Compose - (ADir.Compose - (ADir.Compose - (ADir.Compose (Origin, ".."), "share"), "sokoban"), "img"); - - Level_Path : constant String := - ADir.Compose - (ADir.Compose - (ADir.Compose - (ADir.Compose (Origin, ".."), "share"), "sokoban"), "level"); - - -end Misc; - - -- cgit