diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-07-10 11:36:00 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-07-10 11:36:00 +0200 |
| commit | 514d0fc530d487c2f3819f59e5f2ca508f419a5d (patch) | |
| tree | 2e90045d7a29dd6aff6b7a5001210cf52503c6d9 /gcc/ada/sinfo.ads | |
| parent | 7b4db06ceeb85373d9bd52fb68eec77600455f12 (diff) | |
| download | gcc-514d0fc530d487c2f3819f59e5f2ca508f419a5d.zip gcc-514d0fc530d487c2f3819f59e5f2ca508f419a5d.tar.gz gcc-514d0fc530d487c2f3819f59e5f2ca508f419a5d.tar.bz2 | |
[multiple changes]
2009-07-10 Arnaud Charlet <charlet@adacore.com>
* i-cexten.ads (bool): New type.
2009-07-10 Robert Dewar <dewar@adacore.com>
* sinfo.ads (N_Short_Circuit): New definition
* sem_ch13.adb, sem_ch6.adb, sem_eval.adb, sem_res.adb,
treepr.adb: Minor code reorganization (use N_Short_Circuit)
From-SVN: r149467
Diffstat (limited to 'gcc/ada/sinfo.ads')
| -rw-r--r-- | gcc/ada/sinfo.ads | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/gcc/ada/sinfo.ads b/gcc/ada/sinfo.ads index ad96467..4aafa59 100644 --- a/gcc/ada/sinfo.ads +++ b/gcc/ada/sinfo.ads @@ -7044,16 +7044,19 @@ package Sinfo is N_In, N_Not_In, - -- N_Subexpr, N_Has_Etype + -- N_Subexpr, N_Has_Etype, N_Short_Circuit N_And_Then, + N_Or_Else, + + -- N_Subexpr, N_Has_Etype + N_Conditional_Expression, N_Explicit_Dereference, N_Function_Call, N_Indexed_Component, N_Integer_Literal, N_Null, - N_Or_Else, N_Procedure_Call_Statement, N_Qualified_Expression, @@ -7438,6 +7441,10 @@ package Sinfo is N_At_Clause .. N_Attribute_Definition_Clause; + subtype N_Short_Circuit is Node_Kind range + N_And_Then .. + N_Or_Else; + subtype N_Statement_Other_Than_Procedure_Call is Node_Kind range N_Abort_Statement .. N_If_Statement; |