diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2025-06-24 08:02:26 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2025-06-24 08:02:26 (GMT) |
| commit | a570556b6e80ccedc54692c5eb8fbe63ca9e1ba3 (patch) | |
| tree | 06d0bdbada74e48229ebf38e93922a24aea2b37f /generic/tclBasic.c | |
| parent | 24a53e69200af0a4e5ba3f674f26168656b1b3fb (diff) | |
| download | tcl-a570556b6e80ccedc54692c5eb8fbe63ca9e1ba3.zip tcl-a570556b6e80ccedc54692c5eb8fbe63ca9e1ba3.tar.gz tcl-a570556b6e80ccedc54692c5eb8fbe63ca9e1ba3.tar.bz2 | |
Add [ledit] compilation, tweak safety conditions in [lpop] compiler
Diffstat (limited to 'generic/tclBasic.c')
| -rw-r--r-- | generic/tclBasic.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 34b454a..71a8dde 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -333,7 +333,7 @@ static const CmdInfo builtInCmds[] = { {"join", Tcl_JoinObjCmd, NULL, NULL, CMD_IS_SAFE}, {"lappend", Tcl_LappendObjCmd, TclCompileLappendCmd, NULL, CMD_IS_SAFE|CMD_COMPILES_EXPANDED}, {"lassign", Tcl_LassignObjCmd, TclCompileLassignCmd, NULL, CMD_IS_SAFE}, - {"ledit", Tcl_LeditObjCmd, NULL, NULL, CMD_IS_SAFE}, // TODO: compile + {"ledit", Tcl_LeditObjCmd, TclCompileLeditCmd, NULL, CMD_IS_SAFE}, {"lindex", Tcl_LindexObjCmd, TclCompileLindexCmd, NULL, CMD_IS_SAFE}, {"linsert", Tcl_LinsertObjCmd, TclCompileLinsertCmd, NULL, CMD_IS_SAFE}, {"list", Tcl_ListObjCmd, TclCompileListCmd, NULL, CMD_IS_SAFE|CMD_COMPILES_EXPANDED}, |