pluto_hdl_adi/projects/scripts/adi_env.tcl

18 lines
451 B
Tcl

# environment related stuff
set ad_hdl_dir [file normalize [file join [file dirname [info script]] "../.."]]
# assuming that ghdl is cloned next to hdl repository
set ad_ghdl_dir [file normalize [file join [file dirname [info script]] "../../../ghdl"]]
if [info exists ::env(ADI_HDL_DIR)] {
set ad_hdl_dir [file normalize $::env(ADI_HDL_DIR)]
}
if [info exists ::env(ADI_GHDL_DIR)] {
set ad_ghdl_dir [file normalize $::env(ADI_GHDL_DIR)]
}