adaint.c: Move directive around.
authorEric Botcazou <ebotcazou@adacore.com>
Fri, 21 Dec 2012 12:32:31 +0000 (12:32 +0000)
committerEric Botcazou <ebotcazou@gcc.gnu.org>
Fri, 21 Dec 2012 12:32:31 +0000 (12:32 +0000)
* adaint.c: Move directive around.
* argv.c: Likewise.
* cio.c: Likewise.
* cstreams.c: Likewise.
* env.c: Likewise.
* exit.c: Likewise.
* init.c: Likewise.
* initialize.c: Likewise.
* raise.c: Likewise.
* seh_init.c: Likewise.
* targext.c: Likewise.

From-SVN: r194660

12 files changed:
gcc/ada/ChangeLog
gcc/ada/adaint.c
gcc/ada/argv.c
gcc/ada/cio.c
gcc/ada/cstreams.c
gcc/ada/env.c
gcc/ada/exit.c
gcc/ada/init.c
gcc/ada/initialize.c
gcc/ada/raise.c
gcc/ada/seh_init.c
gcc/ada/targext.c

index 0c902a825ffebaf0c2f7c27be04f5e80cbb2d7d2..f18c14653ea77fd8ebf6e22af3f5601ea734b037 100644 (file)
@@ -1,3 +1,17 @@
+2012-12-21  Eric Botcazou  <ebotcazou@adacore.com>
+
+       * adaint.c: Move directive around.
+       * argv.c: Likewise.
+       * cio.c: Likewise.
+       * cstreams.c: Likewise.
+       * env.c: Likewise.
+       * exit.c: Likewise.
+       * init.c: Likewise.
+       * initialize.c: Likewise.
+       * raise.c: Likewise.
+       * seh_init.c: Likewise.
+       * targext.c: Likewise.
+
 2012-12-15  Eric Botcazou  <ebotcazou@adacore.com>
            Martin Ettl  <ettl.martin@gmx.de>
 
index eab3ea5fbae84d991309deb71323ec38bd712051..4b8ce5341effe674babb315ccfde9b4ad681c25d 100644 (file)
    package Osint.  Many of the subprograms in OS_Lib import standard
    library calls directly. This file contains all other routines.  */
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 #ifdef __vxworks
 
 /* No need to redefine exit here.  */
