diff options
| author | Robert Dewar <dewar@adacore.com> | 2008-08-20 14:34:01 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-08-20 14:34:01 +0200 |
| commit | 22e37164351c791351207eeb65a8c07b098a5958 (patch) | |
| tree | 12c67a87f81b8473fc7bc0eb1288419b989a2a29 /gcc | |
| parent | 382d35e0dff85bc87fe03adfa8283090e7509f70 (diff) | |
| download | gcc-22e37164351c791351207eeb65a8c07b098a5958.zip gcc-22e37164351c791351207eeb65a8c07b098a5958.tar.gz gcc-22e37164351c791351207eeb65a8c07b098a5958.tar.bz2 | |
a-textio.adb: Remove redundant test.
2008-08-20 Robert Dewar <dewar@adacore.com>
* a-textio.adb: Remove redundant test.
From-SVN: r139280
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/a-textio.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/a-textio.adb b/gcc/ada/a-textio.adb index cc5a93b..d18da65 100644 --- 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 |