diff options
Diffstat (limited to 'gcc/ada/adaint.c')
| -rw-r--r-- | gcc/ada/adaint.c | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c index 06c95c6..7452f62 100644 --- a/gcc/ada/adaint.c +++ b/gcc/ada/adaint.c @@ -2511,9 +2511,12 @@ __gnat_portable_no_block_spawn (char *args[]) h = win32_no_block_spawn (args[0], args); if (h != NULL) - add_handle (h); - - return GetProcessId (h); + { + add_handle (h); + return GetProcessId (h); + } + else + return -1; #else |