Differences From Artifact [4cedd1bb42]:

• File unix/dltest/pkgua.c — part of check-in [44af621069] at 2022-08-29 19:56:09 on branch tip-626 — when compiling with TCL_NO_DEPRECATED, remove objProc interfaces (user: jan.nijtmans size: 8664) [more...]

To Artifact [a8c7c8b3c1]:

• File unix/dltest/pkgua.c — part of check-in [38f5d517dd] at 2023-03-05 00:43:34 on branch tip-626 — Merge 9.0 (user: jan.nijtmans size: 8669) [more...]

123
124
125
126
127
128
129
130
131
132
133
134
135
136
137

    void *dummy,		/* Not used. */
    Tcl_Interp *interp,		/* Current interpreter. */
    size_t objc,			/* Number of arguments. */
    Tcl_Obj *const objv[])	/* Argument objects. */
{
    int result;
    const char *str1, *str2;
    int len1, len2;
    (void)dummy;

    if (objc != 3) {
	Tcl_WrongNumArgs(interp, 1, objv,  "string1 string2");
	return TCL_ERROR;
    }

|

123
124
125
126
127
128
129
130
131
132
133
134
135
136
137

    void *dummy,		/* Not used. */
    Tcl_Interp *interp,		/* Current interpreter. */
    size_t objc,			/* Number of arguments. */
    Tcl_Obj *const objv[])	/* Argument objects. */
{
    int result;
    const char *str1, *str2;
    Tcl_Size len1, len2;
    (void)dummy;

    if (objc != 3) {
	Tcl_WrongNumArgs(interp, 1, objv,  "string1 string2");
	return TCL_ERROR;
    }