diff options
Diffstat (limited to 'gcc/ada/sem_ch12.adb')
| -rw-r--r-- | gcc/ada/sem_ch12.adb | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb index e62629e2a22..e51b8029803 100644 --- a/gcc/ada/sem_ch12.adb +++ b/gcc/ada/sem_ch12.adb @@ -7549,16 +7549,14 @@ package body Sem_Ch12 is Scop := Scope (Scop); end loop; - if Scop = Par_I then - - -- Previous instance encloses current instance + -- Previous instance encloses current instance + if Scop = Par_I then null; - elsif Is_Generic_Instance (Scop) then - - -- Current instance is within an unrelated instance + -- Current instance is within an unrelated instance + elsif Is_Generic_Instance (Scop) then null; else |