From 09020f7a38f1038226963e2e1a7d4264a91929a8 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Mon, 25 Nov 2019 10:30:41 +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: r278672 --- 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 dd515bca601c..1f13b9c06ab9 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-08 Jakub Jelinek Backported from mainline diff --git a/gcc/ada/expect.c b/gcc/ada/expect.c index 76fce788fc91..d4ffae219133 100644 --- a/gcc/ada/expect.c +++ b/gcc/ada/expect.c @@ -265,7 +265,7 @@ __gnat_expect_poll (int *fd, if ((status & 1) != 1) { ready = -1; - dead_process = i + 1; + *dead_process = i + 1; return ready; } } @@ -450,7 +450,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.47.3