diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-06-24 07:47:03 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-06-24 21:41:07 +0200 |
| commit | b85a4d387b378d3b15e115293c0bf01728229f52 (patch) | |
| tree | 28ceb5ecfa9f1790643e40c442458edd24969a2e /src/vhdl/translate/trans-chap8.adb | |
| parent | e359f04bdaa8b5cad3846d333f9dedf4df62c1ef (diff) | |
| download | ghdl-b85a4d387b378d3b15e115293c0bf01728229f52.tar.gz ghdl-b85a4d387b378d3b15e115293c0bf01728229f52.tar.bz2 ghdl-b85a4d387b378d3b15e115293c0bf01728229f52.zip | |
vhdl/translate: rework object type elaboration. For #641
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 ace7f61b6..acda82aff 100644 --- a/src/vhdl/translate/trans-chap8.adb +++ b/src/vhdl/translate/trans-chap8.adb @@ -534,7 +534,7 @@ package body Trans.Chap8 is Range_Type : O_Tnode; begin -- Iterator range. - Chap3.Translate_Object_Subtype (Iterator, False); + Chap3.Translate_Object_Subtype_Indication (Iterator, False); -- Iterator variable. It_Info := Add_Info (Iterator, Kind_Iterator); |