From 65a07a30aa7cf0ac4fc0b7f9643d7a2b28f7f1c6 Mon Sep 17 00:00:00 2001 From: Robert Dewar Date: Tue, 27 Oct 2009 14:14:44 +0000 Subject: s-fileio.adb, [...]: Minor reformatting 2009-10-27 Robert Dewar * s-fileio.adb, s-fileio.ads, sem_util.adb, sem_warn.adb, sem_warn.ads: Minor reformatting From-SVN: r153597 --- gcc/ada/s-fileio.adb | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'gcc/ada/s-fileio.adb') diff --git a/gcc/ada/s-fileio.adb b/gcc/ada/s-fileio.adb index df45003..803c2da 100644 --- a/gcc/ada/s-fileio.adb +++ b/gcc/ada/s-fileio.adb @@ -523,8 +523,7 @@ package body System.File_IO is function Form_Boolean (Form : String; Keyword : String; - Default : Boolean) - return Boolean + Default : Boolean) return Boolean is V1, V2 : Natural; pragma Unreferenced (V2); @@ -553,8 +552,7 @@ package body System.File_IO is function Form_Integer (Form : String; Keyword : String; - Default : Integer) - return Integer + Default : Integer) return Integer is V1, V2 : Natural; V : Integer; -- cgit v1.1