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

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

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

From-SVN: r139281
This commit is contained in:
Robert Dewar 2008-08-20 14:34:09 +02:00 committed by Arnaud Charlet
parent 22e3716435
commit 830f9af82a

View file

@ -1552,7 +1552,7 @@ package body Ada.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