Return to XCrGlCur.c CVS log

Up to [Research Unix] / researchv9 / X11 / src / X.V11R1 / lib / X

Annotation of researchv9/X11/src/X.V11R1/lib/X/XCrGlCur.c, revision 1.1.1.1

1.1       root        1: #include "copyright.h"
                      2: 
                      3: /* $Header: XCrGlCur.c,v 11.6 87/09/11 08:02:32 toddb Exp $ */
                      4: /* Copyright    Massachusetts Institute of Technology    1986  */
                      5: 
                      6: #include "Xlibint.h"
                      7: 
                      8: Cursor XCreateGlyphCursor(dpy, source_font, mask_font,
                      9:                   source_char, mask_char,
                     10:                   foreground, background)
                     11:      register Display *dpy;
                     12:      Font source_font, mask_font;
                     13:      unsigned int source_char, mask_char;
                     14:      XColor *foreground, *background;
                     15: 
                     16: {       
                     17:     Cursor cid;
                     18:     register xCreateGlyphCursorReq *req;
                     19: 
                     20:     LockDisplay(dpy);
                     21:     GetReq(CreateGlyphCursor, req);
                     22:     cid = req->cid = XAllocID(dpy);
                     23:     req->source = source_font;
                     24:     req->mask = mask_font;
                     25:     req->sourceChar = source_char;
                     26:     req->maskChar = mask_char;
                     27:     req->foreRed = foreground->red;
                     28:     req->foreGreen = foreground->green;
                     29:     req->foreBlue = foreground->blue;
                     30:     req->backRed = background->red;
                     31:     req->backGreen = background->green;
                     32:     req->backBlue = background->blue;
                     33:     UnlockDisplay(dpy);
                     34:     SyncHandle();
                     35:     return (cid);
                     36: }
                     37: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.