Regen keysight

This commit is contained in:
Douglas Clowes
2014-12-12 15:24:50 +11:00
parent f09cf4d080
commit 2d4c725d10

View File

@ -752,7 +752,7 @@ namespace eval ::scobj::keysight_N8740A {
proc add_keysight_N8740A {name ip_address tcp_port} {
set simulation_flag "[string tolower [SplitReply [environment_simulation]]]"
::scobj::keysight_N8740A::add_driver ${name} "environment" ${simulation_flag} ${ip_address} ${tcp_port}
::scobj::keysight_N8740A::add_driver ${name} "instrument" ${simulation_flag} ${ip_address} ${tcp_port}
}
clientput "file evaluation of sct_keysight_N8740A.tcl"
@ -764,7 +764,7 @@ proc ::scobj::keysight_N8740A::read_config {} {
dict for {k u} $::config_dict {
if { [dict exists $u "implementation"] } {
set simulation_flag "[string tolower [SplitReply [environment_simulation]]]"
set device_class "environment"
set device_class "instrument"
if { !([dict exists $u "name"] && [dict exists $u "enabled"]) } {
continue
}