From 54ee7a02a6b3d622545aceff27cf43eeefb883f4 Mon Sep 17 00:00:00 2001
From: gingold
Date: Fri, 25 Nov 2005 19:52:35 +0000
Subject: grt-arch* files added (were missing)

---
 translate/grt/grt-arch.ads      | 2 ++
 translate/grt/grt-arch_none.adb | 7 +++++++
 translate/grt/grt-arch_none.ads | 6 ++++++
 3 files changed, 15 insertions(+)
 create mode 100644 translate/grt/grt-arch.ads
 create mode 100644 translate/grt/grt-arch_none.adb
 create mode 100644 translate/grt/grt-arch_none.ads

diff --git a/translate/grt/grt-arch.ads b/translate/grt/grt-arch.ads
new file mode 100644
index 0000000..5f5aa0e
--- /dev/null
+++ b/translate/grt/grt-arch.ads
@@ -0,0 +1,2 @@
+With Grt.Arch_None;
+Package Grt.Arch renames Grt.Arch_None;
diff --git a/translate/grt/grt-arch_none.adb b/translate/grt/grt-arch_none.adb
new file mode 100644
index 0000000..14db1c7
--- /dev/null
+++ b/translate/grt/grt-arch_none.adb
@@ -0,0 +1,7 @@
+package body Grt.Arch_None is
+   function Get_Time_Stamp return Ghdl_U64 is
+   begin
+      return 0;
+   end Get_Time_Stamp;
+end Grt.Arch_None;
+
diff --git a/translate/grt/grt-arch_none.ads b/translate/grt/grt-arch_none.ads
new file mode 100644
index 0000000..f8ae437
--- /dev/null
+++ b/translate/grt/grt-arch_none.ads
@@ -0,0 +1,6 @@
+with Grt.Types; use Grt.Types;
+
+package Grt.Arch_None is
+   function Get_Time_Stamp return Ghdl_U64;
+   pragma Inline (Get_Time_Stamp);
+end Grt.Arch_None;
-- 
cgit