fprintf(stderr, "Write data, %d bytes\n", len);
static int mactcp_write(Socket sock, char *buf, int len){    Actual_Socket s = (Actual_Socket) sock;    wdsEntry wds[2];    TCPiopb pb;    fprintf(stderr, "Write data, %d bytes\n", len);    wds[0].length = len;    wds[0].ptr = buf;    wds[1].length = 0;    pb.ioCRefNum = mactcp.refnum;    pb.csCode = TCPSend;    pb.tcpStream = s->s;    pb.csParam.send.validityFlags = 0;    pb.csParam.send.pushFlag = TRUE; /* XXX we want it to return. */    pb.csParam.send.urgentFlag = 0;    pb.csParam.send.wdsPtr = (Ptr)wds;    pb.csParam.send.userDataPtr = (Ptr)s;    s->err = PBControlSync((ParmBlkPtr)&pb);    return 0;}