diff options
| -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 1a4b0f5..cd25d41 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 |