From: Thomas Quinot <quinot@adacore.com>
Date: Wed, 6 Aug 2008 09:35:27 +0000 (+0200)
Subject: exp_ch11.adb: Minor reformatting
X-Git-Tag: releases/gcc-4.4.0~3297
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=49f7fe608b9df9033b0c4978074d3df380a0a178;p=thirdparty%2Fgcc.git

exp_ch11.adb: Minor reformatting

2008-08-06  Thomas Quinot  <quinot@adacore.com>

	* exp_ch11.adb: Minor reformatting

From-SVN: r138785
---

diff --git a/gcc/ada/exp_ch11.adb b/gcc/ada/exp_ch11.adb
index 2cfde4df912f..a8219fe7c9ff 100644
--- a/gcc/ada/exp_ch11.adb
+++ b/gcc/ada/exp_ch11.adb
@@ -1386,7 +1386,7 @@ package body Exp_Ch11 is
 
       --     Raise_Exception (exception-name'Identity, string);
 
-      --  and there is nothing else to do
+      --  and there is nothing else to do.
 
       if Present (Expression (N)) then
          Rewrite (N,
@@ -1394,7 +1394,7 @@ package body Exp_Ch11 is
              Name => New_Occurrence_Of (RTE (RE_Raise_Exception), Loc),
              Parameter_Associations => New_List (
                Make_Attribute_Reference (Loc,
-                 Prefix => Name (N),
+                 Prefix         => Name (N),
                  Attribute_Name => Name_Identity),
                Expression (N))));
          Analyze (N);