]> git.ipfire.org Git - thirdparty/gcc.git/commit
Revert
authorebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 29 Apr 2009 23:10:21 +0000 (23:10 +0000)
committerebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 29 Apr 2009 23:10:21 +0000 (23:10 +0000)
commit465d2c29f2cac038c9bced6b4e5ff8d4cbb8b23d
tree1eb925fe9ac0daa64343cebeedf8d15f314f4a29
parent0aacee88c7ffff8e058168bf81abf7113ffc860d
Revert
2009-04-29  Vincent Celier  <celier@adacore.com>

* sinput-l.adb (Load_File): When preprocessing, set temporarily the
Source_File_Index_Table entries for the source, to avoid crash when
reporting an error.

* gnatcmd.adb (Test_If_Relative_Path): Use
Makeutl.Test_If_Relative_Path.

* makeutl.adb:(Test_If_Relative_Path): Process switches --RTS= only if
Including_RTS is True.

* makeutl.ads (Test_If_Relative_Path): New Boolean parameter
Including_RTS defaulted to False.

* sinput.ads, scans.ads, err_vars.ads: Initialize some variables with
a default value.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146991 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/ChangeLog
gcc/ada/err_vars.ads
gcc/ada/gnatcmd.adb
gcc/ada/makeutl.adb
gcc/ada/makeutl.ads
gcc/ada/scans.ads
gcc/ada/sinput-l.adb
gcc/ada/sinput.ads