aboutsummaryrefslogtreecommitdiffstats
path: root/src/ghdldrv
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2022-03-26 08:18:39 +0100
committerTristan Gingold <tgingold@free.fr>2022-03-26 08:18:39 +0100
commitbaa9dfbdac7e9d2c8e1960a62e62dd807d751c46 (patch)
treea3b3140525a82da208656f2443e0861057ea4e80 /src/ghdldrv
parent7ad32b9bb91e29cae2fbba0a71b6e924dfbcaf9c (diff)
downloadghdl-baa9dfbdac7e9d2c8e1960a62e62dd807d751c46.tar.gz
ghdl-baa9dfbdac7e9d2c8e1960a62e62dd807d751c46.tar.bz2
ghdl-baa9dfbdac7e9d2c8e1960a62e62dd807d751c46.zip
translate: adjust null access check: add an explicit check.
Diffstat (limited to 'src/ghdldrv')
-rw-r--r--src/ghdldrv/ghdlrun.adb2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/ghdldrv/ghdlrun.adb b/src/ghdldrv/ghdlrun.adb
index 882698612..8cc1a6df0 100644
--- a/src/ghdldrv/ghdlrun.adb
+++ b/src/ghdldrv/ghdlrun.adb
@@ -325,6 +325,8 @@ package body Ghdlrun is
Grt.Lib.Ghdl_Bound_Check_Failed'Address);
Def (Trans_Decls.Ghdl_Direction_Check_Failed,
Grt.Lib.Ghdl_Direction_Check_Failed'Address);
+ Def (Trans_Decls.Ghdl_Access_Check_Failed,
+ Grt.Lib.Ghdl_Access_Check_Failed'Address);
Def (Trans_Decls.Ghdl_Integer_Index_Check_Failed,
Grt.Lib.Ghdl_Integer_Index_Check_Failed'Address);