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 cc5a93bb07624bf338e5067475707820cf1445a0..d18da6533ce3e0c5291354c2608ae4713b5df3ad 100644 (file)
--- 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