[Ada] Improve detection of end of the process by GNAT.Expect
commit5eb349352b984be67d56a0e54cbd3ceace04083b
authorVadim Godunko <godunko@adacore.com>
Wed, 21 Aug 2019 08:31:20 +0000 (21 08:31 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Wed, 21 Aug 2019 08:31:20 +0000 (21 08:31 +0000)
treef30331d48cdf6701e5ea6d17cd047fe2780fd6b1
parent7c2a44aebbdcbd1c250b99541b25afd1dfcb60e8
[Ada] Improve detection of end of the process by GNAT.Expect

'read' system call may be interrupted by signal with 'errno' is set to
EINTER. In this case, re-try a few times.

2019-08-21  Vadim Godunko  <godunko@adacore.com>

gcc/ada/

* libgnat/g-expect.adb (Expect_Internal): Attempt to read
several times when 'read' returns non-positive.

From-SVN: r274791
gcc/ada/ChangeLog
gcc/ada/libgnat/g-expect.adb