a55d2f0f7f
a connection during an active run. - Added an additional output mode for the connection in order to support the batch run editor. - Made clientput send everything with eWarning mode in order to support the batch run editor. - Added a better NetReadTillTerm - Fixed a problem in synchronize.c - Fixed an issue with reading empty line on normal connection sockets. - Added a psi scan mode to mesure.c for TRICS - Made motor print warnings when trying to reposition. - Fixed abug in hkl.c which cause wrong signs. SKIPPED: psi/el734driv.c psi/el734hp.c psi/el737driv.c psi/el737hpdriv.c psi/nextrics.c psi/nxamor.c psi/psi.c psi/slsmagnet.c psi/swmotor2.c psi/tasscan.c psi/tasutil.c
54 lines
2.2 KiB
C
54 lines
2.2 KiB
C
/*---------------------------------------------------------------------------
|
|
SICS is going to have a macro facility. I.E. it will be able to
|
|
evaluate command sequences specified in a file or from the command
|
|
line. John Ousterhouts Tcl will be used as the Macro language.
|
|
The SICS-objects will be accessed by redefining Tcl's "unknown"
|
|
mechanism. For documentation on Tcl and the programmers API to
|
|
Tcl see John Ousterhout's Book. No need to duplicate this here.
|
|
|
|
Mark Koennecke, November 1996
|
|
|
|
copyright: see implementation file.
|
|
|
|
---------------------------------------------------------------------------*/
|
|
#ifndef SICSMACRO
|
|
#define SICSMACRO
|
|
#include <tcl.h>
|
|
#include "SCinter.h"
|
|
|
|
Tcl_Interp *MacroInit(SicsInterp *pInter);
|
|
void MacroDelete(Tcl_Interp *pInter);
|
|
void WhereKill(void *pData);
|
|
|
|
int MacroEval(SConnection *pCon, SicsInterp *pSics, void *pData,
|
|
int argc, char *argv[]);
|
|
int MacroFileEval(SConnection *pCon, SicsInterp *pInter, void *pData,
|
|
int argc, char *argv[]);
|
|
int InternalFileEval(SConnection *pCon, SicsInterp *pInter, void *pData,
|
|
int argc, char *argv[]);
|
|
int MacroWhere(SConnection *pCon, SicsInterp *pInter, void *pData,
|
|
int argc, char *argv[]);
|
|
int ClientPut(SConnection *pCon, SicsInterp *pInter, void *pData,
|
|
int argc, char *argv[]);
|
|
int Broadcast(SConnection *pCon, SicsInterp *pInter, void *pData,
|
|
int argc, char *argv[]);
|
|
int TransactAction(SConnection *pCon, SicsInterp *pSics, void *pData,
|
|
int argc, char *argv[]);
|
|
|
|
int TclPublish(SConnection *pCon, SicsInterp *pInter, void *pData,
|
|
int argc, char *argv[]);
|
|
int AllowExec(SConnection *pCon, SicsInterp *pInter, void *pData,
|
|
int argc, char *argv[]);
|
|
|
|
/* for maintaining the Connection stack at Unknown. Should only be used
|
|
by SicsInterp module
|
|
*/
|
|
int MacroPush(SConnection *pCon);
|
|
int MacroPop(void);
|
|
|
|
|
|
#endif
|
|
|
|
|
|
|