diff options
| author | Vasiliy Fofanov <fofanov@adacore.com> | 2009-07-13 12:16:51 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-07-13 14:16:51 +0200 |
| commit | 75069667df1ed5fafbb9e1f4532adf1233b7eeab (patch) | |
| tree | 94908b1bab6a306f6dede652eb468c1a41ae89f5 /gcc/ada/adaint.h | |
| parent | e2d9085b0f600ee51a331a2135f2da43c661881d (diff) | |
| download | gcc-75069667df1ed5fafbb9e1f4532adf1233b7eeab.tar.gz | |
mingw32.h: Make it explicit that we need XP or later.
2009-07-13 Vasiliy Fofanov <fofanov@adacore.com>
* mingw32.h: Make it explicit that we need XP or later.
* initialize.c: Remove useless extern symbol declaration.
* adaint.h: Ditto, also expose __gnat_win32_remove_handle to allow
code reuse in expect.c.
* adaint.c: Changes throughout the Windows section to redesign storage
of the child process list and the process identification.
* expect.c (__gnat_kill, __gnat_waitpid): Simplify, cleanup, use pids
for interfacing, fix errors.
(__gnat_expect_portable_execvp): use function in adaint.c
From-SVN: r149573
Diffstat (limited to 'gcc/ada/adaint.h')
| -rw-r--r-- | gcc/ada/adaint.h | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/gcc/ada/adaint.h b/gcc/ada/adaint.h index e8fb40bc4a9..57cedf87350 100644 --- a/gcc/ada/adaint.h +++ b/gcc/ada/adaint.h @@ -199,8 +199,11 @@ extern void __gnat_os_filename (char *, char *, char *, extern void *__gnat_lwp_self (void); #endif -#if defined (__MINGW32__) && !defined (RTX) -extern void __gnat_plist_init (void); +#if defined (_WIN32) +/* Interface to delete a handle from internally maintained list of child + process handles on Windows */ +extern void +__gnat_win32_remove_handle (HANDLE h, int pid); #endif #ifdef IN_RTS |