Mercurial > hg > CbC > CbC_gcc
diff gcc/ada/expect.c @ 145:1830386684a0
gcc-9.2.0
author | anatofuz |
---|---|
date | Thu, 13 Feb 2020 11:34:05 +0900 |
parents | 84e7813d76e9 |
children |
line wrap: on
line diff
--- a/gcc/ada/expect.c Thu Oct 25 07:37:49 2018 +0900 +++ b/gcc/ada/expect.c Thu Feb 13 11:34:05 2020 +0900 @@ -6,7 +6,7 @@ * * * C Implementation File * * * - * Copyright (C) 2001-2018, AdaCore * + * Copyright (C) 2001-2019, AdaCore * * * * 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,11 @@ * * ****************************************************************************/ -#ifdef __alpha_vxworks -#include "vxWorks.h" -#endif - #ifdef IN_RTS #define POSIX -#include "tconfig.h" -#include "tsystem.h" +#include "runtime.h" +#include <unistd.h> + #else #include "config.h" #include "system.h" @@ -265,7 +262,7 @@ if ((status & 1) != 1) { ready = -1; - dead_process = i + 1; + *dead_process = i + 1; return ready; } } @@ -450,7 +447,7 @@ if (ei.request == TIOCCLOSE) { ioctl (fd[i], TIOCREQSET, &ei); - dead_process = i + 1; + *dead_process = i + 1; return -1; }