vhdl-evaluation: some ieee functions return a subtype

Fix #2425

1 files changed, 1 insertions, 1 deletions

diff --git a/src/vhdl/vhdl-evaluation.adb b/src/vhdl/vhdl-evaluation.adb
index 53c82abf9..8b0e874ea 100644
--- a/src/vhdl/vhdl-evaluation.adb
+++ b/src/vhdl/vhdl-evaluation.adb
@@ -1085,7 +1085,7 @@ package body Vhdl.Evaluation is
       Res_Mt := Eval_Static_Predefined_Function_Call
         (null, Left_Mt, Right_Mt, Res_Typ, Orig);
 
-      Res := Convert_Memtyp_To_Node (Res_Mt, Res_Type, Orig);
+      Res := Convert_Memtyp_To_Node (Res_Mt, Get_Base_Type (Res_Type), Orig);
       Release_Expr_Pool (Marker);
 
       return Res;