diff options
| author | Laurent GUERBY <laurent@guerby.net> | 2011-07-12 17:23:04 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2011-07-12 17:23:04 +0000 |
| commit | 9e9bd455d4cb9df5f0c54858448ebfd699b14f1b (patch) | |
| tree | 18042d58d56e687de9c857cb5ad05b8bf282ca29 /gcc/ada/final.c | |
| parent | 4d652a1865628038acbfc0b9cab1ef7547d49d40 (diff) | |
| download | gcc-9e9bd455d4cb9df5f0c54858448ebfd699b14f1b.zip gcc-9e9bd455d4cb9df5f0c54858448ebfd699b14f1b.tar.gz gcc-9e9bd455d4cb9df5f0c54858448ebfd699b14f1b.tar.bz2 | |
prefix.h: Wrap up in extern "C" block.
* 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.
Co-Authored-By: Eric Botcazou <ebotcazou@adacore.com>
From-SVN: r176210
Diffstat (limited to 'gcc/ada/final.c')
| -rw-r--r-- | gcc/ada/final.c | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/gcc/ada/final.c b/gcc/ada/final.c index bfd519e..b49b3de 100644 --- a/gcc/ada/final.c +++ b/gcc/ada/final.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- * @@ -29,14 +29,22 @@ * * ****************************************************************************/ +#ifdef __cplusplus +extern "C" { +#endif + extern void __gnat_finalize (void); /* This routine is called at the extreme end of execution of an Ada program (the call is generated by the binder). The standard routine does nothing at all, the intention is that this be replaced by system specific code - where finalization is required. */ + where finalization is required. */ void __gnat_finalize (void) { } + +#ifdef __cplusplus +} +#endif |