2008-05-23 Thomas Quinot <quinot@adacore.com>
authorThomas Quinot <quinot@adacore.com>
Fri, 23 May 2008 13:29:02 +0000 (15:29 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Fri, 23 May 2008 13:29:02 +0000 (15:29 +0200)
commite401e17bdfaa22265f753151d9354f7de577a98c
tree854259bd976214ac710b93b279badb63f5dcc42e
parentd313a1b6bc336a4061de1c19e9903daa125a6561
2008-05-23  Thomas Quinot  <quinot@adacore.com>

* s-os_lib.adb:
(copy_File): Do not open destination file if source file is unreadable.

From-SVN: r135805
gcc/ada/s-os_lib.adb