From: Max Ostapenko <m.ostapenko@partner.samsung.com>
Date: Wed, 3 Sep 2014 07:16:30 +0000 (+0300)
Subject: gcc-dg.exp (set-target-env-var): Change env to ::env.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=869b69b4e923b2c859ca1d687ab0456e9aa66bd5;p=gcc.git

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
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 51a8ca324b3..27d3ae70fac 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+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>
 
 	PR fortran/61881
diff --git a/gcc/testsuite/lib/gcc-dg.exp b/gcc/testsuite/lib/gcc-dg.exp
index dfdb25710a8..a0d1e7ddde9 100644
--- a/gcc/testsuite/lib/gcc-dg.exp
+++ b/gcc/testsuite/lib/gcc-dg.exp
@@ -300,8 +300,8 @@ proc set-target-env-var { } {
     foreach env_var $set_target_env_var {
 	set var [lindex $env_var 0]
 	set value [lindex $env_var 1]
-	if [info exists env($var)] {
-	    lappend saved_target_env_var [list $var 1 $env($var)]
+	if [info exists ::env($var)] {
+	    lappend saved_target_env_var [list $var 1 $::env($var)]
 	} else {
 	    lappend saved_target_env_var [list $var 0]
 	}