diff options
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 |