diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-10-10 12:38:44 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-10-10 12:38:44 +0000 |
| commit | ef95702258b9200341f41aa36b2c639f29201f4a (patch) | |
| tree | f6d8b6353875c6410d7322d14dc9a5694a443286 /gcc/ada/a-zchhan.adb | |
| parent | 4befb1a023b3eaa917101fe5eeb699d51f501762 (diff) | |
| download | gcc-ef95702258b9200341f41aa36b2c639f29201f4a.tar.gz | |
2013-10-10 Robert Dewar <dewar@adacore.com>
* sem_aggr.adb (Resolve_Array_Aggregate): Identify duplicated
cases.
2013-10-10 Robert Dewar <dewar@adacore.com>
* sem_ch9.adb (Analyze_Task_Body): Aspects are illegal
(Analyze_Protected_Body): Aspects are illegal.
2013-10-10 Robert Dewar <dewar@adacore.com>
* sem_ch6.adb, sem_ch13.adb: Minor reformatting.
* sem_case.adb (Check_Choices): Fix bad listing of missing
values from predicated subtype case (Check_Choices): List
duplicated values.
* errout.adb (Set_Msg_Text): Process warning tags in VMS mode
* erroutc.adb (Output_Msg_Text): Handle VMS warning tags
* gnat_ugn.texi: Document /WARNINGS=TAG_WARNINGS for VMS
* ug_words: Add entries for -gnatw.d and -gnatw.D
* vms_data.ads: Add [NO]TAG_WARNINGS for -gnatw.D/-gnatw.d
* lib-writ.ads: Documentation fixes
2013-10-10 Robert Dewar <dewar@adacore.com>
* a-wichha.adb, a-wichha.ads, a-zchhan.adb, a-zchhan.ads
(Is_Other_Format): New name for Is_Other.
(Is_Punctuation_Connector): New name for Is_Punctuation
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@203366 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-zchhan.adb')
| -rw-r--r-- | gcc/ada/a-zchhan.adb | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/gcc/ada/a-zchhan.adb b/gcc/ada/a-zchhan.adb index 483cfd9ec23..54db3ba8130 100644 --- a/gcc/ada/a-zchhan.adb +++ b/gcc/ada/a-zchhan.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2010-2012, Free Software Foundation, Inc. -- +-- Copyright (C) 2010-2013, Free Software Foundation, Inc. -- -- -- -- 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- -- @@ -108,18 +108,19 @@ package body Ada.Wide_Wide_Characters.Handling is function Is_Mark (Item : Wide_Wide_Character) return Boolean renames Ada.Wide_Wide_Characters.Unicode.Is_Mark; - -------------- - -- Is_Other -- - -------------- + --------------------- + -- Is_Other_Format -- + --------------------- - function Is_Other (Item : Wide_Wide_Character) return Boolean + function Is_Other_Format (Item : Wide_Wide_Character) return Boolean renames Ada.Wide_Wide_Characters.Unicode.Is_Other; - -------------------- - -- Is_Punctuation -- - -------------------- + ------------------------------ + -- Is_Punctuation_Connector -- + ------------------------------ - function Is_Punctuation (Item : Wide_Wide_Character) return Boolean + function Is_Punctuation_Connector + (Item : Wide_Wide_Character) return Boolean renames Ada.Wide_Wide_Characters.Unicode.Is_Punctuation; -------------- |