aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_elab.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/sem_elab.adb')
-rw-r--r--gcc/ada/sem_elab.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_elab.adb b/gcc/ada/sem_elab.adb
index 0ce2b35..4d57a86 100644
--- a/gcc/ada/sem_elab.adb
+++ b/gcc/ada/sem_elab.adb
@@ -17469,7 +17469,7 @@ package body Sem_Elab is
-- Stuff that happens only at the outer level
if No (Outer_Scope) then
- Elab_Visited.Set_Last (0);
+ Elab_Visited.Clear;
-- Nothing to do if current scope is Standard (this is a bit odd, but
-- it happens in the case of generic instantiations).