re PR ada/66526 (apparent use of uninitialized variables in g-expect.adb)
PR ada/66526 * g-expect.adb (Set_Up_Child_Communications): Add matching condition for uses of Input, Ouput and Error variables after the Execvp call. From-SVN: r231450
This commit is contained in:
parent
76680678a8
commit
d4a0078bf8
2 changed files with 20 additions and 9 deletions
|
@ -1,3 +1,9 @@
|
|||
2015-12-09 Eric Botcazou <ebotcazou@adacore.com>
|
||||
|
||||
PR ada/66526
|
||||
* g-expect.adb (Set_Up_Child_Communications): Add matching condition
|
||||
for uses of Input, Ouput and Error variables after the Execvp call.
|
||||
|
||||
2015-12-08 Jakub Jelinek <jakub@redhat.com>
|
||||
|
||||
PR c/48088
|
||||
|
|
|
@ -1348,8 +1348,12 @@ package body GNAT.Expect is
|
|||
|
||||
Portable_Execvp (Pid.Pid'Access, Cmd & ASCII.NUL, Args);
|
||||
|
||||
-- The following commands are not executed on Unix systems, and are only
|
||||
-- required for Windows systems. We are now in the parent process.
|
||||
-- The following lines are only required for Windows systems and will
|
||||
-- not be executed on Unix systems, but we use the same condition as
|
||||
-- above to avoid warnings on uninitialized variables on Unix systems.
|
||||
-- We are now in the parent process.
|
||||
|
||||
if No_Fork_On_Target then
|
||||
|
||||
-- Restore the old descriptors
|
||||
|
||||
|
@ -1359,6 +1363,7 @@ package body GNAT.Expect is
|
|||
Close (Input);
|
||||
Close (Output);
|
||||
Close (Error);
|
||||
end if;
|
||||
end Set_Up_Child_Communications;
|
||||
|
||||
---------------------------
|
||||
|
|
Loading…
Add table
Reference in a new issue