diff options
| author | Gary Dismukes <dismukes@adacore.com> | 2018-12-11 11:10:48 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2018-12-11 11:10:48 +0000 |
| commit | 371e21cf9020cd4278e98bfeee17086dc39e2723 (patch) | |
| tree | 227e3e0d16b1e5cc7c9cd2fc541de712883b6bde /gcc/ada/sem_spark.adb | |
| parent | e2819941fc6eb15c3955d75e45f30dedb3713389 (diff) | |
| download | gcc-371e21cf9020cd4278e98bfeee17086dc39e2723.zip gcc-371e21cf9020cd4278e98bfeee17086dc39e2723.tar.gz gcc-371e21cf9020cd4278e98bfeee17086dc39e2723.tar.bz2 | |
[Ada] Minor reformattings
2018-12-11 Gary Dismukes <dismukes@adacore.com>
gcc/ada/
* exp_util.ads: Use preferred U.S. spelling of "honored".
* sem_spark.adb: Remove extra whitespace.
From-SVN: r266997
Diffstat (limited to 'gcc/ada/sem_spark.adb')
| -rw-r--r-- | gcc/ada/sem_spark.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sem_spark.adb b/gcc/ada/sem_spark.adb index b8baeeb..1c4aeaf 100644 --- a/gcc/ada/sem_spark.adb +++ b/gcc/ada/sem_spark.adb @@ -230,8 +230,8 @@ package body Sem_SPARK is -------------------- procedure Perm_Mismatch - (Exp_Perm, Act_Perm : Perm_Kind; - N : Node_Id); + (Exp_Perm, Act_Perm : Perm_Kind; + N : Node_Id); -- Issues a continuation error message about a mismatch between a -- desired permission Exp_Perm and a permission obtained Act_Perm. N -- is the node on which the error is reported. @@ -1652,7 +1652,7 @@ package body Sem_SPARK is if Present (Iteration_Scheme (Loop_N)) then declare - Exit_Env : constant Perm_Env_Access := new Perm_Env; + Exit_Env : constant Perm_Env_Access := new Perm_Env; begin Copy_Env (From => Current_Perm_Env, To => Exit_Env.all); |