diff options
| author | Robert Dewar <dewar@adacore.com> | 2014-07-18 09:14:14 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-18 11:14:14 +0200 |
| commit | fc999c5d2e9f0f594fe82739494fb36b0b428384 (patch) | |
| tree | cf519b8d632a0ac0dfb99c88827df7604ad03241 /gcc/ada/par_sco.adb | |
| parent | b3b26ace90c59e56d59edeffd8ea7f73b07097af (diff) | |
| download | gcc-fc999c5d2e9f0f594fe82739494fb36b0b428384.zip gcc-fc999c5d2e9f0f594fe82739494fb36b0b428384.tar.gz gcc-fc999c5d2e9f0f594fe82739494fb36b0b428384.tar.bz2 | |
par_sco.adb, [...]: Minor reformatting.
2014-07-18 Robert Dewar <dewar@adacore.com>
* par_sco.adb, a-reatim.ads, exp_attr.adb, sem_util.adb: Minor
reformatting.
2014-07-18 Robert Dewar <dewar@adacore.com>
* einfo.ads, einfo.adb (Has_Out_Or_In_Out_Parameter): New flag and
function.
(Set_Has_Out_Or_In_Out_Parameter): New procedure.
* sem_ch6.adb (Set_Formal_Mode): Set Has_Out_Or_In_Out_Parameter flag.
* sem_res.adb (Resolve_Call): Error if call of Ada 2012 function
with OUT or IN OUT from earlier Ada mode (e.g. Ada 2005)
From-SVN: r212780
Diffstat (limited to 'gcc/ada/par_sco.adb')
| -rw-r--r-- | gcc/ada/par_sco.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/par_sco.adb b/gcc/ada/par_sco.adb index 8712ba6..6fe803d 100644 --- a/gcc/ada/par_sco.adb +++ b/gcc/ada/par_sco.adb @@ -102,8 +102,8 @@ package body Par_SCO is function Is_Logical_Operator (N : Node_Id) return Boolean; -- N is the node for a subexpression. This procedure just tests N to see -- if it is a logical operator (including short circuit conditions, but - -- excluding OR and AND) and returns True if so, False otherwise, it does - -- no other processing. + -- excluding OR and AND) and returns True if so. It also returns True for + -- an if expression. False in all other cases, no other processing is done. function To_Source_Location (S : Source_Ptr) return Source_Location; -- Converts Source_Ptr value to Source_Location (line/col) format |