]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
[multiple changes]
authorArnaud Charlet <charlet@gcc.gnu.org>
Mon, 26 Oct 2015 10:35:52 +0000 (11:35 +0100)
committerArnaud Charlet <charlet@gcc.gnu.org>
Mon, 26 Oct 2015 10:35:52 +0000 (11:35 +0100)
2015-10-26  Ed Schonberg  <schonberg@adacore.com>

* sem_ch12.adb (Analyze_Formal_Package_Declaration): Do not set
Box_Present when the formal part is (others => <>) even though
it is equivalent to a formal part (<>), because ASIS tools depend
on the syntactic setting of this flag.

2015-10-26  Hristian Kirtchev  <kirtchev@adacore.com>

* sem_ch13.adb: Minor reformatting.
* einfo.ads: Minor typo.

2015-10-26  Joel Brobecker  <brobecker@adacore.com brobecker>

* adaint.c (__gnat_open_new_temp): Use mkstemp on Android.

From-SVN: r229318

gcc/ada/ChangeLog
gcc/ada/adaint.c
gcc/ada/einfo.ads
gcc/ada/sem_ch13.adb

index d0f3e5f8dac7b762c61824ae22e533bb8e9f4625..1bb4fdc06fd4cc43dcf2f922be5d6f433204d54e 100644 (file)
@@ -1,3 +1,19 @@
+2015-10-26  Ed Schonberg  <schonberg@adacore.com>
+
+       * sem_ch12.adb (Analyze_Formal_Package_Declaration): Do not set
+       Box_Present when the formal part is (others => <>) even though
+       it is equivalent to a formal part (<>), because ASIS tools depend
+       on the syntactic setting of this flag.
+
+2015-10-26  Hristian Kirtchev  <kirtchev@adacore.com>
+
+       * sem_ch13.adb: Minor reformatting.
+       * einfo.ads: Minor typo.
+
+2015-10-26  Joel Brobecker  <brobecker@adacore.com brobecker>
+
+       * adaint.c (__gnat_open_new_temp): Use mkstemp on Android.
+
 2015-10-26  Ed Schonberg  <schonberg@adacore.com>
 
        * sem_ch12.adb (Analyze_Formal_Package_Declaration): Code clean up.
index 6849cd1c16c28ceedb57307ff96a99472c681f41..cb3e82cc8367ba8655118f66ea0387f0fe6c3f28 100644 (file)
@@ -983,8 +983,8 @@ __gnat_open_new_temp (char *path, int fmode)
   strcpy (path, "GNAT-XXXXXX");
 
 #if (defined (__FreeBSD__) || defined (__NetBSD__) || defined (__OpenBSD__) \
-  || defined (__linux__) || defined (__GLIBC__)) && !defined (__vxworks) \
-  || defined (__DragonFly__)
+  || defined (__linux__) || defined (__GLIBC__) || defined (__ANDROID__) \
+  || defined (__DragonFly__)) && !defined (__vxworks)
   return mkstemp (path);
 #elif defined (__Lynx__)
   mktemp (path);
index 201da87738a702510cfbc33eb99a84bfce1db519..e2a236ad50888e4ccbd60f70efb4a94b0136c04f 100644 (file)
@@ -3899,7 +3899,7 @@ package Einfo is
 --    Requires_Overriding (Flag213)
 --       Defined in all subprograms and entries. Set for subprograms that
 --       require overriding as defined by RM-2005-3.9.3(6/2). Note that this
---       is True only for implicitly declare subprograms; it is not set on the
+--       is True only for implicitly declared subprograms; it is not set on the
 --       parent type's subprogram. See also Is_Abstract_Subprogram.
 
 --    Return_Present (Flag54)
index fea90d11d64f4b6cd8994605d5aaca9d2fe3da27..e3b6bf71276e47b24305fd09d041e7f55d953977 100644 (file)
@@ -4014,8 +4014,7 @@ package body Sem_Ch13 is
 
                else
                   Illegal_Indexing
-                    ("indexing function already inherited "
-                     & "from parent type");
+                    ("indexing function already inherited from parent type");
                   Error_Msg_NE
                     ("!override & instead",
                      N, Entity (Expression (Inherited)));