From: Robert Dewar <dewar@adacore.com>
Date: Wed, 20 Aug 2008 12:34:01 +0000 (+0200)
Subject: a-textio.adb: Remove redundant test.
X-Git-Tag: releases/gcc-4.4.0~3054
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=22e37164351c791351207eeb65a8c07b098a5958;p=thirdparty%2Fgcc.git

a-textio.adb: Remove redundant test.

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

	* a-textio.adb: Remove redundant test.

From-SVN: r139280
---

diff --git a/gcc/ada/a-textio.adb b/gcc/ada/a-textio.adb
index cc5a93bb0762..d18da6533ce3 100644
--- a/gcc/ada/a-textio.adb
+++ b/gcc/ada/a-textio.adb
@@ -1856,7 +1856,7 @@ package body Ada.Text_IO is
       if Start = 0 then
          File.WC_Method := WCEM_Brackets;
 
-      elsif Start /= 0 then
+      else
          if Stop = Start then
             for J in WC_Encoding_Letters'Range loop
                if File.Form (Start) = WC_Encoding_Letters (J) then