diff options
| author | Yannick Moy <moy@adacore.com> | 2016-04-20 10:44:17 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2016-04-20 12:44:17 +0200 |
| commit | bc795e3e039342e74d2d2b0515dd190f7d24ec65 (patch) | |
| tree | a74e6596573ee26603c7bef7d84f7db2858afd8c /gcc/ada/sem_ch4.adb | |
| parent | d493941584db02404346da828ee794e871ad5955 (diff) | |
| download | gcc-bc795e3e039342e74d2d2b0515dd190f7d24ec65.zip gcc-bc795e3e039342e74d2d2b0515dd190f7d24ec65.tar.gz gcc-bc795e3e039342e74d2d2b0515dd190f7d24ec65.tar.bz2 | |
sem_ch4.adb: Fix typos in comments.
2016-04-20 Yannick Moy <moy@adacore.com>
* sem_ch4.adb: Fix typos in comments.
* sem_res.adb (Resolve_Case_Expression): Fix type of case alternatives.
From-SVN: r235263
Diffstat (limited to 'gcc/ada/sem_ch4.adb')
| -rw-r--r-- | gcc/ada/sem_ch4.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch4.adb b/gcc/ada/sem_ch4.adb index 6226c8c..6ba51e8 100644 --- a/gcc/ada/sem_ch4.adb +++ b/gcc/ada/sem_ch4.adb @@ -2175,12 +2175,12 @@ package body Sem_Ch4 is begin Set_Etype (N, Any_Type); - -- Loop through intepretations of Then_Expr + -- Loop through interpretations of Then_Expr Get_First_Interp (Then_Expr, I, It); while Present (It.Nam) loop - -- Add possible intepretation of Then_Expr if no Else_Expr, or + -- Add possible interpretation of Then_Expr if no Else_Expr, or -- Else_Expr is present and has a compatible type. if No (Else_Expr) |