scuwdt : added common namespace to all common tcl commands.

Signed-off-by: Kishore Kumar Korathaluri <kkorath@xilinx.com>
This commit is contained in:
Kishore Kumar Korathaluri 2015-01-09 16:20:40 +05:30 committed by Nava kishore Manne
parent 99e4eae2fb
commit 046413f7f4

View file

@ -82,7 +82,7 @@ proc gen_init_code {swproj mhsinst} {
}
if {$swproj == 1} {
set ipname [get_property NAME $mhsinst]
set ipname [common::get_property NAME $mhsinst]
set decl " static XScuWdt ${ipname};"
set inc_file_lines $decl
return $inc_file_lines
@ -97,9 +97,9 @@ proc gen_testfunc_call {swproj mhsinst} {
return ""
}
set ipname [get_property NAME $mhsinst]
set ipname [common::get_property NAME $mhsinst]
set deviceid [::hsi::utils::get_ip_param_name $mhsinst "DEVICE_ID"]
set stdout [get_property CONFIG.STDOUT [hsi::get_os]]
set stdout [common::get_property CONFIG.STDOUT [hsi::get_os]]
if { $stdout == "" || $stdout == "none" } {
set hasStdout 0
} else {