From 72f3806f11e1b3f57c41050c0c3a484f1fa1e0e9 Mon Sep 17 00:00:00 2001 From: Kishore Kumar Korathaluri Date: Mon, 5 Jan 2015 14:55:53 +0530 Subject: [PATCH] emacps : added namespace for all HSI TCL commands. Signed-off-by: Kishore Kumar Korathaluri --- XilinxProcessorIPLib/drivers/emacps/data/emacps.tcl | 12 ++++++------ .../drivers/emacps/data/emacps_tapp.tcl | 2 +- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/XilinxProcessorIPLib/drivers/emacps/data/emacps.tcl b/XilinxProcessorIPLib/drivers/emacps/data/emacps.tcl index c2ca38b2..420e35d4 100755 --- a/XilinxProcessorIPLib/drivers/emacps/data/emacps.tcl +++ b/XilinxProcessorIPLib/drivers/emacps/data/emacps.tcl @@ -65,7 +65,7 @@ proc generate {drv_handle} { proc generate_gmii2rgmii_params {drv_handle file_name} { set file_handle [::hsi::utils::open_include_file $file_name] - set ips [get_cells "*"] + set ips [hsi::get_cells "*"] foreach ip $ips { set ipname [get_property NAME $ip] set periph [get_property IP_NAME $ip] @@ -94,7 +94,7 @@ proc is_gmii2rgmii_conv_present {slave} { set port_value 0 set phy_addr 0 set ipconv 0 - set ips [get_cells "*"] + set ips [hsi::get_cells "*"] set enetipinstance_name [get_property NAME $slave] foreach ip $ips { @@ -106,7 +106,7 @@ proc is_gmii2rgmii_conv_present {slave} { } } if { $ipconv != 0 } { - set port_value [get_pins -of_objects [get_nets -of_objects [get_pins -of_objects $ipconv gmii_txd]]] + set port_value [hsi::get_pins -of_objects [hsi::get_nets -of_objects [hsi::get_pins -of_objects $ipconv gmii_txd]]] if { $port_value != 0 } { set tmp [string first "ENET0" $port_value] if { $tmp >= 0 } { @@ -136,7 +136,7 @@ proc is_gmii2rgmii_conv_present {slave} { proc generate_sgmii_params {drv_handle file_name} { set file_handle [::hsi::utils::open_include_file $file_name] - set ips [get_cells "*"] + set ips [hsi::get_cells "*"] foreach ip $ips { set ipname [get_property NAME $ip] @@ -172,7 +172,7 @@ proc is_gige_pcs_pma_ip_present {slave} { set phy_addr 0 set ipconv 0 - set ips [get_cells "*"] + set ips [hsi::get_cells "*"] set enetipinstance_name [get_property IP_NAME $slave] foreach ip $ips { @@ -189,7 +189,7 @@ proc is_gige_pcs_pma_ip_present {slave} { } if { $ipconv != 0 } { - set port_value [get_pins -of_objects [get_nets -of_objects [get_pins -of_objects $ipconv gmii_txd]]] + set port_value [hsi::get_pins -of_objects [hsi::get_nets -of_objects [hsi::get_pins -of_objects $ipconv gmii_txd]]] if { $port_value != 0 } { set tmp [string first "ENET0" $port_value] if { $tmp >= 0 } { diff --git a/XilinxProcessorIPLib/drivers/emacps/data/emacps_tapp.tcl b/XilinxProcessorIPLib/drivers/emacps/data/emacps_tapp.tcl index 921da65a..5738d195 100755 --- a/XilinxProcessorIPLib/drivers/emacps/data/emacps_tapp.tcl +++ b/XilinxProcessorIPLib/drivers/emacps/data/emacps_tapp.tcl @@ -100,7 +100,7 @@ proc gen_testfunc_call {swproj mhsinst} { set ipname [get_property NAME $mhsinst] set deviceid [::hsi::utils::get_ip_param_name $mhsinst "DEVICE_ID"] - set stdout [get_property CONFIG.STDOUT [get_os]] + set stdout [get_property CONFIG.STDOUT [hsi::get_os]] if { $stdout == "" || $stdout == "none" } { set hasStdout 0 } else {