From 3fddf1c59fd7a8fcd260bb9e05c611bef3dd141b Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Wed, 5 Nov 2014 05:11:00 +0100 Subject: Move files and dirs from translate/ --- dist/mcode/windows/windows_default_path.ads | 5 +++++ 1 file changed, 5 insertions(+) create mode 100644 dist/mcode/windows/windows_default_path.ads (limited to 'dist/mcode/windows/windows_default_path.ads') diff --git a/dist/mcode/windows/windows_default_path.ads b/dist/mcode/windows/windows_default_path.ads new file mode 100644 index 000000000..8e6303446 --- /dev/null +++ b/dist/mcode/windows/windows_default_path.ads @@ -0,0 +1,5 @@ +package Windows_Default_Path is + -- Get the default path from executable name. + -- This function is called during elaboration! + function Get_Windows_Exec_Path return String; +end Windows_Default_Path; -- cgit v1.2.3