From 402c0b3ca702f0e6c3e1e5589c98f01a21d6d6f0 Mon Sep 17 00:00:00 2001
From: gingold
Date: Fri, 10 Mar 2006 02:15:29 +0000
Subject: windows distribution based on mcode

---
 translate/mcode/windows/default_pathes.ads | 6 ++++++
 1 file changed, 6 insertions(+)
 create mode 100644 translate/mcode/windows/default_pathes.ads

(limited to 'translate/mcode/windows/default_pathes.ads')

diff --git a/translate/mcode/windows/default_pathes.ads b/translate/mcode/windows/default_pathes.ads
new file mode 100644
index 0000000..abe0a60
--- /dev/null
+++ b/translate/mcode/windows/default_pathes.ads
@@ -0,0 +1,6 @@
+with Windows_Default_Path;
+pragma Elaborate_All (Windows_Default_Path);
+
+package Default_Pathes is
+   Prefix : constant String := Windows_Default_Path.Get_Windows_Default_Path;
+end Default_Pathes;
-- 
cgit