a-direct.adb (Start_Search): Check for Name_Error before checking for Use_Error,...
authorVincent Celier <celier@adacore.com>
Tue, 8 Apr 2008 06:56:58 +0000 (08:56 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Tue, 8 Apr 2008 06:56:58 +0000 (08:56 +0200)
commitdaa5998b841124471f0a514209f1468f28c2e448
tree44c6dffb5ed97a2aade0c729232cb1e81269f833
parent096249062654522b096aeb32d551b9faaeaf186d
a-direct.adb (Start_Search): Check for Name_Error before checking for Use_Error, as specified in the RM.

2008-04-08  Vincent Celier  <celier@adacore.com>

* a-direct.adb (Start_Search): Check for Name_Error before checking for
Use_Error, as specified in the RM. Check if directory is open and raise
Use_Error if it is not.

From-SVN: r134059
gcc/ada/a-direct.adb