OSDN Git Service

2005-12-05 Pascal Obry <obry@adacore.com>
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 9 Dec 2005 17:18:03 +0000 (17:18 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 9 Dec 2005 17:18:03 +0000 (17:18 +0000)
commit506dd208ca621acd44d3033eb2d9eb2387fa2539
treeaa9d0a6351cd6720e0f17a2de235417db836a847
parent9036a87da04182f4df1e9f3f7cc4205aa3454983
2005-12-05  Pascal Obry  <obry@adacore.com>

* g-diopit.adb (Find): Fix test to exit the iterator and make sure that
the iterator is quitting iteration on parent directory.

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