Minor reformatting.
authorArnaud Charlet <charlet@gcc.gnu.org>
Wed, 27 Feb 2008 13:07:30 +0000 (14:07 +0100)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 27 Feb 2008 13:07:30 +0000 (14:07 +0100)
From-SVN: r132709

gcc/ada/s-fileio.adb

index 4a8393c00cbf5a0452f0ccbea02c823ad23a4e5b..7a490cdc15cac5a467f79cfede41c73d1bb7f190 100644 (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;