diff options
Diffstat (limited to 'src/misc.ads')
| -rw-r--r-- | src/misc.ads | 47 |
1 files changed, 0 insertions, 47 deletions
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; - - |