Added motor_simulation flag. If true then the motor_configuration.tcl files should create ANSTO simulated motor drivers.
r1951 | ffr | 2007-05-10 13:21:51 +1000 (Thu, 10 May 2007) | 2 lines
This commit is contained in:
committed by
Douglas Clowes
parent
717f9beea7
commit
ebba5a8052
@@ -1,7 +1,7 @@
|
|||||||
# SICS common configuration
|
# SICS common configuration
|
||||||
|
|
||||||
# $Revision: 1.24 $
|
# $Revision: 1.25 $
|
||||||
# $Date: 2007-04-20 01:53:31 $
|
# $Date: 2007-05-10 03:21:51 $
|
||||||
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
|
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
|
||||||
# Last revision by $Author: ffr $
|
# Last revision by $Author: ffr $
|
||||||
|
|
||||||
@@ -52,7 +52,7 @@ sics_release [lindex $tmpstr [expr [llength $tmpstr] - 1]]
|
|||||||
sics_release lock
|
sics_release lock
|
||||||
|
|
||||||
VarMake sics_revision_num Text Internal
|
VarMake sics_revision_num Text Internal
|
||||||
set tmpstr [string map {"$" ""} {$Revision: 1.24 $}]
|
set tmpstr [string map {"$" ""} {$Revision: 1.25 $}]
|
||||||
sics_revision_num [lindex $tmpstr [expr [llength $tmpstr] - 1]]
|
sics_revision_num [lindex $tmpstr [expr [llength $tmpstr] - 1]]
|
||||||
sics_revision_num lock
|
sics_revision_num lock
|
||||||
|
|
||||||
@@ -86,10 +86,14 @@ hmm_simulation false
|
|||||||
VarMake counter_simulation Text Internal
|
VarMake counter_simulation Text Internal
|
||||||
counter_simulation false
|
counter_simulation false
|
||||||
|
|
||||||
|
VarMake motor_simulation Text Internal
|
||||||
|
motor_simulation false
|
||||||
|
|
||||||
VarMake sics_simulation Text Internal
|
VarMake sics_simulation Text Internal
|
||||||
sics_simulation false
|
sics_simulation false
|
||||||
|
|
||||||
if {[SplitReply [sics_simulation]] == "true"} {
|
if {[SplitReply [sics_simulation]] == "true"} {
|
||||||
hmm_simulation true
|
hmm_simulation true
|
||||||
counter_simulation true
|
counter_simulation true
|
||||||
|
motor_simulation true
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user