Differences From Artifact [2a9a5c8bac]:

• File unix/tclLoadDyld.c — part of check-in [70b6205548] at 2025-07-12 20:58:00 on branch c-std-update — Define TclPrintfResult() for common pattern in error generation. (user: dkf size: 15221) [more...]

To Artifact [113a895707]:

• File unix/tclLoadDyld.c — part of check-in [a29f1f8fab] at 2025-07-14 14:26:42 on branch c-std-update — TclSetErrorCode lets us avoid writing a lot of marker values (user: dkf size: 15204)

268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283

	Tcl_DStringFree(&newName);
#endif /* TCL_LOAD_FROM_MEMORY */
    }
    Tcl_DStringFree(&ds);
    if (errMsg && (interp != NULL)) {
	TclPrintfResult(interp, "cannot find symbol \"%s\": %s",
		symbol, errMsg);
	Tcl_SetErrorCode(interp, "TCL", "LOOKUP", "LOAD_SYMBOL", symbol,
		(char *)NULL);
    }
    return (void *)proc;
}

/*
 *----------------------------------------------------------------------
 *

|
<

268
269
270
271
272
273
274
275

276
277
278
279
280
281
282

	Tcl_DStringFree(&newName);
#endif /* TCL_LOAD_FROM_MEMORY */
    }
    Tcl_DStringFree(&ds);
    if (errMsg && (interp != NULL)) {
	TclPrintfResult(interp, "cannot find symbol \"%s\": %s",
		symbol, errMsg);
	TclSetErrorCode(interp, "TCL", "LOOKUP", "LOAD_SYMBOL", symbol);

    }
    return (void *)proc;
}

/*
 *----------------------------------------------------------------------
 *