diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-02-06 11:11:07 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-02-06 11:11:07 +0100 |
| commit | a0367a97c5b4c714b43066ea44c66333f0526056 (patch) | |
| tree | fa134c2379a030767243524185079b49ece51c23 /gcc/ada/output.ads | |
| parent | ce3904da34e70f926123e730107380dede9353d3 (diff) | |
| download | gcc-a0367a97c5b4c714b43066ea44c66333f0526056.zip gcc-a0367a97c5b4c714b43066ea44c66333f0526056.tar.gz gcc-a0367a97c5b4c714b43066ea44c66333f0526056.tar.bz2 | |
[multiple changes]
2014-02-06 Pascal Obry <obry@adacore.com>
* prj-util.adb (For_Interface_Sources): Fix handling of required
bodies for aggregate libs.
2014-02-06 Robert Dewar <dewar@adacore.com>
* nlists.ads: Minor comment clarifications.
2014-02-06 Robert Dewar <dewar@adacore.com>
* gnat1drv.adb (Adjust_Global_Switches): Set Modify_Tree_For_C
if gnatd.V set.
* opt.ads (Modify_Tree_For_C): New flag.
* output.ads, output.adb (Last_Char): New function.
2014-02-06 Pascal Obry <obry@adacore.com>
* projects.texi, prj-env.adb (Initialize_Default_Project_Path): Add
share/gpr for cross-builds.
From-SVN: r207542
Diffstat (limited to 'gcc/ada/output.ads')
| -rw-r--r-- | gcc/ada/output.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/output.ads b/gcc/ada/output.ads index bcbca57..715a26a 100644 --- a/gcc/ada/output.ads +++ b/gcc/ada/output.ads @@ -137,6 +137,10 @@ package Output is procedure Write_Line (S : String); -- Equivalent to Write_Str (S) followed by Write_Eol; + function Last_Char return Character; + -- Returns last character written on the current line, or null if the + -- current line is (so far) empty. + function Column return Pos; pragma Inline (Column); -- Returns the number of the column about to be written (e.g. a value of 1 |