diff options
| author | Thomas Quinot <quinot@adacore.com> | 2009-04-20 09:44:10 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-20 11:44:10 +0200 |
| commit | 7e728b0f0d131c8f9016b89a08f77e4f6479cbbb (patch) | |
| tree | b49e8db45c4f24e5ecfeee5550af7e826a984c83 /gcc/ada/output.adb | |
| parent | 5e39baa64cbb9805c30d16d391b3ad446a36ffe7 (diff) | |
| download | gcc-7e728b0f0d131c8f9016b89a08f77e4f6479cbbb.zip gcc-7e728b0f0d131c8f9016b89a08f77e4f6479cbbb.tar.gz gcc-7e728b0f0d131c8f9016b89a08f77e4f6479cbbb.tar.bz2 | |
s-taprop-irix.adb, [...]: Minor reformatting.
2009-04-20 Thomas Quinot <quinot@adacore.com>
* s-taprop-irix.adb, s-taprop-tru64.adb, s-taprop-vms.adb,
output.adb, output.ads, s-taprop-hpux-dce.adb,
s-taprop-linux.adb, s-taprop-solaris.adb, s-taprop-posix.adb: Minor
reformatting.
From-SVN: r146388
Diffstat (limited to 'gcc/ada/output.adb')
| -rw-r--r-- | gcc/ada/output.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/output.adb b/gcc/ada/output.adb index 5208daf..851f118 100644 --- a/gcc/ada/output.adb +++ b/gcc/ada/output.adb @@ -45,6 +45,7 @@ package body Output is Indentation_Limit : constant Positive := 40; -- Indentation beyond this number of spaces wraps around + pragma Assert (Indentation_Limit < Buffer_Max / 2); -- Make sure this is substantially shorter than the line length @@ -163,7 +164,7 @@ package body Output is begin Cur_Indentation := (Cur_Indentation + Indentation_Amount) mod Indentation_Limit; - -- The "mod" is to wrap around in case there's too much indentation. + -- The "mod" is to wrap around in case there's too much indentation end Indent; ------------- |