in tcl_cmds.c [1476:1486]
int cmd_read_post(ClientData cd, Tcl_Interp *ixx, int objc, Tcl_Obj *CONST objv[])
{
if (read_post_init(_r, interp) != OK) {
ap_log_error(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, _r->server, "cmd_read_post(...): read failed");
Tcl_AddErrorInfo(interp, "read failed");
return TCL_ERROR;
}
return TCL_OK;
}