diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-01-27 11:37:20 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-01-27 11:37:20 +0000 |
commit | 2620467d87840b3ff231f0150c10c3a7b9167460 (patch) | |
tree | a7212caa578ac383bb2233f213ce576653449b4a /gcc/ada/sinput.ads | |
parent | 0b0aa19df10c7564549789953999aea98346be56 (diff) | |
download | gcc-2620467d87840b3ff231f0150c10c3a7b9167460.tar.gz |
2010-01-27 Robert Dewar <dewar@adacore.com>
* sinput.ads, sinput.adb (Sloc_Range): Applies to all nodes, formal
changed from Expr to N.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@156278 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sinput.ads')
-rw-r--r-- | gcc/ada/sinput.ads | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/sinput.ads b/gcc/ada/sinput.ads index 945d26e7d4a..4f235162c8f 100644 --- a/gcc/ada/sinput.ads +++ b/gcc/ada/sinput.ads @@ -595,10 +595,10 @@ package Sinput is -- makes sure that the lines table for the current source file has an -- appropriate entry for the start of the new physical line. - procedure Sloc_Range (Expr : Node_Id; Min, Max : out Source_Ptr); - -- Given a node for a subexpression, returns the minimum and maximum source - -- locations of any node in the expression subtree. This is not quite the - -- same as the locations of the first and last token in the expresion + procedure Sloc_Range (N : Node_Id; Min, Max : out Source_Ptr); + -- Given a node, returns the minimum and maximum source locations of any + -- node in the syntactic subtree for the node. This is not quite the same + -- as the locations of the first and last token in the node construct -- because parentheses at the outer level do not have a recorded Sloc. -- -- Note: if the tree for the expression contains no "real" Sloc values, |