aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/types_utils.ads
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2019-08-29 06:55:52 +0200
committerTristan Gingold <tgingold@free.fr>2019-08-29 06:55:52 +0200
commit698c668481e9ca77234317bca7047efd8210c24c (patch)
tree2853048fbd75630e90eb2f350ee19aa0517060ba /src/synth/types_utils.ads
parentc794aaa2a7dbec514d188c28f75da181a5692992 (diff)
downloadghdl-698c668481e9ca77234317bca7047efd8210c24c.tar.gz
ghdl-698c668481e9ca77234317bca7047efd8210c24c.tar.bz2
ghdl-698c668481e9ca77234317bca7047efd8210c24c.zip
synth: add support for record types.
(WIP: need to fix regression of stmt01).
Diffstat (limited to 'src/synth/types_utils.ads')
-rw-r--r--src/synth/types_utils.ads3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/synth/types_utils.ads b/src/synth/types_utils.ads
index 27245e7d5..d89d9e58a 100644
--- a/src/synth/types_utils.ads
+++ b/src/synth/types_utils.ads
@@ -26,4 +26,7 @@ package Types_Utils is
function To_Uns32 is new Ada.Unchecked_Conversion
(Int32, Uns32);
+
+ function To_Uns64 is new Ada.Unchecked_Conversion
+ (Int64, Uns64);
end Types_Utils;