diff options
Diffstat (limited to 'translate')
| -rw-r--r-- | translate/grt/grt-arch.ads | 2 | ||||
| -rw-r--r-- | translate/grt/grt-arch_none.adb | 7 | ||||
| -rw-r--r-- | translate/grt/grt-arch_none.ads | 6 |
3 files changed, 15 insertions, 0 deletions
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; |