From 830f9af82a180d025f407aa1050f3ebc6c7f0a83 Mon Sep 17 00:00:00 2001 From: Robert Dewar Date: Wed, 20 Aug 2008 14:34:09 +0200 Subject: [PATCH] a-witeio.adb: Minor code reorganization Remove redundant test found working on another issue 2008-08-20 Robert Dewar * a-witeio.adb: Minor code reorganization Remove redundant test found working on another issue From-SVN: r139281 --- gcc/ada/a-witeio.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/ada/a-witeio.adb b/gcc/ada/a-witeio.adb index 1a4b0f5e0e7..cd25d411994 100644 --- a/gcc/ada/a-witeio.adb +++ b/gcc/ada/a-witeio.adb @@ -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 -- 2.30.2