diff options
| -rw-r--r-- | ChangeLog | 10 | ||||
| -rw-r--r-- | generic/tclTest.c | 6 |
2 files changed, 13 insertions, 3 deletions
@@ -1,3 +1,13 @@ +2011-10-20 Donal K. Fellows <dkf@users.sf.net> + + * generic/tclLiteral.c (TclInvalidateCmdLiteral): [Bug 3418547]: + Additional code for handling the invalidation of literals. + * generic/tclBasic.c (Tcl_CreateObjCommand, Tcl_CreateCommand) + (TclRenameCommand, Tcl_ExposeCommand): The four additional places that + need extra care when dealing with literals. + * generic/tclTest.c (TestInterpResolverCmd): Additional test machinery + for interpreter resolvers. + 2011-10-15 Venkat Iyer <venkat@comit.com> * library/tzdata/America/Sitka : Update to Olson's tzdata2011l * library/tzdata/Pacific/Fiji diff --git a/generic/tclTest.c b/generic/tclTest.c index 4027816..86941c6 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -411,7 +411,7 @@ static int TestHashSystemHashCmd(ClientData clientData, static int TestNRELevels(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); -static int TestInterpResolversCmd(ClientData clientData, +static int TestInterpResolverCmd(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); @@ -678,7 +678,7 @@ Tcltest_Init( Tcl_CreateObjCommand(interp, "testnrelevels", TestNRELevels, NULL, NULL); - Tcl_CreateObjCommand(interp, "testinterpresolver", TestInterpResolversCmd, + Tcl_CreateObjCommand(interp, "testinterpresolver", TestInterpResolverCmd, NULL, NULL); if (TclObjTest_Init(interp) != TCL_OK) { @@ -7288,7 +7288,7 @@ InterpCompiledVarResolver( } static int -TestInterpResolversCmd( +TestInterpResolverCmd( ClientData clientData, Tcl_Interp *interp, int objc, |