@@ -107,6 +103,10 @@ extern "C" {
 #include "version.h"
 #endif
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 #if defined (__MINGW32__)
 
 #if defined (RTX)
index 29f163972eafc8edc692b96b543066e2e20a549f..ebca8bbc09c832d7733061f46a59b011a8538968 100644 (file)
    main program, and these routines are accessed from the
    Ada.Command_Line.Environment package.  */
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 #ifdef IN_RTS
 #include "tconfig.h"
 #include "tsystem.h"
@@ -57,6 +53,10 @@ extern "C" {
 
 #include "adaint.h"
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 /* argc and argv of the main program are saved under gnat_argc and gnat_argv,
    envp of the main program is saved under gnat_envp.  */
 
index 2564e4d3c473d5b022eb3b83f25d4b68e3eebb47..70b2550535be53fa7fcfc5c3e87023e835f1d689 100644 (file)
  *                                                                          *
  ****************************************************************************/
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 #ifdef IN_RTS
 #include "tconfig.h"
 #include "tsystem.h"
@@ -44,6 +40,10 @@ extern "C" {
 
 #include "adaint.h"
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 /* Don't use macros on GNU/Linux since they cause incompatible changes between
    glibc 2.0 and 2.1 */
 #ifdef linux
index 894b056eaba13045202827a06dccabe1100b04d8..b82fcdfa75597251730aa9032d5b397d89105e48 100644 (file)
 
 /* Routines required for implementing routines in Interfaces.C.Streams.  */
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 #ifdef __vxworks
 #include "vxWorks.h"
 #endif
@@ -50,6 +46,10 @@ extern "C" {
 
 #include "adaint.h"
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 #ifdef VMS
 #include <unixlib.h>
 #endif
index 78328dc371b59f4f58e44a1f4d2d0523362b56b2..800d20748ecea6ba32fca5e6abe0390d9f100ef4 100644 (file)
  *                                                                          *
  ****************************************************************************/
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 #ifdef IN_RTS
 #include "tconfig.h"
 #include "tsystem.h"
@@ -76,6 +72,10 @@ extern "C" {
 #include "system.h"
 #endif /* IN_RTS */
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 #if defined (__APPLE__)
 #include <crt_externs.h>
 #endif
index 47983e87ef7ee86875f7e4ef1f37db1b03ab68ef..cf3f11d13213c367b6e82fcc61bb5215c684a2d1 100644 (file)
  *                                                                          *
  ****************************************************************************/
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 #ifdef __alpha_vxworks
 #include "vxWorks.h"
 #endif
@@ -48,6 +44,10 @@ extern "C" {
 
 #include "adaint.h"
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 /* Routine used by Ada.Command_Line.Set_Exit_Status.  */
 
 int gnat_exit_status = 0;
index 8a28bf68ab54ed256808e7abe5fa75abfe07bd10..916c3befef4b8fb3a35cad0d190c2768e7943169 100644 (file)
     installed by this file are used to catch the resulting signals that come
     from these probes failing (i.e. touching protected pages).  */
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 /* This file should be kept synchronized with 2sinit.ads, 2sinit.adb,
    s-init-ae653-cert.adb and s-init-xi-sparc.adb.  All these files implement
    the required functionality for different targets.  */
@@ -71,6 +67,10 @@ extern "C" {
 #include "adaint.h"
 #include "raise.h"
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 extern void __gnat_raise_program_error (const char *, int);
 
 /* Addresses of exception data blocks for predefined exceptions.  Tasking_Error
index 7e1141a9be7f5690b9a66dfa2f8686e19a22cb0b..6b92d27cb134ee73472177924acc28e63ba3ee36 100644 (file)
     in a separate file/object so that users can replace it easily.
     The default implementation should be null on most targets.  */
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 /* The following include is here to meet the published VxWorks requirement
    that the __vxworks header appear before any other include.  */
 #ifdef __vxworks
@@ -57,6 +53,10 @@ extern "C" {
 
 #include "raise.h"
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 /******************************************/
 /* __gnat_initialize (NT-mingw32 Version) */
 /******************************************/
index 35b0e988ee114610f000209391ecefc8cdfbc99d..d17b9dd4a7a8a823ba725ce7a2f3253edcce42dd 100644 (file)
 /* Shared routines to support exception handling.  __gnat_unhandled_terminate
    is shared between all exception handling mechanisms.  */
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 #ifdef IN_RTS
 #include "tconfig.h"
 #include "tsystem.h"
@@ -47,6 +43,10 @@ extern "C" {
 #include "adaint.h"
 #include "raise.h"
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 /*  Wrapper to builtin_longjmp.  This is for the compiler eh only, as the sjlj
     runtime library interfaces directly to the intrinsic.  We can't yet do
     this for the compiler itself, because this capability relies on changes
index 772dab0aa8424951792f4fa02225f19efd98a7ad..9b3c081081da095e1dc4bd669f399a48a2fe9d28 100644 (file)
 /*  This unit contains support for SEH (Structured Exception Handling).
     Right now the only implementation is for Win32.  */
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 #ifdef IN_RTS
 #include "tconfig.h"
 #include "tsystem.h"
@@ -50,6 +46,10 @@ extern "C" {
 
 #include "raise.h"
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 /* Addresses of exception data blocks for predefined exceptions. */
 extern struct Exception_Data constraint_error;
 extern struct Exception_Data numeric_error;
index 6a9f970c2862163db04620c74a750c491156dec8..a7f3ee9b3fdd5704b332c1d87ec1b6c904d161b3 100644 (file)
     Note that, in order to have access to the TARGET_* macros used below,
     the file must be compiled with IN_GCC defined, even for the library.  */
 
-#ifdef __cplusplus
-extern "C" {
-#endif
-
 #ifdef IN_RTS
 #include "tconfig.h"
 #include "tsystem.h"
@@ -57,6 +53,10 @@ extern "C" {
 #define TARGET_EXECUTABLE_SUFFIX ""
 #endif
 
+#ifdef __cplusplus
+extern "C" {
+#endif
+
 const char *__gnat_target_object_extension = TARGET_OBJECT_SUFFIX;
 const char *__gnat_target_executable_extension = TARGET_EXECUTABLE_SUFFIX;
 const char *__gnat_target_debuggable_extension = TARGET_EXECUTABLE_SUFFIX;