diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-30 14:03:03 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-30 14:03:03 +0000 |
commit | d5c7669cdb54f778be48197d4c0345b8e5ae63bb (patch) | |
tree | 3eb6bdb8061cf102b2ba7810f87716b63930ceb0 /gcc/ada/prj-nmsc.adb | |
parent | f71faa5296bce977a67fd1d8fb9d5e74cb143de9 (diff) | |
download | gcc-d5c7669cdb54f778be48197d4c0345b8e5ae63bb.tar.gz |
2009-11-30 Robert Dewar <dewar@adacore.com>
* osint.adb, prj-nmsc.adb, sem_prag.adb, sem_util.adb: Minor
reformatting.
* csinfo.adb: Terminate run if improper use of reserved flag
* sinfo.ads, sinfo.adb (Is_Accessibility_Actual): Don't use reserved
Flag12, used Flag13 instead.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@154803 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/prj-nmsc.adb')
-rw-r--r-- | gcc/ada/prj-nmsc.adb | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/prj-nmsc.adb b/gcc/ada/prj-nmsc.adb index 9b65dc3a16c..a3f5100e8a7 100644 --- a/gcc/ada/prj-nmsc.adb +++ b/gcc/ada/prj-nmsc.adb @@ -2521,10 +2521,10 @@ package body Prj.Nmsc is Data.Tree); Library_Interface : constant Prj.Variable_Value := - Prj.Util.Value_Of - (Snames.Name_Library_Interface, - Project.Decl.Attributes, - Data.Tree); + Prj.Util.Value_Of + (Snames.Name_Library_Interface, + Project.Decl.Attributes, + Data.Tree); List : String_List_Id; Element : String_Element; @@ -2678,8 +2678,8 @@ package body Prj.Nmsc is Project.Interfaces_Defined := True; - elsif Project.Extends /= No_Project and then - Project.Extends.Interfaces_Defined + elsif Project.Extends /= No_Project + and then Project.Extends.Interfaces_Defined then Project.Interfaces_Defined := True; |