diff options
| author | twylite <twylite@crypt.co.za> | 2012-08-08 15:34:13 (GMT) |
|---|---|---|
| committer | twylite <twylite@crypt.co.za> | 2012-08-08 15:34:13 (GMT) |
| commit | dadccca81c83f99bae348c4caecf3a90270e7e6a (patch) | |
| tree | 6fda988586dcaee0b69cbec1daac7aa742d6d97d /generic/tclCmdAH.c | |
| parent | 540f62b18de23e912d85b8b0fe9ea4f35dda0d2b (diff) | |
| download | tcl-dadccca81c83f99bae348c4caecf3a90270e7e6a.zip tcl-dadccca81c83f99bae348c4caecf3a90270e7e6a.tar.gz tcl-dadccca81c83f99bae348c4caecf3a90270e7e6a.tar.bz2 | |
Rename 'mapeach' to 'lmap' per preferred alternative in TIP #405.
Diffstat (limited to 'generic/tclCmdAH.c')
| -rw-r--r-- | generic/tclCmdAH.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclCmdAH.c b/generic/tclCmdAH.c index a10646c..9ebdf21 100644 --- a/generic/tclCmdAH.c +++ b/generic/tclCmdAH.c @@ -2599,17 +2599,17 @@ TclNRForeachCmd( } int -Tcl_MapeachObjCmd( +Tcl_LmapObjCmd( ClientData dummy, /* Not used. */ Tcl_Interp *interp, /* Current interpreter. */ int objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument objects. */ { - return Tcl_NRCallObjProc(interp, TclNRMapeachCmd, dummy, objc, objv); + return Tcl_NRCallObjProc(interp, TclNRLmapCmd, dummy, objc, objv); } int -TclNRMapeachCmd( +TclNRLmapCmd( ClientData dummy, Tcl_Interp *interp, int objc, |