diff options
author | Robert Dewar <dewar@adacore.com> | 2014-02-06 10:08:16 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-02-06 11:08:16 +0100 |
commit | 155b4fccd4c83e71b46dd47c9142d98bd848a07e (patch) | |
tree | d112d25e6e1061513e2885f4e77370c691dc96d1 /gcc/ada/checks.adb | |
parent | c366d38c64bd0960374870043f05fe7ab08d0bd2 (diff) | |
download | gcc-155b4fccd4c83e71b46dd47c9142d98bd848a07e.zip gcc-155b4fccd4c83e71b46dd47c9142d98bd848a07e.tar.gz gcc-155b4fccd4c83e71b46dd47c9142d98bd848a07e.tar.bz2 |
exp_util.ads, [...]: Minor reformatting and code clean ups.
2014-02-06 Robert Dewar <dewar@adacore.com>
* exp_util.ads, checks.adb, sem_prag.adb, prj-util.adb, sem_ch13.adb:
Minor reformatting and code clean ups.
From-SVN: r207540
Diffstat (limited to 'gcc/ada/checks.adb')
-rw-r--r-- | gcc/ada/checks.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/checks.adb b/gcc/ada/checks.adb index 71960ce..e3241e9 100644 --- a/gcc/ada/checks.adb +++ b/gcc/ada/checks.adb @@ -2589,7 +2589,7 @@ package body Checks is -- predicated subtype itself, rather than some covering type. This -- is likely to be a common error, and thus deserves a warning. - elsif Present (S) and then S = Predicate_Function (Typ) then + elsif Present (S) and then S = Predicate_Function (Typ) then Error_Msg_N ("predicate check includes a function call that " & "requires a predicate check??", Parent (N)); |