scripts/adi_env.tcl: Add export of ADI_HDL_DIR

hadarauelena · hadarauelena · commit c7e7abaa541d · 2025-09-24T17:18:56.000+03:00
Export the ADI_HDL_DIR environment variable so scripts like gtwiz_parser.pl can access it to locate required HDL files.
diff --git a/scripts/adi_env.tcl b/scripts/adi_env.tcl
@@ -8,6 +8,8 @@ set ad_hdl_dir [file normalize [file join [file dirname [info script]] "../"]]
 
 if [info exists ::env(ADI_HDL_DIR)] {
   set ad_hdl_dir [file normalize $::env(ADI_HDL_DIR)]
+} else {
+  set env(ADI_HDL_DIR) $ad_hdl_dir
 }
 
 if [info exists ::env(ADI_GHDL_DIR)] {

Original file line number	Diff line number	Diff line change
`@@ -8,6 +8,8 @@ set ad_hdl_dir [file normalize [file join [file dirname [info script]] "../"]]`
`8`	`8`
`9`	`9`	`if [info exists ::env(ADI_HDL_DIR)] {`
`10`	`10`	`set ad_hdl_dir [file normalize $::env(ADI_HDL_DIR)]`
	`11`	`+} else {`
	`12`	`+ set env(ADI_HDL_DIR) $ad_hdl_dir`
`11`	`13`	`}`
`12`	`14`
`13`	`15`	`if [info exists ::env(ADI_GHDL_DIR)] {`