linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Regen keysight

Browse Source
This commit is contained in:
Douglas Clowes
2014-12-12 15:24:50 +11:00
parent f09cf4d080
commit 2d4c725d10
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
site_ansto/instrument/config/environment/sct_keysight_N8740A.tcl
View File

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