diff options
author | dgp <dgp@noemail.net> | 2013-02-25 16:41:46 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2013-02-25 16:41:46 (GMT) |
commit | b99e1439e32cd14aaaac923dc5d327f2fc02ffd4 (patch) | |
tree | 3f8a55faf330a9a983131443fcddde5f4c27f483 /generic/tclInterp.c | |
parent | 384331dc7fe2768f3a84558769697e2114a9c992 (diff) | |
parent | 44b07119af5a7852ce54e4f7d82a0b285206d826 (diff) | |
download | tcl-b99e1439e32cd14aaaac923dc5d327f2fc02ffd4.zip tcl-b99e1439e32cd14aaaac923dc5d327f2fc02ffd4.tar.gz tcl-b99e1439e32cd14aaaac923dc5d327f2fc02ffd4.tar.bz2 |
LimitHandler struct used only locally. Remove from tclInt.h
FossilOrigin-Name: bf6457d2fe2434cce679211c3a0c94bb5ed2d5d3
Diffstat (limited to 'generic/tclInterp.c')
-rw-r--r-- | generic/tclInterp.c | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/generic/tclInterp.c b/generic/tclInterp.c index d5d43ed..1a4297b 100644 --- a/generic/tclInterp.c +++ b/generic/tclInterp.c @@ -179,6 +179,37 @@ typedef struct ScriptLimitCallbackKey { } ScriptLimitCallbackKey; /* + * TIP#143 limit handler internal representation. + */ + +struct LimitHandler { + int flags; /* The state of this particular handler. */ + Tcl_LimitHandlerProc *handlerProc; + /* The handler callback. */ + ClientData clientData; /* Opaque argument to the handler callback. */ + Tcl_LimitHandlerDeleteProc *deleteProc; + /* How to delete the clientData. */ + LimitHandler *prevPtr; /* Previous item in linked list of + * handlers. */ + LimitHandler *nextPtr; /* Next item in linked list of handlers. */ +}; + +/* + * Values for the LimitHandler flags field. + * LIMIT_HANDLER_ACTIVE - Whether the handler is currently being + * processed; handlers are never to be entered reentrantly. + * LIMIT_HANDLER_DELETED - Whether the handler has been deleted. This + * should not normally be observed because when a handler is + * deleted it is also spliced out of the list of handlers, but + * even so we will be careful. + */ + +#define LIMIT_HANDLER_ACTIVE 0x01 +#define LIMIT_HANDLER_DELETED 0x02 + + + +/* * Prototypes for local static functions: */ |