diff options
Diffstat (limited to 'macosx/tkMacOSXXStubs.c')
| -rw-r--r-- | macosx/tkMacOSXXStubs.c | 42 |
1 files changed, 39 insertions, 3 deletions
diff --git a/macosx/tkMacOSXXStubs.c b/macosx/tkMacOSXXStubs.c index 32886ce..3b5e50a 100644 --- a/macosx/tkMacOSXXStubs.c +++ b/macosx/tkMacOSXXStubs.c @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkMacOSXXStubs.c,v 1.17 2007/04/23 21:24:34 das Exp $ + * RCS: @(#) $Id: tkMacOSXXStubs.c,v 1.18 2007/05/30 06:35:55 das Exp $ */ #include "tkMacOSXInt.h" @@ -780,7 +780,7 @@ XForceScreenSaver( } void -Tk_FreeXId ( +Tk_FreeXId( Display *display, XID xid) { @@ -788,12 +788,48 @@ Tk_FreeXId ( } int -XSync (Display *display, Bool flag) +XSync( + Display *display, + Bool flag) { TkMacOSXFlushWindows(); display->request++; return 0; } + +#if 0 +int +XSetClipRectangles( + Display *d, + GC gc, + int clip_x_origin, + int clip_y_origin, + XRectangle* rectangles, + int n, + int ordering) +{ + TkRegion clipRgn; + + if (gc->clip_mask && ((TkpClipMask*)gc->clip_mask)->type + == TKP_CLIP_REGION) { + clipRgn = ((TkpClipMask*)gc->clip_mask)->value.region; + SetEmptyRgn((RgnHandle) clipRgn); + } else { + clipRgn = TkCreateRegion(); /* LEAK! */ + } + + while (n--) { + XRectangle rect = *rectangles; + + rect.x += clip_x_origin; + rect.y += clip_y_origin; + TkUnionRectWithRegion(&rect, clipRgn, clipRgn); + rectangles++; + } + TkSetRegion(d, gc, clipRgn); + return 1; +} +#endif /* *---------------------------------------------------------------------- |