Minor reformatting.

From-SVN: r132709
This commit is contained in:
Arnaud Charlet 2008-02-27 14:07:30 +01:00
parent acf6b7ab30
commit 47d4302293

View File

@ -1080,9 +1080,9 @@ package body System.File_IO is
if Mode /= File.Mode
and then (File.Shared_Status = Yes
or else File.Name'Length <= 1
or else File.Is_System_File
or else not File.Is_Regular_File)
or else File.Name'Length <= 1
or else File.Is_System_File
or else not File.Is_Regular_File)
then
raise Use_Error;