diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-20 12:52:53 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-20 12:52:53 +0000 |
| commit | c2fcca8ad0076f15b7d6025df00332faca67385e (patch) | |
| tree | 2ab5e757720242b1e1b9f5f6052c4f646debc0e7 /gcc/ada/g-byorma.adb | |
| parent | 5807a51492d0d69dfc054b8950a6ddd84086d28e (diff) | |
| download | gcc-c2fcca8ad0076f15b7d6025df00332faca67385e.tar.gz | |
2008-05-20 Robert Dewar <dewar@adacore.com>
* g-byorma.adb, gnatlink.adb, prepcomp.adb, sinfo.ads,
sem_ch12.adb: Update comments. Minor reformatting.
* exp_ch2.adb: Typo
* s-unstyp.ads: Fixed some typos in comments.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135651 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/g-byorma.adb')
| -rwxr-xr-x | gcc/ada/g-byorma.adb | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/g-byorma.adb b/gcc/ada/g-byorma.adb index 6bbaedf8b71..7e355b041b5 100755 --- a/gcc/ada/g-byorma.adb +++ b/gcc/ada/g-byorma.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2006-2007, AdaCore -- +-- Copyright (C) 2006-2008, AdaCore -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -87,6 +87,7 @@ package body GNAT.Byte_Order_Mark is then Len := 2; BOM := UTF16_LE; + -- UTF-8 (endian-independent) elsif Str'Length >= 3 @@ -178,7 +179,7 @@ package body GNAT.Byte_Order_Mark is and then Str (Str'First + 2) = Character'Val (16#78#) and then Str (Str'First + 3) = Character'Val (16#6D#) then - -- Utf8, ASCII, some part of ISO8859, Shift-JIS, EUC,... + -- UTF-8, ASCII, some part of ISO8859, Shift-JIS, EUC,... Len := 0; BOM := Unknown; |