Commit ee499b40 by Eric Botcazou Committed by Eric Botcazou

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
parent d0b1b67a
2019-11-25 Eric Botcazou <ebotcazou@adacore.com>
PR ada/92575
* expect.c (__gnat_expect_poll [VMS, HPUX]): Fix typo.
2019-11-06 Eric Botcazou <ebotcazou@adacore.com> 2019-11-06 Eric Botcazou <ebotcazou@adacore.com>
Alexandre Oliva <oliva@adacore.com> Alexandre Oliva <oliva@adacore.com>
......
...@@ -262,7 +262,7 @@ __gnat_expect_poll (int *fd, ...@@ -262,7 +262,7 @@ __gnat_expect_poll (int *fd,
if ((status & 1) != 1) if ((status & 1) != 1)
{ {
ready = -1; ready = -1;
dead_process = i + 1; *dead_process = i + 1;
return ready; return ready;
} }
} }
...@@ -447,7 +447,7 @@ __gnat_expect_poll (int *fd, ...@@ -447,7 +447,7 @@ __gnat_expect_poll (int *fd,
if (ei.request == TIOCCLOSE) if (ei.request == TIOCCLOSE)
{ {
ioctl (fd[i], TIOCREQSET, &ei); ioctl (fd[i], TIOCREQSET, &ei);
dead_process = i + 1; *dead_process = i + 1;
return -1; return -1;
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment