diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-23 10:03:21 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-23 10:03:21 +0000 |
commit | b47769f02552bcf4838e3033bb8bc669fe97435b (patch) | |
tree | 7ae7fba8e94011dd7ba6c2ee0a68fee53e23528e /gcc/ada/scos.ads | |
parent | bea860118d85296b9f6e5e00e7f6f7bf120fff76 (diff) | |
download | gcc-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.ads | 11 |
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 |