diff options
| author | Robert Dewar <dewar@adacore.com> | 2005-06-16 10:45:19 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2005-06-16 10:45:19 +0200 |
| commit | 357ac4df50fc0c22a5cee64bee133b4f2fdfba38 (patch) | |
| tree | 5b916e5fc59de413560d104b03f3d24bb616e5c5 /gcc/ada/style.ads | |
| parent | 38d7a13afcafa6d5b53ec2caa8d2d9eda1989152 (diff) | |
| download | gcc-357ac4df50fc0c22a5cee64bee133b4f2fdfba38.zip gcc-357ac4df50fc0c22a5cee64bee133b4f2fdfba38.tar.gz gcc-357ac4df50fc0c22a5cee64bee133b4f2fdfba38.tar.bz2 | |
scng.adb: Add call to new Check_EOF routine
2005-06-14 Robert Dewar <dewar@adacore.com>
* scng.adb: Add call to new Check_EOF routine
(Accumulate_Checksum): Properly handle wide wide char >= 2 ** 24
Add some comments regarding wide character handling
* style.ads, styleg.ads, styleg.adb: Implement new style switch -gnatyu
* stylesw.ads, stylesw.adb: Implement new style switch -gnatyu
* g-utf_32.ads, g-utf_32.adb (Is_UTF_32_Non_Graphic): Other_Format
characters are now considered graphic characters and hence yield false
in this call.
From-SVN: r101056
Diffstat (limited to 'gcc/ada/style.ads')
| -rw-r--r-- | gcc/ada/style.ads | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/style.ads b/gcc/ada/style.ads index c7a46ed..324cd0f 100644 --- a/gcc/ada/style.ads +++ b/gcc/ada/style.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2004 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2005 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- -- @@ -111,6 +111,10 @@ package Style is renames Style_Inst.Check_Dot_Dot; -- Called after scanning out dot dot to check spacing + procedure Check_EOF + renames Style_Inst.Check_EOF; + -- Called after scanning out end of file mark + procedure Check_HT renames Style_Inst.Check_HT; -- Called with Scan_Ptr pointing to a horizontal tab character |