Fix updating parameters when a value changes.
This commit is contained in:
@ -95,14 +95,15 @@ driver astrium_chopper = {
|
||||
"ASPEED" {
|
||||
if [string is double "${rhs}"] {
|
||||
set freq [expr "${rhs}" / 60.0]
|
||||
if { "[hval ${base}/frequency]" != "${freq}" } {
|
||||
if { "[hval ${base}/${lhs}]" != "${rhs}" } {
|
||||
hset ${base}/${lhs} "${rhs}"
|
||||
hset ${base}/frequency ${freq}
|
||||
}
|
||||
}
|
||||
}
|
||||
"RSPEED" - "APHASE" - "RPHASE" - "MASTER" {
|
||||
if { "[hval ${base}/${node}]" != "${rhs}" } {
|
||||
hset ${base}/${node} "${rhs}"
|
||||
if { "[hval ${base}/${lhs}]" != "${rhs}" } {
|
||||
hset ${base}/${lhs} "${rhs}"
|
||||
}
|
||||
}
|
||||
}
|
||||
|
@ -181,14 +181,15 @@ proc ::scobj::astrium_chopper::readState {tc_root} {
|
||||
"ASPEED" {
|
||||
if [string is double "${rhs}"] {
|
||||
set freq [expr "${rhs}" / 60.0]
|
||||
if { "[hval ${base}/frequency]" != "${freq}" } {
|
||||
if { "[hval ${base}/${lhs}]" != "${rhs}" } {
|
||||
hset ${base}/${lhs} "${rhs}"
|
||||
hset ${base}/frequency ${freq}
|
||||
}
|
||||
}
|
||||
}
|
||||
"RSPEED" - "APHASE" - "RPHASE" - "MASTER" {
|
||||
if { "[hval ${base}/${node}]" != "${rhs}" } {
|
||||
hset ${base}/${node} "${rhs}"
|
||||
if { "[hval ${base}/${lhs}]" != "${rhs}" } {
|
||||
hset ${base}/${lhs} "${rhs}"
|
||||
}
|
||||
}
|
||||
}
|
||||
|
Reference in New Issue
Block a user