Commit 869b69b4 by Max Ostapenko Committed by Maxim Ostapenko

gcc-dg.exp (set-target-env-var): Change env to ::env.

gcc/testsuite/ChangeLog:

2014-09-03  Max Ostapenko  <m.ostapenko@partner.samsung.com>

	* lib/gcc-dg.exp (set-target-env-var): Change env to ::env.

From-SVN: r214846
parent 19c41621
2014-09-03 Max Ostapenko <m.ostapenko@partner.samsung.com>
* lib/gcc-dg.exp (set-target-env-var): Change env to ::env.
2014-09-03 Tobias Burnus <burnus@net-b.de> 2014-09-03 Tobias Burnus <burnus@net-b.de>
PR fortran/61881 PR fortran/61881
......
...@@ -300,8 +300,8 @@ proc set-target-env-var { } { ...@@ -300,8 +300,8 @@ proc set-target-env-var { } {
foreach env_var $set_target_env_var { foreach env_var $set_target_env_var {
set var [lindex $env_var 0] set var [lindex $env_var 0]
set value [lindex $env_var 1] set value [lindex $env_var 1]
if [info exists env($var)] { if [info exists ::env($var)] {
lappend saved_target_env_var [list $var 1 $env($var)] lappend saved_target_env_var [list $var 1 $::env($var)]
} else { } else {
lappend saved_target_env_var [list $var 0] lappend saved_target_env_var [list $var 0]
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment