diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-10 09:36:00 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-10 09:36:00 +0000 |
| commit | e777155693d6c822bf12ef4958b3c4ab1fea9ec6 (patch) | |
| tree | 2e90045d7a29dd6aff6b7a5001210cf52503c6d9 /gcc/ada/sinfo.ads | |
| parent | 2f82b41a94d8ff46b3a9ef7fc11e6f49bd890dae (diff) | |
| download | gcc-e777155693d6c822bf12ef4958b3c4ab1fea9ec6.tar.gz | |
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)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@149467 138bc75d-0d04-0410-961f-82ee72b054a4
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 ad96467e61b..4aafa5959d4 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; |