diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-12-12 12:49:31 +0100 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-12-12 12:49:31 +0100 |
commit | ee1a757231c05815f7e2f9e5e0ced98b380c0416 (patch) | |
tree | c5a05d81342446366f864e0be7b46fe5f6196617 /gcc/ada/treepr.ads | |
parent | e8bd500e2dcdfdd5f798e403662942d0dc3d6a86 (diff) | |
download | gcc-ee1a757231c05815f7e2f9e5e0ced98b380c0416.zip gcc-ee1a757231c05815f7e2f9e5e0ced98b380c0416.tar.gz gcc-ee1a757231c05815f7e2f9e5e0ced98b380c0416.tar.bz2 |
[multiple changes]
2011-12-12 Thomas Quinot <quinot@adacore.com>
* exp_disp.adb: Minor reformatting.
2011-12-12 Tristan Gingold <gingold@adacore.com>
* gnatls.adb (Search_RTS): New procedure.
(Scan_Ls_Arg): Move code that search the RTS.
(Gnatls): search the RTS later.
* prj-env.ads, prj-env.adb (Get_Runtime_Path): New function.
2011-12-12 Ed Falis <falis@adacore.com>
* sysdep.c: Fix treatment of VxWorks task options so that run-times
built with __SPE__ get option VX_SPE_TASK while others get VX_FP_TASK.
2011-12-12 Bob Duff <duff@adacore.com>
* sem_type.adb, sem_type.ads, sem_ch4.adb, treepr.adb, treepr.ads:
Minor cleanup and fiddling with debug printouts.
2011-12-12 Vincent Celier <celier@adacore.com>
* prj-nmsc.adb (Get_Directories): For a non extending project,
always get a declared object and/or exec directory if it already
exists, even when there are no sources, but do not create them.
2011-12-12 Bob Duff <duff@adacore.com>
* sem_res.adb (Resolve): Deal with the case where an abstract
operator is called with operands of type universal_integer.
2011-12-12 Thomas Quinot <quinot@adacore.com>
* par_sco.adb: Minor fix to dominance marker referencing WHILE
decision.
From-SVN: r182227
Diffstat (limited to 'gcc/ada/treepr.ads')
-rw-r--r-- | gcc/ada/treepr.ads | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/ada/treepr.ads b/gcc/ada/treepr.ads index 683eb0d..6e9541a 100644 --- a/gcc/ada/treepr.ads +++ b/gcc/ada/treepr.ads @@ -37,6 +37,9 @@ package Treepr is -- Prints a single tree node, without printing descendants. The Label -- string is used to preface each line of the printed output. + procedure Print_Node_Briefly (N : Node_Id); + -- Terse version of Print_Tree_Node + procedure Print_Tree_List (L : List_Id); -- Prints a single node list, without printing the descendants of any -- of the nodes in the list |