diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-04 14:22:53 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-04 14:22:53 +0200 |
| commit | 8fb3f5dff914cbff3d5c05af08cf5690436533c2 (patch) | |
| tree | 0cfbb8f59922a461f56c82052ecb8d3fa97d3fa6 /gcc/ada/scos.ads | |
| parent | 428f80e65119aca0c7c03d5382d684dfdeaa7ac7 (diff) | |
| download | gcc-8fb3f5dff914cbff3d5c05af08cf5690436533c2.zip gcc-8fb3f5dff914cbff3d5c05af08cf5690436533c2.tar.gz gcc-8fb3f5dff914cbff3d5c05af08cf5690436533c2.tar.bz2 | |
[multiple changes]
2011-08-04 Emmanuel Briot <briot@adacore.com>
* make.adb: Remove debug trace.
2011-08-04 Vincent Celier <celier@adacore.com>
* makeutl.adb (Do_Complete): Get the absolute path name of a relative
path in canonical form, to be able to compare path names on platforms
such as Windows or Darwin.
2011-08-04 Thomas Quinot <quinot@adacore.com>
* par_sco.adb (Traverse_Declarations_Or_Statements.Set_Statement_Entry):
For a pragma (statement with C1 = 'P'), record the sloc of the pragma.
* scos.ads: Update documentation accordingly.
* put_scos.adb (Output_SCO_Line): Omit statement SCOs for disabled
pragmas.
From-SVN: r177369
Diffstat (limited to 'gcc/ada/scos.ads')
| -rw-r--r-- | gcc/ada/scos.ads | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/scos.ads b/gcc/ada/scos.ads index 4039e4e..8799fbc 100644 --- a/gcc/ada/scos.ads +++ b/gcc/ada/scos.ads @@ -355,8 +355,9 @@ package SCOs is Last : Boolean; Pragma_Sloc : Source_Ptr := No_Location; - -- For a SCO nested with a pragma Debug/Assert/PPC, location of pragma - -- (used for control of SCO output, value not recorded in ALI file). + -- For the statement SCO for a pragma, or for any expression SCO nested + -- in a pragma Debug/Assert/PPC, location of PRAGMA token (used for + -- control of SCO output, value not recorded in ALI file). end record; package SCO_Table is new GNAT.Table ( |