diff options
Diffstat (limited to 'gcc/ada/sem_smem.adb')
-rw-r--r-- | gcc/ada/sem_smem.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_smem.adb b/gcc/ada/sem_smem.adb index abce72485d1..38fa1fa2031 100644 --- a/gcc/ada/sem_smem.adb +++ b/gcc/ada/sem_smem.adb @@ -126,7 +126,7 @@ package body Sem_Smem is if Is_Access_Type (Etype (C)) then return True; else - C := Next_Discriminant (C); + Next_Discriminant (C); end if; end loop; end if; @@ -145,7 +145,7 @@ package body Sem_Smem is then return True; else - C := Next_Component (C); + Next_Component (C); end if; end loop; |