summaryrefslogtreecommitdiff
path: root/gcc/ada/scos.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-07-23 10:03:21 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-07-23 10:03:21 +0000
commitb47769f02552bcf4838e3033bb8bc669fe97435b (patch)
tree7ae7fba8e94011dd7ba6c2ee0a68fee53e23528e /gcc/ada/scos.ads
parentbea860118d85296b9f6e5e00e7f6f7bf120fff76 (diff)
downloadgcc-b47769f02552bcf4838e3033bb8bc669fe97435b.tar.gz
2009-07-23 Arnaud Charlet <charlet@adacore.com>
* a-convec.adb: Add comments about suspicious/subtle code. 2009-07-23 Ed Schonberg <schonberg@adacore.com> * einfo.ads: Document use of Alias in private overriding 2009-07-23 Thomas Quinot <quinot@adacore.com> * sem_ch13.adb (Analyze_Attribute_Definition_Clause): For the case of an array type, propagate alignment from first subtype to implicit base type so that other subtypes (such as the itypes for aggregates of the type) also receive the expected alignment. * g-comlin.ads: Minor documentation clarification/rewording. * scos.ads: Minor comments update. * lib-writ.ads: Minor reformatting git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@149991 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/scos.ads')
-rw-r--r--gcc/ada/scos.ads11
1 files changed, 7 insertions, 4 deletions
diff --git a/gcc/ada/scos.ads b/gcc/ada/scos.ads
index b1d99e169fa..fa039a5f5fe 100644
--- a/gcc/ada/scos.ads
+++ b/gcc/ada/scos.ads
@@ -86,6 +86,9 @@ package SCOs is
-- a Source_Reference pragma was encountered (since all line number
-- references will be with respect to the original file).
+ -- Isn't the filename indication redundant, since we can look it up
+ -- from the D line???
+
-- Statements
-- For the purpose of SCO generation, the notion of statement includes
@@ -253,15 +256,15 @@ package SCOs is
-- Complex Decision
-- C1 = 'I', 'E', 'W', 'X' (if/exit/while/expression)
-- C2 = ' '
- -- From = No_Location
- -- To = No_Location
+ -- From = No_Source_Location
+ -- To = No_Source_Location
-- Last = False
-- Operator
-- C1 = '!', '^', '&', '|'
-- C2 = ' '
- -- From = No_Location
- -- To = No_Location
+ -- From = No_Source_Location
+ -- To = No_Source_Location
-- Last = False
-- Element