rem: Tcl_AppendResult(interp, "ns_sockpair() failed:  ",
add: Tcl_AppendResult(interp, "ns_sockpair failed:  ",
context: NsTclSocketPairCmd(ClientData dummy,Tcl_Interp *interp, int argc, char **argv){    SOCKET  socks[2];    char     buf[20];    int      result;    if (ns_sockpair(socks) != 0) {        Tcl_AppendResult(interp, "ns_sockpair() failed:  ", 			 SockError(interp), NULL);        return TCL_ERROR;    }    if (EnterSock(interp, socks[1]) != TCL_OK) {	ns_sockclose(socks[0]);	return TCL_ERROR;    }    strcpy(buf, interp->result);    result = EnterSock(interp, socks[0]);    if (result == TCL_OK) {    	Tcl_AppendElement(interp, buf);    }    return result;}