|
|
1.1 ! root 1: /* $Header: Util.c,v 1.1 87/09/11 07:59:01 toddb Exp $ */ ! 2: #ifndef lint ! 3: static char *sccsid = "@(#)Util.c 1.1 4/01/87"; ! 4: #endif lint ! 5: ! 6: /* ! 7: * Copyright 1987 by Digital Equipment Corporation, Maynard, Massachusetts. ! 8: * ! 9: * All Rights Reserved ! 10: * ! 11: * Permission to use, copy, modify, and distribute this software and its ! 12: * documentation for any purpose and without fee is hereby granted, ! 13: * provided that the above copyright notice appear in all copies and that ! 14: * both that copyright notice and this permission notice appear in ! 15: * supporting documentation, and that the name of Digital Equipment ! 16: * Corporation not be used in advertising or publicity pertaining to ! 17: * distribution of the software without specific, written prior permission. ! 18: * ! 19: * ! 20: * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ! 21: * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL ! 22: * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ! 23: * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, ! 24: * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ! 25: * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS ! 26: * SOFTWARE. ! 27: */ ! 28: ! 29: ! 30: /* Util.c -- Utility routines useful to widget writers. */ ! 31: ! 32: #include "Xlib.h" ! 33: #include "Intrinsic.h" ! 34: ! 35: Window XtCreateWindow(dpy, parent, x, y, width, height, ! 36: borderWidth, border, background, bitgravity) ! 37: Display *dpy; ! 38: Window parent; ! 39: Position x, y; ! 40: Dimension width, height, borderWidth; ! 41: Pixel border; ! 42: Pixel background; ! 43: int bitgravity; ! 44: { ! 45: XSetWindowAttributes values; ! 46: values.border_pixel = border; ! 47: values.background_pixel = background; ! 48: values.bit_gravity = bitgravity; ! 49: return XCreateWindow(dpy, parent, x, y, width, height, borderWidth, 0, ! 50: (unsigned int) CopyFromParent, ! 51: (Visual *) CopyFromParent, ! 52: CWBackPixel | CWBorderPixel | CWBitGravity, &values); ! 53: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.