diff options
author | Tristan Gingold <tgingold@free.fr> | 2023-04-07 21:04:04 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2023-04-07 21:04:04 +0200 |
commit | 43b8fb03d707c908a94519b8217b83d37736a633 (patch) | |
tree | f5fdade9478e2e526f9370ca32fcfd73f950a69c /src/vhdl/translate/trans-chap8.adb | |
parent | d8e9367656be7b2c1b5d7d3a6665e7b6a10b719d (diff) | |
download | ghdl-43b8fb03d707c908a94519b8217b83d37736a633.tar.gz ghdl-43b8fb03d707c908a94519b8217b83d37736a633.tar.bz2 ghdl-43b8fb03d707c908a94519b8217b83d37736a633.zip |
translate: factorize and improve implicit subtype conversion code
Diffstat (limited to 'src/vhdl/translate/trans-chap8.adb')
-rw-r--r-- | src/vhdl/translate/trans-chap8.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap8.adb b/src/vhdl/translate/trans-chap8.adb index 3d38b09fb..da2658ac0 100644 --- a/src/vhdl/translate/trans-chap8.adb +++ b/src/vhdl/translate/trans-chap8.adb @@ -1178,7 +1178,7 @@ package body Trans.Chap8 is -- TODO: Because the aggregate is composed only of locally static -- variable names, it is possible to compute the bounds and check -- matching constraints. - Chap3.Translate_Anonymous_Subtype_Definition (Targ_Type, False); + Chap3.Translate_Anonymous_Subtype_Definition (Targ_Type, True); E := Chap7.Translate_Expression (Expr, Targ_Type); if Assignment_Overlap (Target, Expr) then |