diff options
| author | Tristan Gingold | 2014-11-02 05:32:48 +0100 |
|---|---|---|
| committer | Tristan Gingold | 2014-11-02 05:32:48 +0100 |
| commit | af5eebc96a1e2a445b6199d3a5b15beec870bb32 (patch) | |
| tree | 6f25c0410fddc354690a5107e8ec0d4099984b82 /sem_inst.adb | |
| parent | ad9367ec8a27a56e0a83f91ee0cc50785d076862 (diff) | |
| download | ghdl-af5eebc96a1e2a445b6199d3a5b15beec870bb32.tar.gz ghdl-af5eebc96a1e2a445b6199d3a5b15beec870bb32.tar.bz2 ghdl-af5eebc96a1e2a445b6199d3a5b15beec870bb32.zip | |
Fix package interface for gcc (separate compilation).
Diffstat (limited to 'sem_inst.adb')
| -rw-r--r-- | sem_inst.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/sem_inst.adb b/sem_inst.adb index d636839..a9ba756 100644 --- a/sem_inst.adb +++ b/sem_inst.adb @@ -360,7 +360,8 @@ package body Sem_Inst is case F is when Field_Index_Subtype_List => -- Index_Subtype_List is always a reference, so retrieve - -- the instance of the referenced list. + -- the instance of the referenced list. This is a special + -- case because there is no origins for list. declare List : Iir_List; begin |