diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-13 13:10:51 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-13 13:10:51 +0000 |
| commit | 94ef14ded273ee194a771452c519e36409f46cb8 (patch) | |
| tree | 21b7fb988944d375fd24f4c38f8b5ae527a24bca /gcc/ada/atree.adb | |
| parent | 84173d6855b57b533267ca471cbb8fd7f598ced3 (diff) | |
| download | gcc-94ef14ded273ee194a771452c519e36409f46cb8.tar.gz | |
2009-07-13 Thomas Quinot <quinot@adacore.com>
* s-oscons-tmplt.c: Add comment.
2009-07-13 Robert Dewar <dewar@adacore.com>
* sinfo.adb, sinfo.ads, sem_util.adb, atree.adb, atree.ads: Minor
reformatting. Minor code reorganization (add 9 argument version of
Nkind_In).
* impunit.adb: Remove s-os_lib from list of system extensions.
* sem_util.ads: Minor reformatting
* output.adb: Add warnings off/on around System.OS_Lib.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@149583 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/atree.adb')
| -rw-r--r-- | gcc/ada/atree.adb | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/gcc/ada/atree.adb b/gcc/ada/atree.adb index 79f2ffda5b5..b22732668a5 100644 --- a/gcc/ada/atree.adb +++ b/gcc/ada/atree.adb @@ -1227,6 +1227,21 @@ package body Atree is return Nkind_In (Nkind (N), V1, V2, V3, V4, V5, V6, V7, V8); end Nkind_In; + function Nkind_In + (N : Node_Id; + V1 : Node_Kind; + V2 : Node_Kind; + V3 : Node_Kind; + V4 : Node_Kind; + V5 : Node_Kind; + V6 : Node_Kind; + V7 : Node_Kind; + V8 : Node_Kind; + V9 : Node_Kind) return Boolean + is + begin + return Nkind_In (Nkind (N), V1, V2, V3, V4, V5, V6, V7, V8, V9); + end Nkind_In; -------- -- No -- -------- |