Regenerate SCT drivers

This commit is contained in:
Douglas Clowes
2014-11-13 12:35:46 +11:00
parent 4b9ed0bf7f
commit 3450b4cbf9
42 changed files with 140 additions and 486 deletions

View File

@@ -63,8 +63,8 @@ proc add_agilent_33220A {name ip_address tcp_port} {
::scobj::agilent_33220A::add_driver ${name} "environment" ${simulation_flag} ${ip_address} ${tcp_port}
}
clientput "file evaluation of sct_agilent_33220A.tcl"
::scobj::agilent_33220A::sics_log 9 "file evaluation of sct_agilent_33220A.tcl"
clientput "file evaluation of agilent_33220A_sct.tcl"
::scobj::agilent_33220A::sics_log 9 "file evaluation of agilent_33220A_sct.tcl"
proc ::scobj::agilent_33220A::read_config {} {
set catch_status [ catch {
@@ -97,7 +97,7 @@ proc ::scobj::agilent_33220A::read_config {} {
}
if { [string equal -nocase [dict get $v "driver"] "agilent_33220A"] } {
::scobj::agilent_33220A::sics_log 9 "No sctcontroller for agilent_33220A"
${ns}::mkDriver sct_${name} ${device_class} ${simulation_flag} ${ip_address} ${tcp_port}
${ns}::mkDriver sct_${name} ${name} ${device_class} ${simulation_flag} ${ip_address} ${tcp_port}
}
}
}