diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-10-10 15:19:59 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-10-10 15:19:59 (GMT) |
commit | f2b3bc2aa5ebb89635fdb896e9ec4f67bbff445c (patch) | |
tree | 908dd799f119d9d2429a502f80a9a93972980c9c /generic/tclIndexObj.c | |
parent | 3f7f7c5584f701f2fee77dc372b824b15b1a7739 (diff) | |
download | tcl-f2b3bc2aa5ebb89635fdb896e9ec4f67bbff445c.zip tcl-f2b3bc2aa5ebb89635fdb896e9ec4f67bbff445c.tar.gz tcl-f2b3bc2aa5ebb89635fdb896e9ec4f67bbff445c.tar.bz2 |
Use Tcl_ObjCmdProc in stead of full signature
Diffstat (limited to 'generic/tclIndexObj.c')
-rw-r--r-- | generic/tclIndexObj.c | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/generic/tclIndexObj.c b/generic/tclIndexObj.c index 70c50cd..79be731 100644 --- a/generic/tclIndexObj.c +++ b/generic/tclIndexObj.c @@ -25,15 +25,9 @@ static int GetIndexFromObjList(Tcl_Interp *interp, static void UpdateStringOfIndex(Tcl_Obj *objPtr); static void DupIndex(Tcl_Obj *srcPtr, Tcl_Obj *dupPtr); static void FreeIndex(Tcl_Obj *objPtr); -static int PrefixAllObjCmd(void *clientData, - Tcl_Interp *interp, int objc, - Tcl_Obj *const objv[]); -static int PrefixLongestObjCmd(void *clientData, - Tcl_Interp *interp, int objc, - Tcl_Obj *const objv[]); -static int PrefixMatchObjCmd(void *clientData, - Tcl_Interp *interp, int objc, - Tcl_Obj *const objv[]); +static Tcl_ObjCmdProc PrefixAllObjCmd; +static Tcl_ObjCmdProc PrefixLongestObjCmd; +static Tcl_ObjCmdProc PrefixMatchObjCmd; static void PrintUsage(Tcl_Interp *interp, const Tcl_ArgvInfo *argTable); |