From bdc1c9cf6db576e585d60e531da14a4c8d72333d Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Fri, 7 Apr 2023 21:04:43 +0200 Subject: translation: improve type conversion (recurse) --- src/vhdl/translate/trans-chap7.ads | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/vhdl/translate/trans-chap7.ads') diff --git a/src/vhdl/translate/trans-chap7.ads b/src/vhdl/translate/trans-chap7.ads index ac69c8893..f361eb87f 100644 --- a/src/vhdl/translate/trans-chap7.ads +++ b/src/vhdl/translate/trans-chap7.ads @@ -87,7 +87,7 @@ package Trans.Chap7 is (Res : in out Mnode; Expr : Mnode); -- Convert bounds SRC (of type SRC_TYPE) to RES (of type RES_TYPE). - procedure Translate_Type_Conversion_Bounds + procedure Translate_Type_Conversion_Array_Bounds (Res : Mnode; Src : Mnode; Res_Type : Iir; Src_Type : Iir; Loc : Iir); -- Convert range EXPR into ortho tree. -- cgit v1.2.3