|
|
1.1 ! root 1: #include <X/mit-copyright.h> ! 2: ! 3: /* $Header: XQueryFont.c,v 10.4 86/02/01 15:38:59 tony Rel $ */ ! 4: /* Copyright Massachusetts Institute of Technology 1985 */ ! 5: ! 6: #include "XlibInternal.h" ! 7: Status XQueryFont (font, info) ! 8: Font font; ! 9: register FontInfo *info; ! 10: { ! 11: register Display *dpy; ! 12: register XReq *req; ! 13: XRep rep; ! 14: ! 15: GetReq(X_QueryFont, 0); ! 16: req->param.l[0] = font; ! 17: if (!_XReply(dpy, &rep)) ! 18: return (0); ! 19: info->id = font; ! 20: info->height = rep.param.s[0]; ! 21: info->width = rep.param.s[1]; ! 22: info->firstchar = (unsigned char) rep.param.s[2]; ! 23: info->lastchar = (unsigned char) rep.param.s[3]; ! 24: info->baseline = rep.param.s[4]; ! 25: info->fixedwidth = rep.param.s[5]; ! 26: info->widths = NULL; ! 27: return (1); ! 28: } ! 29:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.