diff options
Diffstat (limited to 'src/vhdl/sem_assocs.adb')
| -rw-r--r-- | src/vhdl/sem_assocs.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/sem_assocs.adb b/src/vhdl/sem_assocs.adb index c06ce6f98..88595921e 100644 --- a/src/vhdl/sem_assocs.adb +++ b/src/vhdl/sem_assocs.adb @@ -1066,7 +1066,8 @@ package body Sem_Assocs is end if; end Finish_Individual_Assoc_Record; - -- Free recursively all the choices of ASSOC. + -- Free recursively all the choices of ASSOC. Once the type is computed + -- this is not needed anymore. procedure Clean_Individual_Association (Assoc : Iir) is El, N_El : Iir; |