#include <X/mit-copyright.h>

/* $Header: /var/lib/cvsd/repos/CSRG/43BSD/contrib/X/Xlib/XQueryWidth.c,v 1.1.1.1 2018/04/24 16:12:54 root Exp $ */
/* Copyright    Massachusetts Institute of Technology    1985	*/

#include "XlibInternal.h"

int XQueryWidth (str, font)
	char *str;
	Font font;
{
	register Display *dpy;
	register XReq *req;
	XRep rep;
	int len;

	if (str == NULL) return(0);
	len = strlen (str);

	GetReq(X_StringWidth, 0);
	req->param.l[0] = font;
	req->param.s[2] = len;
	Data (dpy, str, len);
	if (!_XReply(dpy, &rep))
	    return(0);
	return(rep.param.s[0]);
}