summaryrefslogtreecommitdiff
path: root/gcc/ada/argv.c
diff options
context:
space:
mode:
authorebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>2011-07-12 17:23:04 +0000
committerebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>2011-07-12 17:23:04 +0000
commitbecb63f573e95ce8f66c18766f70f608dc31734e (patch)
tree18042d58d56e687de9c857cb5ad05b8bf282ca29 /gcc/ada/argv.c
parent8991ae0afea9577f7319fc393c4efb52284a1df0 (diff)
downloadgcc-becb63f573e95ce8f66c18766f70f608dc31734e.tar.gz
* prefix.h: Wrap up in extern "C" block.
ada/ * adadecode.c: Wrap up in extern "C" block. * adadecode.h: Likewise. * adaint.c: Likewise. Remove 'const' keyword. * adaint.h: Likewise. * argv.c: Likewise. * atree.h: Likewise. * cio.c: Likewise. * cstreams.c: Likewise. * env.c: Likewise. * exit.c: Likewise. * fe.h: Likewise. * final.c: Likewise. * init.c: Likewise. * initialize.c: Likewise. * link.c: Likewise. * namet.h: Likewise. * nlists.h: Likewise. * raise.c: Likewise. * raise.h: Likewise. * repinfo.h: Likewise. * seh_init.c: Likewise. * targext.c: Likewise. * tracebak.c: Likewise. * uintp.h: Likewise. * urealp.h: Likewise. * xeinfo.adb: Wrap up generated C code in extern "C" block. * xsinfo.adb: Likewise. * xsnamest.adb: Likewise. * gcc-interface/gadaint.h: Wrap up in extern "C" block. * gcc-interface/gigi.h: Wrap up some prototypes in extern "C" block. * gcc-interface/misc.c: Likewise. * gcc-interface/Make-lang.in (GCC_LINK): Use LINKER. (GNAT1_C_OBJS): Remove ada/b_gnat1.o. List ada/seh_init.o and ada/targext.o here... (GNAT_ADA_OBJS): ...and not here. (GNAT1_ADA_OBJS): Add ada/b_gnat1.o. (GNATBIND_OBJS): Reorder. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@176210 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/argv.c')
-rw-r--r--gcc/ada/argv.c18
1 files changed, 13 insertions, 5 deletions
diff --git a/gcc/ada/argv.c b/gcc/ada/argv.c
index b827b030f1e..29f163972ea 100644
--- a/gcc/ada/argv.c
+++ b/gcc/ada/argv.c
@@ -6,7 +6,7 @@
* *
* C Implementation File *
* *
- * Copyright (C) 1992-2009, Free Software Foundation, Inc. *
+ * Copyright (C) 1992-2011, Free Software Foundation, Inc. *
* *
* GNAT is free software; you can redistribute it and/or modify it under *
* terms of the GNU General Public License as published by the Free Soft- *
@@ -30,17 +30,21 @@
****************************************************************************/
/* Routines for accessing command line arguments from both the runtime
- library and from the compiler itself. In the former case, gnat_argc
+ library and from the compiler itself. In the former case, gnat_argc
and gnat_argv are the original argc and argv values as stored by the
binder generated main program, and these routines are accessed from
- the Ada.Command_Line package. In the compiler case, gnat_argc and
+ the Ada.Command_Line package. In the compiler case, gnat_argc and
gnat_argv are the values as modified by toplev, and these routines
- are accessed from the Osint package. */
+ are accessed from the Osint package. */
/* Also routines for accessing the environment from the runtime library.
Gnat_envp is the original envp value as stored by the binder generated
main program, and these routines are accessed from the
- Ada.Command_Line.Environment package. */
+ Ada.Command_Line.Environment package. */
+
+#ifdef __cplusplus
+extern "C" {
+#endif
#ifdef IN_RTS
#include "tconfig.h"
@@ -116,3 +120,7 @@ __gnat_fill_env (char *a, int i)
if (gnat_envp != NULL)
strncpy (a, gnat_envp[i], strlen (gnat_envp[i]));
}
+
+#ifdef __cplusplus
+}
+#endif