g-os_lib.adb (Copy_File): Make sure that if From has an Invalid_FD, then we close...
authorRobert Dewar <dewar@adacore.com>
Fri, 17 Feb 2006 16:07:10 +0000 (17:07 +0100)
committerArnaud Charlet <charlet@gcc.gnu.org>
Fri, 17 Feb 2006 16:07:10 +0000 (17:07 +0100)
commit0e3e1f1559c7608c6b736fe9c6d30c07425dfd83
tree804e9e64b2a5e7fe5ad8d29faf2e4a2b96cb5ae0
parent7f9747c61d1bac65d73216c41b83db17cb861561
g-os_lib.adb (Copy_File): Make sure that if From has an Invalid_FD, then we close To if it is valid.

2006-02-17  Robert Dewar  <dewar@adacore.com>

* g-os_lib.adb (Copy_File): Make sure that if From has an Invalid_FD,
then we close To if it is valid.

From-SVN: r111188
gcc/ada/g-os_lib.adb