Chapter 5. Complete program listings.
CInterpreterStartup& rStartup,
CInterpreterCore& rCore)
{
CReadoutMain::SetupStateVariables(rExperiment, rStartup, rCore);
CStateVariableCommand& rCommand(*(rCore.getStateVariables()));
// Insert your code below this comment. Note that rCommand is the
// state variable command object.
}
/*!
Add user written commands in this function. User written commands
should be objects derived from CDAQTCLProcessor This will ensure that
command execution will be properly synchronized to the rest of the application.
\param rExperiment - CExperiment& the experiment object.
\param rStartup - CInterpreterStartup& the interpreter startup
object. Normally you will use this object
to locate the interpreter on which your commands
will be registered.
\param rCore - CInterpreterCore& the core TCL interpreter
add on functionality.
\note The base class creates key command extensions (e.g. begin) it is
important that the base class version of this function be called.
*/
void
CMyExperiment::AddUserCommands(CExperiment& rExperiment,
CInterpreterStartup& rStartup,
CInterpreterCore& rCore)
{
CReadoutMain::AddUserCommands(rExperiment, rStartup, rCore);
CTCLInterpreter& rInterp(rStartup.Interp());
// Add your command definitions after this comment. rInterp
// is a reference to the interpreter.
}
void* gpTCLApplication;
Example 5-4. Makefile
INSTDIR=/usr/opt/daq/8.1
# User makefile for the Production readout skeleton. Read the comments
# in the code below to know what you can modify.
#
include $(INSTDIR)/etc/ProductionReadout_Makefile.include
52
Comentários a estes Manuais