diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-07-15 14:20:34 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-07-15 14:20:34 (GMT) |
| commit | 9cc388df3d06570e47d68f284a74f4fa26b45426 (patch) | |
| tree | 52a96e15b9f1575a0f78c68c9fd56222bd5010c4 /generic/tclProc.c | |
| parent | ed70e9d86101ea6352b6623c9ca09ef68749abd9 (diff) | |
| download | tcl-9cc388df3d06570e47d68f284a74f4fa26b45426.zip tcl-9cc388df3d06570e47d68f284a74f4fa26b45426.tar.gz tcl-9cc388df3d06570e47d68f284a74f4fa26b45426.tar.bz2 | |
Remove unmaintained disabled speculative code.
Such things are for branches and history.
Diffstat (limited to 'generic/tclProc.c')
| -rw-r--r-- | generic/tclProc.c | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c index 81d3b25..bed520a 100644 --- a/generic/tclProc.c +++ b/generic/tclProc.c @@ -2654,30 +2654,6 @@ TclNRApplyObjCmd( procPtr = lambdaPtr->internalRep.twoPtrValue.ptr1; } -#define JOE_EXTENSION 0 -/* - * Note: this code is NOT FUNCTIONAL due to the NR implementation; DO NOT - * ENABLE! Leaving here as reminder to (a) TIP the suggestion, and (b) adapt - * the code. (MS) - */ - -#if JOE_EXTENSION - else { - /* - * Joe English's suggestion to allow cmdNames to function as lambdas. - */ - - Tcl_Obj *elemPtr; - int numElem; - - if ((lambdaPtr->typePtr == &tclCmdNameType) || - (TclListObjGetElements(interp, lambdaPtr, &numElem, - &elemPtr) == TCL_OK && numElem == 1)) { - return Tcl_EvalObjv(interp, objc-1, objv+1, 0); - } - } -#endif - if ((procPtr == NULL) || (procPtr->iPtr != iPtr)) { result = SetLambdaFromAny(interp, lambdaPtr); if (result != TCL_OK) { |