*--------------------------------------------------------------
*/
-void
-TkWmNewWindow(winPtr)
- TkWindow *winPtr; /* Newly-created top-level window. */
+void
+TkWmNewWindow (
+ TkWindow *winPtr /* Newly-created top-level window. */
+)
{
register WmInfo *wmPtr;
*--------------------------------------------------------------
*/
-int
-TkWmMapWindow(winPtr)
- TkWindow *winPtr; /* Top-level window that's about to
+int
+TkWmMapWindow (
+ TkWindow *winPtr /* Top-level window that's about to
* be mapped. */
+)
{
register WmInfo *wmPtr = winPtr->wmInfoPtr;
#ifndef X11R3
if (wmPtr->hints.initial_state == NormalState) {
winPtr->flags |= TK_MAPPED;
}
- if (!(wmPtr->flags & WM_NEVER_MAPPED)) {
- return 1;
- }
- wmPtr->flags &= ~WM_NEVER_MAPPED;
+ if (wmPtr->flags & WM_NEVER_MAPPED) {
+ wmPtr->flags &= ~WM_NEVER_MAPPED;
- /*
- * This is the first time this window has ever been mapped.
- * Store all the window-manager-related information for the
- * window.
- */
+ /*
+ * This is the first time this window has ever been mapped.
+ * Store all the window-manager-related information for the
+ * window.
+ */
#ifndef X11R3
- if (wmPtr->titleUid == NULL) {
- wmPtr->titleUid = winPtr->nameUid;
- }
- if (XStringListToTextProperty(&wmPtr->titleUid, 1, &textProp) != 0) {
- XSetWMName(winPtr->display, winPtr->window, &textProp);
- XFree((char *) textProp.value);
- }
+ if (wmPtr->titleUid == NULL) {
+ wmPtr->titleUid = winPtr->nameUid;
+ }
+ if (XStringListToTextProperty(&wmPtr->titleUid, 1, &textProp) != 0) {
+ XSetWMName(winPtr->display, winPtr->window, &textProp);
+ XFree((char *) textProp.value);
+ }
#endif
- TkWmSetClass(winPtr);
- TkWmSetWmProtocols(winPtr);
+ TkWmSetClass(winPtr);
+ TkWmSetWmProtocols(winPtr);
- if (wmPtr->iconName != NULL) {
- XSetIconName(winPtr->display, winPtr->window, wmPtr->iconName);
- }
+ if (wmPtr->iconName != NULL) {
+ XSetIconName(winPtr->display, winPtr->window, wmPtr->iconName);
+ }
- if (wmPtr->master != None) {
- XSetTransientForHint(winPtr->display, winPtr->window, wmPtr->master);
+ if (wmPtr->master != None) {
+ XSetTransientForHint(winPtr->display, winPtr->window, wmPtr->master);
+ }
}
wmPtr->flags |= WM_UPDATE_SIZE_HINTS;
*--------------------------------------------------------------
*/
-void
-TkWmDeadWindow(winPtr)
- TkWindow *winPtr; /* Newly-created top-level window. */
+void
+TkWmDeadWindow (
+ TkWindow *winPtr /* Newly-created top-level window. */
+)
{
register WmInfo *wmPtr = winPtr->wmInfoPtr;
*--------------------------------------------------------------
*/
-void
-TkWmSetClass(winPtr)
- TkWindow *winPtr; /* Newly-created top-level window. */
+void
+TkWmSetClass (
+ TkWindow *winPtr /* Newly-created top-level window. */
+)
{
if (winPtr->wmInfoPtr->flags & WM_NEVER_MAPPED) {
return;
*/
/* ARGSUSED */
-int
-Tk_WmCmd(clientData, interp, argc, argv)
- ClientData clientData; /* Main window associated with
+int
+Tk_WmCmd (
+ ClientData clientData, /* Main window associated with
* interpreter. */
- Tcl_Interp *interp; /* Current interpreter. */
- int argc; /* Number of arguments. */
- char **argv; /* Argument strings. */
+ Tcl_Interp *interp, /* Current interpreter. */
+ int argc, /* Number of arguments. */
+ char **argv /* Argument strings. */
+)
{
Tk_Window tkwin = (Tk_Window) clientData;
TkWindow *winPtr;
*----------------------------------------------------------------------
*/
-void
-Tk_SetGrid(tkwin, reqWidth, reqHeight, widthInc, heightInc)
- Tk_Window tkwin; /* Token for window. New window mgr info
+void
+Tk_SetGrid (
+ Tk_Window tkwin, /* Token for window. New window mgr info
* will be posted for the top-level window
* associated with this window. */
- int reqWidth; /* Width (in grid units) corresponding to
+ int reqWidth, /* Width (in grid units) corresponding to
* the requested geometry for tkwin. */
- int reqHeight; /* Height (in grid units) corresponding to
+ int reqHeight, /* Height (in grid units) corresponding to
* the requested geometry for tkwin. */
- int widthInc, heightInc; /* Pixel increments corresponding to a
+ int widthInc,
+ int heightInc /* Pixel increments corresponding to a
* change of one grid unit. */
+)
{
TkWindow *winPtr = (TkWindow *) tkwin;
register WmInfo *wmPtr;
*----------------------------------------------------------------------
*/
-static void
-TopLevelEventProc(clientData, eventPtr)
- ClientData clientData; /* Window for which event occurred. */
- XEvent *eventPtr; /* Event that just happened. */
+static void
+TopLevelEventProc (
+ ClientData clientData, /* Window for which event occurred. */
+ XEvent *eventPtr /* Event that just happened. */
+)
{
register TkWindow *winPtr = (TkWindow *) clientData;
*/
/* ARGSUSED */
-static void
-TopLevelReqProc(dummy, tkwin)
- ClientData dummy; /* Not used. */
- Tk_Window tkwin; /* Information about window. */
+static void
+TopLevelReqProc (
+ ClientData dummy, /* Not used. */
+ Tk_Window tkwin /* Information about window. */
+)
{
TkWindow *winPtr = (TkWindow *) tkwin;
WmInfo *wmPtr;
*----------------------------------------------------------------------
*/
-static void
-UpdateGeometryInfo(clientData)
- ClientData clientData; /* Pointer to the window's record. */
+static void
+UpdateGeometryInfo (
+ ClientData clientData /* Pointer to the window's record. */
+)
{
register TkWindow *winPtr = (TkWindow *) clientData;
register WmInfo *wmPtr = winPtr->wmInfoPtr;
*--------------------------------------------------------------
*/
-static void
-UpdateSizeHints(winPtr)
- TkWindow *winPtr;
+static void
+UpdateSizeHints (TkWindow *winPtr)
{
register WmInfo *wmPtr = winPtr->wmInfoPtr;
XSizeHints *hintsPtr;
*--------------------------------------------------------------
*/
-static void
-UpdateHints(winPtr)
- TkWindow *winPtr;
+static void
+UpdateHints (TkWindow *winPtr)
{
WmInfo *wmPtr = winPtr->wmInfoPtr;
*--------------------------------------------------------------
*/
-static int
-ParseGeometry(interp, string, winPtr)
- Tcl_Interp *interp; /* Used for error reporting. */
- char *string; /* String containing new geometry. Has the
+static int
+ParseGeometry (
+ Tcl_Interp *interp, /* Used for error reporting. */
+ char *string, /* String containing new geometry. Has the
* standard form "=wxh+x+y". */
- TkWindow *winPtr; /* Pointer to top-level window whose
+ TkWindow *winPtr /* Pointer to top-level window whose
* geometry is to be changed. */
+)
{
register WmInfo *wmPtr = winPtr->wmInfoPtr;
int x, y, width, height, flags;
*----------------------------------------------------------------------
*/
-void
-Tk_GetRootCoords(tkwin, xPtr, yPtr)
- Tk_Window tkwin; /* Token for window. */
- int *xPtr; /* Where to store x-displacement of (0,0). */
- int *yPtr; /* Where to store y-displacement of (0,0). */
+void
+Tk_GetRootCoords (
+ Tk_Window tkwin, /* Token for window. */
+ int *xPtr, /* Where to store x-displacement of (0,0). */
+ int *yPtr /* Where to store y-displacement of (0,0). */
+)
{
int x, y;
register TkWindow *winPtr = (TkWindow *) tkwin;
*--------------------------------------------------------------
*/
-void
-TkWmSetWmProtocols(winPtr)
- TkWindow *winPtr; /* Newly-created top-level window. */
+void
+TkWmSetWmProtocols (
+ TkWindow *winPtr /* Newly-created top-level window. */
+)
{
if (winPtr->wmInfoPtr->flags & WM_NEVER_MAPPED) {
return;
*
*
*/
-void
-TkWmProtocolEventProc(winPtr, eventPtr)
-TkWindow *winPtr;
-XEvent *eventPtr;
+void
+TkWmProtocolEventProc (TkWindow *winPtr, XEvent *eventPtr)
{
if ((Atom)(eventPtr->xclient.data.l)[0] ==
Tk_InternAtom((Tk_Window) winPtr, "WM_DELETE_WINDOW")) {
* Kind of artificial, But makes it easier to merge into new
* versions of Stock Tk.
*/
-int
-WmProtocolCmd(interp, CmdPtr, argc, argv)
-Tcl_Interp *interp;
-char **CmdPtr;
-int argc;
-char **argv;
+int
+WmProtocolCmd (Tcl_Interp *interp, char **CmdPtr, int argc, char **argv)
{
#define Cmd (*CmdPtr)
*----------------------------------------------------------------------
*/
-Tk_Window
-Tk_CoordsToWindow(rootX, rootY, tkwin)
- int rootX, rootY; /* Coordinates of point in root window. */
- Tk_Window tkwin; /* Token for any window in application;
+Tk_Window
+Tk_CoordsToWindow (
+ int rootX,
+ int rootY, /* Coordinates of point in root window. */
+ Tk_Window tkwin /* Token for any window in application;
* used to identify the application. */
+)
{
Window rootChild, dummy3, dummy4;
int i, dummy1, dummy2;
projects / micropolis / blobdiff