From ee499b407f6c59fe71c91fa7ad9686d1a4edfce3 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Mon, 25 Nov 2019 10:29:51 +0000 Subject: [PATCH] re PR ada/92575 (couple of suspicious assignments in expect.c) PR ada/92575 * expect.c (__gnat_expect_poll [VMS, HPUX]): Fix typo. From-SVN: r278671 --- gcc/ada/ChangeLog | 5 +++++ gcc/ada/expect.c | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index c69910c97cc..a5b2a7c2b2a 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2019-11-25 Eric Botcazou + + PR ada/92575 + * expect.c (__gnat_expect_poll [VMS, HPUX]): Fix typo. + 2019-11-06 Eric Botcazou Alexandre Oliva diff --git a/gcc/ada/expect.c b/gcc/ada/expect.c index 349af3f789d..b8753ab0880 100644 --- a/gcc/ada/expect.c +++ b/gcc/ada/expect.c @@ -262,7 +262,7 @@ __gnat_expect_poll (int *fd, if ((status & 1) != 1) { ready = -1; - dead_process = i + 1; + *dead_process = i + 1; return ready; } } @@ -447,7 +447,7 @@ __gnat_expect_poll (int *fd, if (ei.request == TIOCCLOSE) { ioctl (fd[i], TIOCREQSET, &ei); - dead_process = i + 1; + *dead_process = i + 1; return -1; } -- 2.30.2