diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-09-26 10:42:09 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-09-26 10:42:09 +0000 |
| commit | da336b70c58a7eae86b0edd97c183503c25a9dd0 (patch) | |
| tree | 122d807b58819eca7af099f8147ccecdf1e42fad /gcc/ada/opt.ads | |
| parent | 2359306a95a08a4b7c34d1d9fc0ab34c1b4ed5d3 (diff) | |
| download | gcc-da336b70c58a7eae86b0edd97c183503c25a9dd0.tar.gz | |
2007-09-26 Thomas Quinot <quinot@adacore.com>
Sergey Rybin <rybin@adacore.com>
* gnatvsn.ads (PCS_Version_Number, ASIS_Version_Number): Removed.
* exp_dist.ads (PCS_Version_Number): Move from Gnatvsn to Exp_Dist,
where it belongs.
* opt.ads: Move ASIS_Version_Number from Gnatvsn into Tree_IO.
* rtsfind.adb (PCS_Version_Number): Move from Gnatvsn to Exp_Dist,
where it belongs.
* sem_dist.ads: Minor comment fix
* tree_io.ads: Move ASIS_Version_Number from Gnatvsn into Tree_IO.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@128783 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/opt.ads')
| -rw-r--r-- | gcc/ada/opt.ads | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/opt.ads b/gcc/ada/opt.ads index 7a105569cd0..d766e97abbe 100644 --- a/gcc/ada/opt.ads +++ b/gcc/ada/opt.ads @@ -1451,7 +1451,8 @@ package Opt is -- They are set by Tree_Read procedure, so they represent the version -- number (and the version string) of the compiler which has created the -- tree, and they are supposed to be compared with the corresponding values - -- from the Gnatvsn package which is a part of ASIS implementation. + -- from the Tree_IO and Gnatvsn packages which also are a part of ASIS + -- implementation. Tree_Version_String : String_Access; -- Used to store the compiler version string read from a tree file to check @@ -1464,7 +1465,7 @@ package Opt is Tree_ASIS_Version_Number : Int; -- Used to store the ASIS version number read from a tree file to check if - -- it is the same as stored in the ASIS version number in Gnatvsn. + -- it is the same as stored in the ASIS version number in Tree_IO. private |