Julabo sct driver to use @@NOREPLY@@
This commit is contained in:
@@ -94,14 +94,14 @@ driver julabo_lh45_gen = {
|
|||||||
# Put a space between command and param
|
# Put a space between command and param
|
||||||
set cmd "${cmd_str} ${par}"
|
set cmd "${cmd_str} ${par}"
|
||||||
# Hack to get a response
|
# Hack to get a response
|
||||||
set cmd "${cmd}\r\nversion"
|
set cmd "${cmd}@@NOREPLY@@"
|
||||||
%%}
|
%%}
|
||||||
|
|
||||||
code Write_function setValue = {%%
|
code Write_function setValue = {%%
|
||||||
# Put a space between command and param
|
# Put a space between command and param
|
||||||
set cmd "${cmd_str} ${par}"
|
set cmd "${cmd_str} ${par}"
|
||||||
# Hack to get a response
|
# Hack to get a response
|
||||||
set cmd "${cmd}\r\nversion"
|
set cmd "${cmd}@@NOREPLY@@"
|
||||||
%%}
|
%%}
|
||||||
#
|
#
|
||||||
# This code is after database creation
|
# This code is after database creation
|
||||||
|
|||||||
@@ -311,7 +311,7 @@ proc ::scobj::julabo_lh45_gen::setPoint {tc_root nextState cmd_str} {
|
|||||||
# Put a space between command and param
|
# Put a space between command and param
|
||||||
set cmd "${cmd_str} ${par}"
|
set cmd "${cmd_str} ${par}"
|
||||||
# Hack to get a response
|
# Hack to get a response
|
||||||
set cmd "${cmd}\r\nversion"
|
set cmd "${cmd}@@NOREPLY@@"
|
||||||
# setPoint hook code ends
|
# setPoint hook code ends
|
||||||
if { [hpropexists [sct] geterror] } {
|
if { [hpropexists [sct] geterror] } {
|
||||||
debug_log ${tc_root} 9 "[sct] error: [sct geterror]"
|
debug_log ${tc_root} 9 "[sct] error: [sct geterror]"
|
||||||
@@ -344,7 +344,7 @@ proc ::scobj::julabo_lh45_gen::setValue {tc_root nextState cmd_str} {
|
|||||||
# Put a space between command and param
|
# Put a space between command and param
|
||||||
set cmd "${cmd_str} ${par}"
|
set cmd "${cmd_str} ${par}"
|
||||||
# Hack to get a response
|
# Hack to get a response
|
||||||
set cmd "${cmd}\r\nversion"
|
set cmd "${cmd}@@NOREPLY@@"
|
||||||
# setValue hook code ends
|
# setValue hook code ends
|
||||||
if { [hpropexists [sct] geterror] } {
|
if { [hpropexists [sct] geterror] } {
|
||||||
debug_log ${tc_root} 9 "[sct] error: [sct geterror]"
|
debug_log ${tc_root} 9 "[sct] error: [sct geterror]"
|
||||||
|
|||||||
Reference in New Issue
Block a user