ANSIfy

1 files changed, 107 insertions, 116 deletions

diff --git a/generic/tkButton.h b/generic/tkButton.h
index 78e0765..01a30e8 100644
--- a/generic/tkButton.h
+++ b/generic/tkButton.h
@@ -1,15 +1,15 @@
 /*
  * tkButton.h --
  *
- *	Declarations of types and functions used to implement
- *	button-like widgets.
+ *	Declarations of types and functions used to implement button-like
+ *	widgets.
  *
  * Copyright (c) 1996-1998 by Sun Microsystems, Inc.
  *
- * See the file "license.terms" for information on usage and redistribution
- * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
+ * See the file "license.terms" for information on usage and redistribution of
+ * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tkButton.h,v 1.11 2004/02/18 00:40:24 hobbs Exp $
+ * RCS: @(#) $Id: tkButton.h,v 1.12 2005/11/04 15:23:05 dkf Exp $
  */
 
 #ifndef _TKBUTTON
@@ -50,20 +50,20 @@ enum defaultState {
 };
 
 /*
- * A data structure of the following type is kept for each
- * widget managed by this file:
+ * A data structure of the following type is kept for each widget managed by
+ * this file:
  */
 
 typedef struct {
-    Tk_Window tkwin;		/* Window that embodies the button.  NULL
-				 * means that the window has been destroyed. */
-    Display *display;		/* Display containing widget.  Needed to
-				 * free up resources after tkwin is gone. */
+    Tk_Window tkwin;		/* Window that embodies the button. NULL means
+				 * that the window has been destroyed. */
+    Display *display;		/* Display containing widget. Needed to free
+				 * up resources after tkwin is gone. */
     Tcl_Interp *interp;		/* Interpreter associated with button. */
     Tcl_Command widgetCmd;	/* Token for button's widget command. */
     int type;			/* Type of widget, such as TYPE_LABEL:
 				 * restricts operations that may be performed
-				 * on widget.  See below for legal values. */
+				 * on widget. See below for legal values. */
     Tk_OptionTable optionTable;	/* Table that defines configuration options
 				 * available for this widget. */
 
@@ -73,64 +73,65 @@ typedef struct {
 
     Tcl_Obj *textPtr;		/* Value of -text option: specifies text to
 				 * display in button. */
-    int underline;		/* Value of -underline option: specifies
-				 * index of character to underline.  < 0 means
-				 * don't underline anything. */
+    int underline;		/* Value of -underline option: specifies index
+				 * of character to underline. < 0 means don't
+				 * underline anything. */
     Tcl_Obj *textVarNamePtr;	/* Value of -textvariable option: specifies
-				 * name of variable or NULL.  If non-NULL,
+				 * name of variable or NULL. If non-NULL,
 				 * button displays the contents of this
 				 * variable. */
-    Pixmap bitmap;		/* Value of -bitmap option.  If not None,
+    Pixmap bitmap;		/* Value of -bitmap option. If not None,
 				 * specifies bitmap to display and text and
 				 * textVar are ignored. */
-    Tcl_Obj *imagePtr;		/* Value of -image option: specifies image
-				 * to display in window, or NULL if none.
-				 * If non-NULL, bitmap, text, and textVarName
-				 * are ignored.*/
+    Tcl_Obj *imagePtr;		/* Value of -image option: specifies image to
+				 * display in window, or NULL if none. If
+				 * non-NULL, bitmap, text, and textVarName are
+				 * ignored.*/
     Tk_Image image;		/* Derived from imagePtr by calling
-				 * Tk_GetImage, or NULL if imagePtr is NULL. */
+				 * Tk_GetImage, or NULL if imagePtr is
+				 * NULL. */
     Tcl_Obj *selectImagePtr;	/* Value of -selectimage option: specifies
 				 * image to display in window when selected,
-				 * or NULL if none.  Ignored if imagePtr is
+				 * or NULL if none. Ignored if imagePtr is
 				 * NULL. */
     Tk_Image selectImage;	/* Derived from selectImagePtr by calling
-				 * Tk_GetImage, or NULL if selectImagePtr
-				 * is NULL. */
+				 * Tk_GetImage, or NULL if selectImagePtr is
+				 * NULL. */
     Tcl_Obj *tristateImagePtr;	/* Value of -tristateimage option: specifies
 				 * image to display in window when selected,
-				 * or NULL if none.  Ignored if imagePtr is
+				 * or NULL if none. Ignored if imagePtr is
 				 * NULL. */
     Tk_Image tristateImage;	/* Derived from tristateImagePtr by calling
-				 * Tk_GetImage, or NULL if tristateImagePtr
-				 * is NULL. */
+				 * Tk_GetImage, or NULL if tristateImagePtr is
+				 * NULL. */
 
     /*
      * Information used when displaying widget:
      */
 
-    enum state state;		/* Value of -state option: specifies
-				 * state of button for display purposes.*/
+    enum state state;		/* Value of -state option: specifies state of
+				 * button for display purposes.*/
     Tk_3DBorder normalBorder;	/* Value of -background option: specifies
 				 * color for background (and border) when
 				 * window isn't active. */
-    Tk_3DBorder activeBorder;	/* Value of -activebackground option:
-				 * this is the color used to draw 3-D border
-				 * and background when widget is active. */
+    Tk_3DBorder activeBorder;	/* Value of -activebackground option: this is
+				 * the color used to draw 3-D border and
+				 * background when widget is active. */
     Tcl_Obj *borderWidthPtr;	/* Value of -borderWidth option: specifies
 				 * width of border in pixels. */
     int borderWidth;		/* Integer value corresponding to
-				 * borderWidthPtr.  Always >= 0. */
+				 * borderWidthPtr. Always >= 0. */
     int relief;			/* Value of -relief option: specifies 3-d
 				 * effect for border, such as
 				 * TK_RELIEF_RAISED. */
-    int overRelief;		/* Value of -overrelief option: specifies a 3-d
-				 * effect for the border, such as
+    int overRelief;		/* Value of -overrelief option: specifies a
+				 * 3-d effect for the border, such as
 				 * TK_RELIEF_RAISED, to be used when the mouse
 				 * is over the button. */
     int offRelief;		/* Value of -offrelief option: specifies a 3-d
 				 * effect for the border, such as
 				 * TK_RELIEF_RAISED, to be used when a
-				 * checkbutton or radiobutton without 
+				 * checkbutton or radiobutton without
 				 * indicator is off */
     Tcl_Obj *highlightWidthPtr;	/* Value of -highlightthickness option:
 				 * specifies width in pixels of highlight to
@@ -142,25 +143,23 @@ typedef struct {
 				 * specifies background with which to draw 3-D
 				 * default ring and focus highlight area when
 				 * highlight is off. */
-    XColor *highlightColorPtr;	/* Value of -highlightcolor option:
-				 * specifies color for drawing traversal
-				 * highlight. */
+    XColor *highlightColorPtr;	/* Value of -highlightcolor option: specifies
+				 * color for drawing traversal highlight. */
     int inset;			/* Total width of all borders, including
 				 * traversal highlight and 3-D border.
-				 * Indicates how much interior stuff must
-				 * be offset from outside edges to leave
-				 * room for borders. */
-    Tk_Font tkfont;		/* Value of -font option: specifies font
-				 * to use for display text. */
+				 * Indicates how much interior stuff must be
+				 * offset from outside edges to leave room for
+				 * borders. */
+    Tk_Font tkfont;		/* Value of -font option: specifies font to
+				 * use for display text. */
     XColor *normalFg;		/* Value of -font option: specifies foreground
 				 * color in normal mode. */
     XColor *activeFg;		/* Value of -activeforeground option:
-				 * foreground color in active mode.  NULL
-				 * means use -foreground instead. */
+				 * foreground color in active mode. NULL means
+				 * use -foreground instead. */
     XColor *disabledFg;		/* Value of -disabledforeground option:
-				 * foreground color when disabled.  NULL
-				 * means use normalFg with a 50% stipple
-				 * instead. */
+				 * foreground color when disabled. NULL means
+				 * use normalFg with a 50% stipple instead. */
     GC normalTextGC;		/* GC for drawing text in normal mode.  Also
 				 * used to copy from off-screen pixmap onto
 				 * screen. */
@@ -168,8 +167,8 @@ typedef struct {
 				 * means use normalTextGC). */
     GC disabledGC;		/* Used to produce disabled effect for text
 				 * and check/radio marks. */
-    GC stippleGC;		/* Used to produce disabled stipple effect
-				 * for images when disabled. */
+    GC stippleGC;		/* Used to produce disabled stipple effect for
+				 * images when disabled. */
     Pixmap gray;		/* Pixmap for displaying disabled text if
 				 * disabledFg is NULL. */
     GC copyGC;			/* Used for copying information from an
@@ -178,33 +177,33 @@ typedef struct {
     int width;			/* Integer value corresponding to widthPtr. */
     Tcl_Obj *heightPtr;		/* Value of -height option. */
     int height;			/* Integer value corresponding to heightPtr. */
-    Tcl_Obj *wrapLengthPtr;	/* Value of -wraplength option: specifies
-				 * line length (in pixels) at which to wrap
-				 * onto next line.  <= 0 means don't wrap
-				 * except at newlines. */
+    Tcl_Obj *wrapLengthPtr;	/* Value of -wraplength option: specifies line
+				 * length (in pixels) at which to wrap onto
+				 * next line. <= 0 means don't wrap except at
+				 * newlines. */
     int wrapLength;		/* Integer value corresponding to
 				 * wrapLengthPtr. */
     Tcl_Obj *padXPtr;		/* Value of -padx option: specifies how many
 				 * pixels of extra space to leave on left and
-				 * right of text.  Ignored for bitmaps and
+				 * right of text. Ignored for bitmaps and
 				 * images. */
     int padX;			/* Integer value corresponding to padXPtr. */
     Tcl_Obj *padYPtr;		/* Value of -padx option: specifies how many
 				 * pixels of extra space to leave above and
-				 * below text.  Ignored for bitmaps and
+				 * below text. Ignored for bitmaps and
 				 * images. */
     int padY;			/* Integer value corresponding to padYPtr. */
     Tk_Anchor anchor;		/* Value of -anchor option: specifies where
 				 * text/bitmap should be displayed inside
 				 * button region. */
-    Tk_Justify justify;		/* Value of -justify option: specifies how
-				 * to align lines of multi-line text. */
-    int indicatorOn;		/* Value of -indicatoron option:  1 means
-				 * draw indicator in checkbuttons and
-				 * radiobuttons, 0 means don't draw it. */
+    Tk_Justify justify;		/* Value of -justify option: specifies how to
+				 * align lines of multi-line text. */
+    int indicatorOn;		/* Value of -indicatoron option: 1 means draw
+				 * indicator in checkbuttons and radiobuttons,
+				 * 0 means don't draw it. */
     Tk_3DBorder selectBorder;	/* Value of -selectcolor option: specifies
 				 * color for drawing indicator background, or
-				 * perhaps widget background, when selected. */
+				 * perhaps widget background, when selected */
     int textWidth;		/* Width needed to display text as requested,
 				 * in pixels. */
     int textHeight;		/* Height needed to display text as requested,
@@ -215,30 +214,28 @@ typedef struct {
     int indicatorDiameter;	/* Diameter of indicator, in pixels. */
     enum defaultState defaultState;
 				/* Value of -default option, such as
-				 * DEFAULT_NORMAL: specifies state
-				 * of default ring for buttons (normal,
-				 * active, or disabled).  NULL for other
-				 * classes. */
+				 * DEFAULT_NORMAL: specifies state of default
+				 * ring for buttons (normal, active, or
+				 * disabled). NULL for other classes. */
 
     /*
-     * For check and radio buttons, the fields below are used
-     * to manage the variable indicating the button's state.
+     * For check and radio buttons, the fields below are used to manage the
+     * variable indicating the button's state.
      */
 
     Tcl_Obj *selVarNamePtr;	/* Value of -variable option: specifies name
-				 * of variable used to control selected
-				 * state of button. */
+				 * of variable used to control selected state
+				 * of button. */
     Tcl_Obj *onValuePtr;	/* Value of -offvalue option: specifies value
 				 * to store in variable when this button is
 				 * selected. */
     Tcl_Obj *offValuePtr;	/* Value of -offvalue option: specifies value
-				 * to store in variable when this button
-				 * isn't selected.  Used only by
-				 * checkbuttons. */
-    Tcl_Obj *tristateValuePtr;	/* Value of -tristatevalue option: specifies value
-                                 * to display Tristate or Multivalue mode when
-                                 * variable matches this value.  Used by check-
-                                 * buttons. */
+				 * to store in variable when this button isn't
+				 * selected. Used only by checkbuttons. */
+    Tcl_Obj *tristateValuePtr;	/* Value of -tristatevalue option: specifies
+                                 * value to display Tristate or Multivalue
+                                 * mode when variable matches this value.
+                                 * Used by check- buttons. */
 
     /*
      * Miscellaneous information:
@@ -246,31 +243,30 @@ typedef struct {
 
     Tk_Cursor cursor;		/* Value of -cursor option: if not None,
 				 * specifies current cursor for window. */
-    Tcl_Obj *takeFocusPtr;	/* Value of -takefocus option;  not used in
-				 * the C code, but used by keyboard traversal
+    Tcl_Obj *takeFocusPtr;	/* Value of -takefocus option; not used in the
+				 * C code, but used by keyboard traversal
 				 * scripts. */
-    Tcl_Obj *commandPtr;	/* Value of -command option: specifies script 
-				 * to execute when button is invoked.  If
-				 * widget is label or has no command, this
-				 * is NULL. */
-    int compound;		/* Value of -compound option; specifies whether
-				 * the button should show both an image and
-				 * text, and, if so, how. */
-    int repeatDelay;		/* Value of -repeatdelay option; specifies
-				 * the number of ms after which the button will
+    Tcl_Obj *commandPtr;	/* Value of -command option: specifies script
+				 * to execute when button is invoked. If
+				 * widget is label or has no command, this is
+				 * NULL. */
+    int compound;		/* Value of -compound option; specifies
+				 * whether the button should show both an
+				 * image and text, and, if so, how. */
+    int repeatDelay;		/* Value of -repeatdelay option; specifies the
+				 * number of ms after which the button will
 				 * start to auto-repeat its command. */
     int repeatInterval;		/* Value of -repeatinterval option; specifies
 				 * the number of ms between auto-repeat
 				 * invocataions of the button command. */
-    int flags;			/* Various flags;  see below for
+    int flags;			/* Various flags; see below for
 				 * definitions. */
 } TkButton;
 
 /*
- * Possible "type" values for buttons.  These are the kinds of
- * widgets supported by this file.  The ordering of the type
- * numbers is significant:  greater means more features and is
- * used in the code.
+ * Possible "type" values for buttons. These are the kinds of widgets
+ * supported by this file. The ordering of the type numbers is significant:
+ * greater means more features and is used in the code.
  */
 
 #define TYPE_LABEL		0
@@ -281,16 +277,14 @@ typedef struct {
 /*
  * Flag bits for buttons:
  *
- * REDRAW_PENDING:		Non-zero means a DoWhenIdle handler
- *				has already been queued to redraw
- *				this window.
- * SELECTED:			Non-zero means this button is selected,
- *				so special highlight should be drawn.
- * GOT_FOCUS:			Non-zero means this button currently
- *				has the input focus.
+ * REDRAW_PENDING:		Non-zero means a DoWhenIdle handler has
+ *				already been queued to redraw this window.
+ * SELECTED:			Non-zero means this button is selected, so
+ *				special highlight should be drawn.
+ * GOT_FOCUS:			Non-zero means this button currently has the
+ *				input focus.
  * BUTTON_DELETED:		Non-zero needs that this button has been
- *				deleted, or is in the process of being
- *				deleted.
+ *				deleted, or is in the process of being deleted
  */
 
 #define REDRAW_PENDING		(1 << 0)
@@ -298,6 +292,7 @@ typedef struct {
 #define GOT_FOCUS		(1 << 2)
 #define BUTTON_DELETED		(1 << 3)
 #define TRISTATED		(1 << 4)
+
 /*
  * Declaration of variables shared between the files in the button module.
  */
@@ -305,26 +300,22 @@ typedef struct {
 extern Tk_ClassProcs tkpButtonProcs;
 
 /*
- * Declaration of procedures used in the implementation of the button
- * widget. 
+ * Declaration of functions used in the implementation of the button widget.
  */
 
 #ifndef TkpButtonSetDefaults
-EXTERN void		TkpButtonSetDefaults _ANSI_ARGS_((
-			    Tk_OptionSpec *specPtr));
+EXTERN void		TkpButtonSetDefaults(Tk_OptionSpec *specPtr);
 #endif
-EXTERN void		TkButtonWorldChanged _ANSI_ARGS_((
-			    ClientData instanceData));
-EXTERN void		TkpComputeButtonGeometry _ANSI_ARGS_((
-			    TkButton *butPtr));
-EXTERN TkButton *	TkpCreateButton _ANSI_ARGS_((Tk_Window tkwin));
+EXTERN void		TkButtonWorldChanged(ClientData instanceData);
+EXTERN void		TkpComputeButtonGeometry(TkButton *butPtr);
+EXTERN TkButton *	TkpCreateButton(Tk_Window tkwin);
 #ifndef TkpDestroyButton
-EXTERN void 		TkpDestroyButton _ANSI_ARGS_((TkButton *butPtr));
+EXTERN void 		TkpDestroyButton(TkButton *butPtr);
 #endif
 #ifndef TkpDisplayButton
-EXTERN void		TkpDisplayButton _ANSI_ARGS_((ClientData clientData));
+EXTERN void		TkpDisplayButton(ClientData clientData);
 #endif
-EXTERN int		TkInvokeButton  _ANSI_ARGS_((TkButton *butPtr));
+EXTERN int		TkInvokeButton(TkButton *butPtr);
 
 # undef TCL_STORAGE_CLASS
 # define TCL_STORAGE_CLASS DLLIMPORT