s-fileio.adb: Minor reformatting
authorRobert Dewar <dewar@adacore.com>
Wed, 20 Aug 2008 14:26:52 +0000 (16:26 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 20 Aug 2008 14:26:52 +0000 (16:26 +0200)
2008-08-20  Robert Dewar  <dewar@adacore.com>

* s-fileio.adb: Minor reformatting

From-SVN: r139298

gcc/ada/s-fileio.adb

index 1109b2295af42d856abb7e72c7dfdb35bc93f626..d2af05c20481f20d1be3f533ef1c7bbd75caba79 100644 (file)
@@ -1001,11 +1001,13 @@ package body System.File_IO is
                   --  Non-zero when the given errno value indicates a non-
                   --  existing file.
 
-                  pragma Import (C, Is_File_Not_Found_Error,
-                    "__gnat_is_file_not_found_error");
+                  pragma Import
+                    (C, Is_File_Not_Found_Error,
+                     "__gnat_is_file_not_found_error");
+
                begin
-                  if Is_File_Not_Found_Error (Cint (System.OS_Lib.Errno))
-                       /= 0
+                  if
+                    Is_File_Not_Found_Error (Cint (System.OS_Lib.Errno)) /= 0
                   then
                      raise Name_Error;
                   else