From b6d79c2362746b35bf276a610afaa7b9218bf183 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Wed, 25 Apr 2018 04:09:37 +0200 Subject: Use specific error message for direction mismatch. Fix #559 --- src/ghdldrv/ghdlrun.adb | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'src/ghdldrv') diff --git a/src/ghdldrv/ghdlrun.adb b/src/ghdldrv/ghdlrun.adb index be4619815..2af331f67 100644 --- a/src/ghdldrv/ghdlrun.adb +++ b/src/ghdldrv/ghdlrun.adb @@ -245,8 +245,10 @@ package body Ghdlrun is Def (Trans_Decls.Ghdl_Memcpy, Grt.Lib.Ghdl_Memcpy'Address); - Def (Trans_Decls.Ghdl_Bound_Check_Failed_L1, - Grt.Lib.Ghdl_Bound_Check_Failed_L1'Address); + Def (Trans_Decls.Ghdl_Bound_Check_Failed, + 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_Malloc0, Grt.Lib.Ghdl_Malloc0'Address); Def (Trans_Decls.Ghdl_Std_Ulogic_To_Boolean_Array, -- cgit v1.2.3