diff options
Diffstat (limited to 'gcc/ada/sinfo.ads')
| -rw-r--r-- | gcc/ada/sinfo.ads | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sinfo.ads b/gcc/ada/sinfo.ads index f1764943a84..de8b23eb7d0 100644 --- a/gcc/ada/sinfo.ads +++ b/gcc/ada/sinfo.ads @@ -244,7 +244,7 @@ package Sinfo is -- Variant := First (Variants (N)); -- while Present (Variant) loop -- ... - -- Alt := Next (Alt); + -- Variant := Next (Variant); -- end loop; -- or @@ -252,7 +252,7 @@ package Sinfo is -- Variant := First_Non_Pragma (Variants (N)); -- while Present (Variant) loop -- ... - -- Alt := Next_Non_Pragma (Alt); + -- Variant := Next_Non_Pragma (Variant); -- end loop; -- In the first form of the loop, Variant can either be an N_Pragma or |