From 111007296f1553540a78f59d20197faba29d43c9 Mon Sep 17 00:00:00 2001 From: Brian Padalino Date: Wed, 22 Sep 2021 11:38:59 -0400 Subject: Add explicit ?>= and ?> functions for translation. Instead of swapping L/R arguments to try to create ?>= and ?>, create a function for each which performs the not operation of ?< and ?<= as defined by the LRM. --- src/ghdldrv/ghdlrun.adb | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'src/ghdldrv/ghdlrun.adb') diff --git a/src/ghdldrv/ghdlrun.adb b/src/ghdldrv/ghdlrun.adb index 325c20aa0..17a5c4947 100644 --- a/src/ghdldrv/ghdlrun.adb +++ b/src/ghdldrv/ghdlrun.adb @@ -690,6 +690,10 @@ package body Ghdlrun is Grt.Std_Logic_1164.Ghdl_Std_Ulogic_Match_Lt'Address); Def (Trans_Decls.Ghdl_Std_Ulogic_Match_Le, Grt.Std_Logic_1164.Ghdl_Std_Ulogic_Match_Le'Address); + Def (Trans_Decls.Ghdl_Std_Ulogic_Match_Ge, + Grt.Std_Logic_1164.Ghdl_Std_Ulogic_Match_Ge'Address); + Def (Trans_Decls.Ghdl_Std_Ulogic_Match_Gt, + Grt.Std_Logic_1164.Ghdl_Std_Ulogic_Match_Gt'Address); Def (Trans_Decls.Ghdl_Std_Ulogic_Array_Match_Eq, Grt.Std_Logic_1164.Ghdl_Std_Ulogic_Array_Match_Eq'Address); -- cgit v1.2.3