Provide dummy histogram initialisation function.

This commit is contained in:
Ferdi Franceschini
2013-06-14 09:42:57 +10:00
parent 2d8d4864ef
commit 4f44b746ba
2 changed files with 11 additions and 15 deletions

View File

@@ -1,15 +1,11 @@
# Author Jing Chen (jgn@ansto.gove.au)
source $cfPath(hmm)/hmm_configuration_common_1.tcl
source $cfPath(hmm)/hmm_cylindrical_detector_configuration.tcl
set sim_mode [SplitReply [hmm_simulation]]
proc ::histogram_memory::init_OAT_TABLE {} {}
proc CAT_TABLE {args} {}
proc ::histogram_memory::init_CAT_TABLE {} {}
proc ::histogram_memory::pre_count {} {}
proc ::histogram_memory::post_count {} {}
proc ::histogram_memory::isc_initialize {} {}
proc histmem {cmd args} {}
# Author Ferdi Franceschini
namespace eval histogram_memory {
# Define HP_HMM to make nxscripts_common_1.tcl::nexus::process_filetype_policy happy when setting filetype=BEAM_MONITOR
set HP_HMM ""
# Define isc_initialize to give server_config.tcl:server_init something to call
proc isc_initialize {} {
}
proc set_sobj_attributes {} {
}
}

View File

@@ -44,7 +44,7 @@ fileeval $cfPath(source)/source.tcl
#fileeval $cfPath(motors)/extraconfig.tcl
fileeval $cfPath(plc)/plc.tcl
fileeval $cfPath(counter)/counter.tcl
#fileeval $cfPath(hmm)/hmm_configuration.tcl
fileeval $cfPath(hmm)/hmm_configuration.tcl
fileeval $cfPath(nexus)/nxscripts.tcl
fileeval $cfPath(scan)/scan.tcl
fileeval $cfPath(commands)/commands.tcl