From: Robert Dewar <dewar@adacore.com>
Date: Wed, 20 Aug 2008 12:34:46 +0000 (+0200)
Subject: a-ztexio.adb: Minor code reorganization Remove redundant test found working on anothe... 
X-Git-Tag: releases/gcc-4.4.0~3052
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=d045b07645aa858dfd6be481fcc17921d924b7b0;p=thirdparty%2Fgcc.git

a-ztexio.adb: Minor code reorganization Remove redundant test found working on another issue

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

	* a-ztexio.adb: Minor code reorganization
	Remove redundant test found working on another issue

From-SVN: r139282
---

diff --git a/gcc/ada/a-ztexio.adb b/gcc/ada/a-ztexio.adb
index 4bf70405c676..5c97ccd59b68 100644
--- a/gcc/ada/a-ztexio.adb
+++ b/gcc/ada/a-ztexio.adb
@@ -1552,7 +1552,7 @@ package body Ada.Wide_Wide_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