OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

s-fileio.adb: Minor reformatting

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

	* s-fileio.adb: Minor reformatting

From-SVN: r138868
This commit is contained in:
Robert Dewar 2008-08-08 14:22:18 +02:00 committed by Arnaud Charlet
parent 8529dde57a
commit 632eb367bf
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ada/s-fileio.adb
View File

@ -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;