From db6af6358363b3cf1d2cf2b6d931cd8cb17aa3f4 Mon Sep 17 00:00:00 2001
From: Laszlo Nagy <laszlo.nagy@analog.com>
Date: Fri, 15 May 2020 07:42:50 +0100
Subject: [PATCH] scripts/adi_env.tcl: print in logs system variables are used

---
 projects/scripts/adi_env.tcl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/projects/scripts/adi_env.tcl b/projects/scripts/adi_env.tcl
index 8e8fb63d0..694508a9c 100644
--- a/projects/scripts/adi_env.tcl
+++ b/projects/scripts/adi_env.tcl
@@ -22,6 +22,7 @@ if [info exists ::env(ADI_GHDL_DIR)] {
 #  default_value - returned vale in case environment variable does not exists
 proc get_env_param {name default_value} {
   if [info exists ::env($name)] {
+    puts "Getting from environment the parameter: $name=$::env($name) "
     return $::env($name)
   } else {
     return $default_value