diff options
author | joye <joye> | 2014-04-23 21:33:16 (GMT) |
---|---|---|
committer | joye <joye> | 2014-04-23 21:33:16 (GMT) |
commit | b3f411d7071668e8b88df080cd0bcf9a6b404a72 (patch) | |
tree | 07a458db7337a321e78e5be96c3f643ef882808b /src/bltGraph.C | |
parent | 3a1c83f619b77a3edd81ffd58b32fe914befc663 (diff) | |
download | blt-b3f411d7071668e8b88df080cd0bcf9a6b404a72.zip blt-b3f411d7071668e8b88df080cd0bcf9a6b404a72.tar.gz blt-b3f411d7071668e8b88df080cd0bcf9a6b404a72.tar.bz2 |
*** empty log message ***
Diffstat (limited to 'src/bltGraph.C')
-rw-r--r-- | src/bltGraph.C | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/src/bltGraph.C b/src/bltGraph.C index c0d415b..799dfcc 100644 --- a/src/bltGraph.C +++ b/src/bltGraph.C @@ -504,6 +504,25 @@ void Graph::extents(Region2d* regionPtr) regionPtr->bottom = (double)(vOffset_ + vRange_ + ops->yPad); } +int Graph::invoke(const TkEnsemble* ensemble, int cmdIndex, + int objc, Tcl_Obj* const objv[]) +{ + while (cmdIndex < objc) { + int index; + if (Tcl_GetIndexFromObjStruct(interp_, objv[cmdIndex], ensemble, sizeof(ensemble[0]), "command", 0, &index) != TCL_OK) + return TCL_ERROR; + + if (ensemble[index].proc) + return ensemble[index].proc(this, interp_, objc, objv); + + ensemble = ensemble[index].subensemble; + ++cmdIndex; + } + + Tcl_WrongNumArgs(interp_, cmdIndex, objv, "option ?arg ...?"); + return TCL_ERROR; +} + void Graph::reconfigure() { configure(); |