From: Robert Dewar <dewar@adacore.com>
Date: Fri, 8 Aug 2008 12:22:18 +0000 (+0200)
Subject: s-fileio.adb: Minor reformatting
X-Git-Tag: releases/gcc-4.4.0~3246
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=632eb367bfb68e43f806e477ad632efea00a4433;p=thirdparty%2Fgcc.git

s-fileio.adb: Minor reformatting

2008-08-08  Robert Dewar  <dewar@adacore.com>

	* s-fileio.adb: Minor reformatting

From-SVN: r138868
---

diff --git a/gcc/ada/s-fileio.adb b/gcc/ada/s-fileio.adb
index 79b718eadceb..7c20fb18f389 100644
--- a/gcc/ada/s-fileio.adb
+++ b/gcc/ada/s-fileio.adb
@@ -988,9 +988,11 @@ package body System.File_IO is
             Stream := fopen (Namestr'Address, Fopstr'Address, Encoding);
 
             if Stream = NULL_Stream then
+
                --  Raise Name_Error if trying to open a non-existent file.
-               --  Otherwise raise Use_Error. Should we raise Device_Error for
-               --  ENOSPC???
+               --  Otherwise raise Use_Error.
+
+               --  Should we raise Device_Error for ENOSPC???
 
                if System.OS_Lib.Errno = System.OS_Constants.ENOENT then
                   raise Name_Error;