OSDN Git Service

2008-05-23 Thomas Quinot <quinot@adacore.com>
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 23 May 2008 13:29:02 +0000 (13:29 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 23 May 2008 13:29:02 +0000 (13:29 +0000)
commitec47e507952a085b41f850c433079dac3ce70d55
tree854259bd976214ac710b93b279badb63f5dcc42e
parent0c7a5982c0ec7851a2d799bbc30165d50ffe8a20
2008-05-23  Thomas Quinot  <quinot@adacore.com>

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

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135805 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/s-os_lib.adb