r146253 - in /trunk/gcc/ada: output.adb output....

[charlet@gcc.gnu.org]

Author: charlet
Date: Fri Apr 17 12:11:04 2009
New Revision: 146253

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=146253
Log:
2009-04-17  Bob Duff  <duff@adacore.com>

	* output.ads (Indent,Outdent): New procedures for indenting the output.
	(Write_Char): Correct comment -- LF _is_ allowed.

	* output.adb (Indent,Outdent): New procedures for indenting the output.
	Keep track of the indentation level, and make sure it doesn't get too
	high.
	(Flush_Buffer): Insert spaces at the beginning of each line, if
	indentation level is nonzero.
	(Save_Output_Buffer,Restore_Output_Buffer): Save and restore the current
	indentation level.
	(Set_Standard_Error,Set_Standard_Output): Remove superfluous
	"Next_Col := 1;".  Flush_Buffer does that.

	* sem_ch6.adb, sem_ch7.adb (Debug_Flag_C): Reorganize the output
	controlled by the -gnatdc switch. It now occurs on entry/exit to the
	relevant analysis routines, and calls Indent/Outdent to make the
	indentation reflect the nesting level.  Add "helper" routines, since
	otherwise lots of "return;" statements would skip the debugging output.


Modified:
    trunk/gcc/ada/output.adb
    trunk/gcc/ada/output.ads
    trunk/gcc/ada/sem_ch6.adb
    trunk/gcc/ada/sem_ch7.adb