From: Robert Dewar Date: Wed, 20 Aug 2008 14:26:52 +0000 (+0200) Subject: s-fileio.adb: Minor reformatting X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=b9ccd710833e0e15b517b52d02a81f3bb00f60fe;p=gcc.git s-fileio.adb: Minor reformatting 2008-08-20 Robert Dewar * s-fileio.adb: Minor reformatting From-SVN: r139298 --- diff --git a/gcc/ada/s-fileio.adb b/gcc/ada/s-fileio.adb index 1109b2295af..d2af05c2048 100644 --- a/gcc/ada/s-fileio.adb +++ b/gcc/ada/s-fileio.adb @@ -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