diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-13 12:16:51 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-13 12:16:51 +0000 |
| commit | 4c4697b81e7b74186ae92bbffd6f2b9af05d8f86 (patch) | |
| tree | 94908b1bab6a306f6dede652eb468c1a41ae89f5 /gcc/ada/adaint.h | |
| parent | 7226d7649d58c4a5da9255b18d02aba841b7f829 (diff) | |
| download | gcc-4c4697b81e7b74186ae92bbffd6f2b9af05d8f86.tar.gz | |
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
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@149573 138bc75d-0d04-0410-961f-82ee72b054a4
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 |