diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-20 12:34:09 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-20 12:34:09 +0000 |
| commit | 6adad96a601143fae332d26f2c152f2ff82d85c5 (patch) | |
| tree | 6c32ac304aa20811b36e34e53cbfe5d250ef97e1 /gcc/ada/a-witeio.adb | |
| parent | 0251cdd76845d1c4dc1aaa88e8882512208ae236 (diff) | |
| download | gcc-6adad96a601143fae332d26f2c152f2ff82d85c5.tar.gz | |
2008-08-20 Robert Dewar <dewar@adacore.com>
* a-witeio.adb: Minor code reorganization
Remove redundant test found working on another issue
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@139281 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-witeio.adb')
| -rw-r--r-- | gcc/ada/a-witeio.adb | 2 |
1 files changed, 1 insertions, 1 deletions
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 |