* generic/tk.decls: use new genstubs 'export' command to

	* generic/tkInt.decls:		mark exported symbols not in stubs
					table [FR 1716117]; cleanup formatting.

1 files changed, 321 insertions, 540 deletions

diff --git a/generic/tk.decls b/generic/tk.decls
index 494801d..9ac49fb 100644
--- a/generic/tk.decls
+++ b/generic/tk.decls
@@ -4,14 +4,14 @@
 #	functions that are exported by the Tk library via the stubs table.
 #	This file is used to generate the tkDecls.h, tkPlatDecls.h,
 #	tkStub.c, and tkPlatStub.c files.
-#	
 #
 # Copyright (c) 1998-2000 Ajuba Solutions.
+# Copyright (c) 2007 Daniel A. Steffen <das@users.sourceforge.net>
 #
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
-# 
-# RCS: @(#) $Id: tk.decls,v 1.33 2007/09/20 18:48:34 das Exp $
+#
+# RCS: @(#) $Id: tk.decls,v 1.34 2007/12/10 15:52:09 das Exp $
 
 library tk
 
@@ -28,1102 +28,886 @@ hooks {tkPlat tkInt tkIntPlat tkIntXlib}
 # to preserve backwards compatibility.
 
 declare 0 generic {
-    void Tk_MainLoop (void)
+    void Tk_MainLoop(void)
 }
-
 declare 1 generic {
-    XColor *Tk_3DBorderColor (Tk_3DBorder border)
+    XColor *Tk_3DBorderColor(Tk_3DBorder border)
 }
-
 declare 2 generic {
-    GC Tk_3DBorderGC (Tk_Window tkwin, Tk_3DBorder border,
+    GC Tk_3DBorderGC(Tk_Window tkwin, Tk_3DBorder border,
 	    int which)
 }
-
 declare 3 generic {
-    void Tk_3DHorizontalBevel (Tk_Window tkwin,
+    void Tk_3DHorizontalBevel(Tk_Window tkwin,
 	    Drawable drawable, Tk_3DBorder border, int x,
 	    int y, int width, int height, int leftIn,
 	    int rightIn, int topBevel, int relief)
 }
-
 declare 4 generic {
-    void Tk_3DVerticalBevel (Tk_Window tkwin,
+    void Tk_3DVerticalBevel(Tk_Window tkwin,
 	    Drawable drawable, Tk_3DBorder border, int x,
 	    int y, int width, int height, int leftBevel,
 	    int relief)
 }
-
 declare 5 generic {
-    void Tk_AddOption (Tk_Window tkwin, CONST char *name,
+    void Tk_AddOption(Tk_Window tkwin, CONST char *name,
 	    CONST char *value, int priority)
 }
-
 declare 6 generic {
-    void Tk_BindEvent (Tk_BindingTable bindingTable,
+    void Tk_BindEvent(Tk_BindingTable bindingTable,
 	    XEvent *eventPtr, Tk_Window tkwin, int numObjects,
 	    ClientData *objectPtr)
 }
-
 declare 7 generic {
-    void Tk_CanvasDrawableCoords (Tk_Canvas canvas,
+    void Tk_CanvasDrawableCoords(Tk_Canvas canvas,
 	    double x, double y, short *drawableXPtr,
 	    short *drawableYPtr)
 }
-
 declare 8 generic {
-    void Tk_CanvasEventuallyRedraw (Tk_Canvas canvas, int x1, int y1,
+    void Tk_CanvasEventuallyRedraw(Tk_Canvas canvas, int x1, int y1,
 	    int x2, int y2)
 }
-
 declare 9 generic {
-    int Tk_CanvasGetCoord (Tcl_Interp *interp,
+    int Tk_CanvasGetCoord(Tcl_Interp *interp,
 	    Tk_Canvas canvas, CONST char *str, double *doublePtr)
 }
-
 declare 10 generic {
-    Tk_CanvasTextInfo *Tk_CanvasGetTextInfo (Tk_Canvas canvas)
+    Tk_CanvasTextInfo *Tk_CanvasGetTextInfo(Tk_Canvas canvas)
 }
-
 declare 11 generic {
-    int Tk_CanvasPsBitmap (Tcl_Interp *interp,
+    int Tk_CanvasPsBitmap(Tcl_Interp *interp,
 	    Tk_Canvas canvas, Pixmap bitmap, int x, int y,
 	    int width, int height)
 }
-
 declare 12 generic {
-    int Tk_CanvasPsColor (Tcl_Interp *interp,
+    int Tk_CanvasPsColor(Tcl_Interp *interp,
 	    Tk_Canvas canvas, XColor *colorPtr)
 }
-
 declare 13 generic {
-    int Tk_CanvasPsFont (Tcl_Interp *interp,
+    int Tk_CanvasPsFont(Tcl_Interp *interp,
 	    Tk_Canvas canvas, Tk_Font font)
 }
-
 declare 14 generic {
-    void Tk_CanvasPsPath (Tcl_Interp *interp,
+    void Tk_CanvasPsPath(Tcl_Interp *interp,
 	    Tk_Canvas canvas, double *coordPtr, int numPoints)
 }
-
 declare 15 generic {
-    int Tk_CanvasPsStipple (Tcl_Interp *interp,
+    int Tk_CanvasPsStipple(Tcl_Interp *interp,
 	    Tk_Canvas canvas, Pixmap bitmap)
 }
-
 declare 16 generic {
-    double Tk_CanvasPsY (Tk_Canvas canvas, double y)
+    double Tk_CanvasPsY(Tk_Canvas canvas, double y)
 }
-
 declare 17 generic {
-    void Tk_CanvasSetStippleOrigin (Tk_Canvas canvas, GC gc)
+    void Tk_CanvasSetStippleOrigin(Tk_Canvas canvas, GC gc)
 }
-
 declare 18 generic {
-    int Tk_CanvasTagsParseProc (ClientData clientData, Tcl_Interp *interp,
+    int Tk_CanvasTagsParseProc(ClientData clientData, Tcl_Interp *interp,
 	    Tk_Window tkwin, CONST char *value, char *widgRec, int offset)
 }
-
 declare 19 generic {
-    char * Tk_CanvasTagsPrintProc (ClientData clientData, Tk_Window tkwin,
+    char * Tk_CanvasTagsPrintProc(ClientData clientData, Tk_Window tkwin,
 	    char *widgRec, int offset, Tcl_FreeProc **freeProcPtr)
 }
-
 declare 20 generic {
-    Tk_Window	Tk_CanvasTkwin (Tk_Canvas canvas)
+    Tk_Window	Tk_CanvasTkwin(Tk_Canvas canvas)
 }
-
 declare 21 generic {
-    void Tk_CanvasWindowCoords (Tk_Canvas canvas, double x, double y,
+    void Tk_CanvasWindowCoords(Tk_Canvas canvas, double x, double y,
 	    short *screenXPtr, short *screenYPtr)
 }
-
 declare 22 generic {
-    void Tk_ChangeWindowAttributes (Tk_Window tkwin, unsigned long valueMask,
+    void Tk_ChangeWindowAttributes(Tk_Window tkwin, unsigned long valueMask,
 	    XSetWindowAttributes *attsPtr)
 }
-
 declare 23 generic {
-    int Tk_CharBbox (Tk_TextLayout layout, int index, int *xPtr,
+    int Tk_CharBbox(Tk_TextLayout layout, int index, int *xPtr,
 	    int *yPtr, int *widthPtr, int *heightPtr)
 }
-
 declare 24 generic {
-    void Tk_ClearSelection (Tk_Window tkwin, Atom selection)
+    void Tk_ClearSelection(Tk_Window tkwin, Atom selection)
 }
-
 declare 25 generic {
-    int Tk_ClipboardAppend (Tcl_Interp *interp,Tk_Window tkwin,
+    int Tk_ClipboardAppend(Tcl_Interp *interp,Tk_Window tkwin,
 	    Atom target, Atom format, char* buffer)
 }
-
 declare 26 generic {
-    int Tk_ClipboardClear (Tcl_Interp *interp, Tk_Window tkwin)
+    int Tk_ClipboardClear(Tcl_Interp *interp, Tk_Window tkwin)
 }
-
 declare 27 generic {
-    int Tk_ConfigureInfo (Tcl_Interp *interp,
+    int Tk_ConfigureInfo(Tcl_Interp *interp,
 	    Tk_Window tkwin, Tk_ConfigSpec *specs,
 	    char *widgRec, CONST char *argvName, int flags)
 }
-
 declare 28 generic {
-    int Tk_ConfigureValue (Tcl_Interp *interp,
+    int Tk_ConfigureValue(Tcl_Interp *interp,
 	    Tk_Window tkwin, Tk_ConfigSpec *specs,
 	    char *widgRec, CONST char *argvName, int flags)
 }
-
 declare 29 generic {
-    int Tk_ConfigureWidget (Tcl_Interp *interp,
+    int Tk_ConfigureWidget(Tcl_Interp *interp,
 	    Tk_Window tkwin, Tk_ConfigSpec *specs,
 	    int argc, CONST84 char **argv, char *widgRec,
 	    int flags)
 }
-
 declare 30 generic {
-    void Tk_ConfigureWindow (Tk_Window tkwin,
+    void Tk_ConfigureWindow(Tk_Window tkwin,
 	    unsigned int valueMask, XWindowChanges *valuePtr)
 }
-
 declare 31 generic {
-    Tk_TextLayout Tk_ComputeTextLayout (Tk_Font font,
+    Tk_TextLayout Tk_ComputeTextLayout(Tk_Font font,
 	    CONST char *str, int numChars, int wrapLength,
 	    Tk_Justify justify, int flags, int *widthPtr,
 	    int *heightPtr)
 }
-
 declare 32 generic {
-    Tk_Window Tk_CoordsToWindow (int rootX, int rootY, Tk_Window tkwin)
+    Tk_Window Tk_CoordsToWindow(int rootX, int rootY, Tk_Window tkwin)
 }
-
 declare 33 generic {
-    unsigned long Tk_CreateBinding (Tcl_Interp *interp,
+    unsigned long Tk_CreateBinding(Tcl_Interp *interp,
 	    Tk_BindingTable bindingTable, ClientData object,
 	    CONST char *eventStr, CONST char *command, int append)
 }
-
 declare 34 generic {
-    Tk_BindingTable Tk_CreateBindingTable (Tcl_Interp *interp)
+    Tk_BindingTable Tk_CreateBindingTable(Tcl_Interp *interp)
 }
-
 declare 35 generic {
-    Tk_ErrorHandler Tk_CreateErrorHandler (Display *display,
+    Tk_ErrorHandler Tk_CreateErrorHandler(Display *display,
 	    int errNum, int request, int minorCode,
 	    Tk_ErrorProc *errorProc, ClientData clientData)
 }
-
 declare 36 generic {
-    void Tk_CreateEventHandler (Tk_Window token,
+    void Tk_CreateEventHandler(Tk_Window token,
 	    unsigned long mask, Tk_EventProc *proc,
 	    ClientData clientData)
 }
-
 declare 37 generic {
-    void Tk_CreateGenericHandler (Tk_GenericProc *proc, ClientData clientData)
+    void Tk_CreateGenericHandler(Tk_GenericProc *proc, ClientData clientData)
 }
-
 declare 38 generic {
-    void Tk_CreateImageType (Tk_ImageType *typePtr)
+    void Tk_CreateImageType(Tk_ImageType *typePtr)
 }
-
 declare 39 generic {
-    void Tk_CreateItemType (Tk_ItemType *typePtr)
+    void Tk_CreateItemType(Tk_ItemType *typePtr)
 }
-
 declare 40 generic {
-    void Tk_CreatePhotoImageFormat (Tk_PhotoImageFormat *formatPtr)
+    void Tk_CreatePhotoImageFormat(Tk_PhotoImageFormat *formatPtr)
 }
-
 declare 41 generic {
-    void Tk_CreateSelHandler (Tk_Window tkwin,
+    void Tk_CreateSelHandler(Tk_Window tkwin,
 	    Atom selection, Atom target,
 	    Tk_SelectionProc *proc, ClientData clientData,
 	    Atom format)
 }
-
 declare 42 generic {
-    Tk_Window Tk_CreateWindow (Tcl_Interp *interp,
+    Tk_Window Tk_CreateWindow(Tcl_Interp *interp,
 	    Tk_Window parent, CONST char *name, CONST char *screenName)
 }
-
 declare 43 generic {
-    Tk_Window Tk_CreateWindowFromPath (Tcl_Interp *interp, Tk_Window tkwin,
+    Tk_Window Tk_CreateWindowFromPath(Tcl_Interp *interp, Tk_Window tkwin,
 	    CONST char *pathName, CONST char *screenName)
 }
-
 declare 44 generic {
-    int Tk_DefineBitmap (Tcl_Interp *interp, CONST char *name,
+    int Tk_DefineBitmap(Tcl_Interp *interp, CONST char *name,
 	    CONST char *source, int width, int height)
 }
-
 declare 45 generic {
-    void Tk_DefineCursor (Tk_Window window, Tk_Cursor cursor)
+    void Tk_DefineCursor(Tk_Window window, Tk_Cursor cursor)
 }
-
 declare 46 generic {
-    void Tk_DeleteAllBindings (Tk_BindingTable bindingTable, ClientData object)
+    void Tk_DeleteAllBindings(Tk_BindingTable bindingTable, ClientData object)
 }
-
 declare 47 generic {
-    int Tk_DeleteBinding (Tcl_Interp *interp,
+    int Tk_DeleteBinding(Tcl_Interp *interp,
 	    Tk_BindingTable bindingTable, ClientData object,
 	    CONST char *eventStr)
 }
-
 declare 48 generic {
-    void Tk_DeleteBindingTable (Tk_BindingTable bindingTable)
+    void Tk_DeleteBindingTable(Tk_BindingTable bindingTable)
 }
-
 declare 49 generic {
-    void Tk_DeleteErrorHandler (Tk_ErrorHandler handler)
+    void Tk_DeleteErrorHandler(Tk_ErrorHandler handler)
 }
-
 declare 50 generic {
-    void Tk_DeleteEventHandler (Tk_Window token,
+    void Tk_DeleteEventHandler(Tk_Window token,
 	    unsigned long mask, Tk_EventProc *proc,
 	    ClientData clientData)
 }
-
 declare 51 generic {
-    void Tk_DeleteGenericHandler (Tk_GenericProc *proc, ClientData clientData)
+    void Tk_DeleteGenericHandler(Tk_GenericProc *proc, ClientData clientData)
 }
-
 declare 52 generic {
-    void Tk_DeleteImage (Tcl_Interp *interp, CONST char *name)
+    void Tk_DeleteImage(Tcl_Interp *interp, CONST char *name)
 }
-
 declare 53 generic {
-    void Tk_DeleteSelHandler (Tk_Window tkwin, Atom selection, Atom target)
+    void Tk_DeleteSelHandler(Tk_Window tkwin, Atom selection, Atom target)
 }
-
 declare 54 generic {
-    void Tk_DestroyWindow (Tk_Window tkwin)
+    void Tk_DestroyWindow(Tk_Window tkwin)
 }
-
 declare 55 generic {
-    CONST84_RETURN char * Tk_DisplayName (Tk_Window tkwin)
+    CONST84_RETURN char * Tk_DisplayName(Tk_Window tkwin)
 }
-
 declare 56 generic {
-    int Tk_DistanceToTextLayout (Tk_TextLayout layout, int x, int y)
+    int Tk_DistanceToTextLayout(Tk_TextLayout layout, int x, int y)
 }
-
 declare 57 generic {
-    void Tk_Draw3DPolygon (Tk_Window tkwin,
+    void Tk_Draw3DPolygon(Tk_Window tkwin,
 	    Drawable drawable, Tk_3DBorder border,
 	    XPoint *pointPtr, int numPoints, int borderWidth,
 	    int leftRelief)
 }
-
 declare 58 generic {
-    void Tk_Draw3DRectangle (Tk_Window tkwin, Drawable drawable,
+    void Tk_Draw3DRectangle(Tk_Window tkwin, Drawable drawable,
 	    Tk_3DBorder border, int x, int y, int width, int height,
 	    int borderWidth, int relief)
 }
-
 declare 59 generic {
-    void Tk_DrawChars (Display *display, Drawable drawable, GC gc,
+    void Tk_DrawChars(Display *display, Drawable drawable, GC gc,
 	    Tk_Font tkfont, CONST char *source, int numBytes, int x, int y)
 }
-
 declare 60 generic {
-    void Tk_DrawFocusHighlight (Tk_Window tkwin, GC gc, int width,
+    void Tk_DrawFocusHighlight(Tk_Window tkwin, GC gc, int width,
 	    Drawable drawable)
 }
-
 declare 61 generic {
-    void Tk_DrawTextLayout (Display *display,
+    void Tk_DrawTextLayout(Display *display,
 	    Drawable drawable, GC gc, Tk_TextLayout layout,
 	    int x, int y, int firstChar, int lastChar)
 }
-
 declare 62 generic {
-    void Tk_Fill3DPolygon (Tk_Window tkwin,
+    void Tk_Fill3DPolygon(Tk_Window tkwin,
 	    Drawable drawable, Tk_3DBorder border,
 	    XPoint *pointPtr, int numPoints, int borderWidth,
 	    int leftRelief)
 }
-
 declare 63 generic {
-    void Tk_Fill3DRectangle (Tk_Window tkwin,
+    void Tk_Fill3DRectangle(Tk_Window tkwin,
 	    Drawable drawable, Tk_3DBorder border, int x,
 	    int y, int width, int height, int borderWidth,
 	    int relief)
 }
-
 declare 64 generic {
-    Tk_PhotoHandle Tk_FindPhoto (Tcl_Interp *interp, CONST char *imageName)
+    Tk_PhotoHandle Tk_FindPhoto(Tcl_Interp *interp, CONST char *imageName)
 }
-
 declare 65 generic {
-    Font Tk_FontId (Tk_Font font)
+    Font Tk_FontId(Tk_Font font)
 }
-
 declare 66 generic {
-    void Tk_Free3DBorder (Tk_3DBorder border)
+    void Tk_Free3DBorder(Tk_3DBorder border)
 }
-
 declare 67 generic {
-    void Tk_FreeBitmap (Display *display, Pixmap bitmap)
+    void Tk_FreeBitmap(Display *display, Pixmap bitmap)
 }
-
 declare 68 generic {
-    void Tk_FreeColor (XColor *colorPtr)
+    void Tk_FreeColor(XColor *colorPtr)
 }
-
 declare 69 generic {
-    void Tk_FreeColormap (Display *display, Colormap colormap)
+    void Tk_FreeColormap(Display *display, Colormap colormap)
 }
-
 declare 70 generic {
-    void Tk_FreeCursor (Display *display, Tk_Cursor cursor)
+    void Tk_FreeCursor(Display *display, Tk_Cursor cursor)
 }
-
 declare 71 generic {
-    void Tk_FreeFont (Tk_Font f)
+    void Tk_FreeFont(Tk_Font f)
 }
-
 declare 72 generic {
-    void Tk_FreeGC (Display *display, GC gc)
+    void Tk_FreeGC(Display *display, GC gc)
 }
-
 declare 73 generic {
-    void Tk_FreeImage (Tk_Image image)
+    void Tk_FreeImage(Tk_Image image)
 }
-
 declare 74 generic {
-    void Tk_FreeOptions (Tk_ConfigSpec *specs,
+    void Tk_FreeOptions(Tk_ConfigSpec *specs,
 	    char *widgRec, Display *display, int needFlags)
 }
-
 declare 75 generic {
-    void Tk_FreePixmap (Display *display, Pixmap pixmap)
+    void Tk_FreePixmap(Display *display, Pixmap pixmap)
 }
-
 declare 76 generic {
-    void Tk_FreeTextLayout (Tk_TextLayout textLayout)
+    void Tk_FreeTextLayout(Tk_TextLayout textLayout)
 }
-
 declare 77 generic {
-    void Tk_FreeXId (Display *display, XID xid)
+    void Tk_FreeXId(Display *display, XID xid)
 }
-
 declare 78 generic {
-    GC Tk_GCForColor (XColor *colorPtr, Drawable drawable)
+    GC Tk_GCForColor(XColor *colorPtr, Drawable drawable)
 }
-
 declare 79 generic {
-    void Tk_GeometryRequest (Tk_Window tkwin, int reqWidth,  int reqHeight)
+    void Tk_GeometryRequest(Tk_Window tkwin, int reqWidth,  int reqHeight)
 }
-
 declare 80 generic {
-    Tk_3DBorder	Tk_Get3DBorder (Tcl_Interp *interp, Tk_Window tkwin,
+    Tk_3DBorder	Tk_Get3DBorder(Tcl_Interp *interp, Tk_Window tkwin,
 	    Tk_Uid colorName)
 }
-
 declare 81 generic {
-    void Tk_GetAllBindings (Tcl_Interp *interp,
+    void Tk_GetAllBindings(Tcl_Interp *interp,
 	    Tk_BindingTable bindingTable, ClientData object)
 }
-
 declare 82 generic {
-    int Tk_GetAnchor (Tcl_Interp *interp,
+    int Tk_GetAnchor(Tcl_Interp *interp,
 	    CONST char *str, Tk_Anchor *anchorPtr)
 }
-
 declare 83 generic {
-    CONST84_RETURN char * Tk_GetAtomName (Tk_Window tkwin, Atom atom)
+    CONST84_RETURN char * Tk_GetAtomName(Tk_Window tkwin, Atom atom)
 }
-
 declare 84 generic {
-    CONST84_RETURN char * Tk_GetBinding (Tcl_Interp *interp,
+    CONST84_RETURN char * Tk_GetBinding(Tcl_Interp *interp,
 	    Tk_BindingTable bindingTable, ClientData object,
 	    CONST char *eventStr)
 }
-
 declare 85 generic {
-    Pixmap Tk_GetBitmap (Tcl_Interp *interp, Tk_Window tkwin, CONST char * str)
+    Pixmap Tk_GetBitmap(Tcl_Interp *interp, Tk_Window tkwin, CONST char * str)
 }
-
 declare 86 generic {
-    Pixmap Tk_GetBitmapFromData (Tcl_Interp *interp,
+    Pixmap Tk_GetBitmapFromData(Tcl_Interp *interp,
 	    Tk_Window tkwin, CONST char *source, int width, int height)
 }
-
 declare 87 generic {
-    int Tk_GetCapStyle (Tcl_Interp *interp, CONST char *str, int *capPtr)
+    int Tk_GetCapStyle(Tcl_Interp *interp, CONST char *str, int *capPtr)
 }
-
 declare 88 generic {
-    XColor * Tk_GetColor (Tcl_Interp *interp, Tk_Window tkwin, Tk_Uid name)
+    XColor * Tk_GetColor(Tcl_Interp *interp, Tk_Window tkwin, Tk_Uid name)
 }
-
 declare 89 generic {
-    XColor * Tk_GetColorByValue (Tk_Window tkwin, XColor *colorPtr)
+    XColor * Tk_GetColorByValue(Tk_Window tkwin, XColor *colorPtr)
 }
-
 declare 90 generic {
-    Colormap Tk_GetColormap (Tcl_Interp *interp, Tk_Window tkwin,
+    Colormap Tk_GetColormap(Tcl_Interp *interp, Tk_Window tkwin,
 	    CONST char *str)
 }
-
 declare 91 generic {
-    Tk_Cursor Tk_GetCursor (Tcl_Interp *interp, Tk_Window tkwin,
+    Tk_Cursor Tk_GetCursor(Tcl_Interp *interp, Tk_Window tkwin,
 	    Tk_Uid str)
 }
-
 declare 92 generic {
-    Tk_Cursor Tk_GetCursorFromData (Tcl_Interp *interp,
+    Tk_Cursor Tk_GetCursorFromData(Tcl_Interp *interp,
 	    Tk_Window tkwin, CONST char *source, CONST char *mask,
 	    int width, int height, int xHot, int yHot,
 	    Tk_Uid fg, Tk_Uid bg)
 }
-
 declare 93 generic {
-    Tk_Font Tk_GetFont (Tcl_Interp *interp,
+    Tk_Font Tk_GetFont(Tcl_Interp *interp,
 	    Tk_Window tkwin, CONST char *str)
 }
-
 declare 94 generic {
-    Tk_Font Tk_GetFontFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    Tk_Font Tk_GetFontFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 95 generic {
-    void Tk_GetFontMetrics (Tk_Font font, Tk_FontMetrics *fmPtr)
+    void Tk_GetFontMetrics(Tk_Font font, Tk_FontMetrics *fmPtr)
 }
-
 declare 96 generic {
-    GC Tk_GetGC (Tk_Window tkwin, unsigned long valueMask, XGCValues *valuePtr)
+    GC Tk_GetGC(Tk_Window tkwin, unsigned long valueMask, XGCValues *valuePtr)
 }
-
 declare 97 generic {
-    Tk_Image Tk_GetImage (Tcl_Interp *interp, Tk_Window tkwin, CONST char *name,
+    Tk_Image Tk_GetImage(Tcl_Interp *interp, Tk_Window tkwin, CONST char *name,
 	    Tk_ImageChangedProc *changeProc, ClientData clientData)
 }
-
 declare 98 generic {
-    ClientData Tk_GetImageMasterData (Tcl_Interp *interp,
+    ClientData Tk_GetImageMasterData(Tcl_Interp *interp,
 	    CONST char *name, Tk_ImageType **typePtrPtr)
 }
-
 declare 99 generic {
-    Tk_ItemType * Tk_GetItemTypes (void)
+    Tk_ItemType * Tk_GetItemTypes(void)
 }
-
 declare 100 generic {
-    int Tk_GetJoinStyle (Tcl_Interp *interp, CONST char *str, int *joinPtr)
+    int Tk_GetJoinStyle(Tcl_Interp *interp, CONST char *str, int *joinPtr)
 }
-
 declare 101 generic {
-    int Tk_GetJustify (Tcl_Interp *interp,
+    int Tk_GetJustify(Tcl_Interp *interp,
 	    CONST char *str, Tk_Justify *justifyPtr)
 }
-
 declare 102 generic {
-    int Tk_GetNumMainWindows (void)
+    int Tk_GetNumMainWindows(void)
 }
-
 declare 103 generic {
-    Tk_Uid Tk_GetOption (Tk_Window tkwin, CONST char *name, 
+    Tk_Uid Tk_GetOption(Tk_Window tkwin, CONST char *name,
 	    CONST char *className)
 }
-
 declare 104 generic {
-    int Tk_GetPixels (Tcl_Interp *interp,
+    int Tk_GetPixels(Tcl_Interp *interp,
 	    Tk_Window tkwin, CONST char *str, int *intPtr)
 }
-
 declare 105 generic {
-    Pixmap Tk_GetPixmap (Display *display, Drawable d,
+    Pixmap Tk_GetPixmap(Display *display, Drawable d,
 	    int width, int height, int depth)
 }
-
 declare 106 generic {
-    int Tk_GetRelief (Tcl_Interp *interp, CONST char *name, int *reliefPtr)
+    int Tk_GetRelief(Tcl_Interp *interp, CONST char *name, int *reliefPtr)
 }
-
 declare 107 generic {
-    void Tk_GetRootCoords (Tk_Window tkwin, int *xPtr, int *yPtr)
+    void Tk_GetRootCoords(Tk_Window tkwin, int *xPtr, int *yPtr)
 }
-
 declare 108 generic {
-    int Tk_GetScrollInfo (Tcl_Interp *interp,
+    int Tk_GetScrollInfo(Tcl_Interp *interp,
 	    int argc, CONST84 char **argv, double *dblPtr, int *intPtr)
 }
-
 declare 109 generic {
-    int Tk_GetScreenMM (Tcl_Interp *interp,
+    int Tk_GetScreenMM(Tcl_Interp *interp,
 	    Tk_Window tkwin, CONST char *str, double *doublePtr)
 }
-
 declare 110 generic {
-    int Tk_GetSelection (Tcl_Interp *interp,
+    int Tk_GetSelection(Tcl_Interp *interp,
 	    Tk_Window tkwin, Atom selection, Atom target,
 	    Tk_GetSelProc *proc, ClientData clientData)
 }
-
 declare 111 generic {
-    Tk_Uid Tk_GetUid (CONST char *str)
+    Tk_Uid Tk_GetUid(CONST char *str)
 }
-
 declare 112 generic {
-    Visual * Tk_GetVisual (Tcl_Interp *interp,
+    Visual * Tk_GetVisual(Tcl_Interp *interp,
 	    Tk_Window tkwin, CONST char *str, int *depthPtr,
 	    Colormap *colormapPtr)
 }
-
 declare 113 generic {
-    void Tk_GetVRootGeometry (Tk_Window tkwin,
+    void Tk_GetVRootGeometry(Tk_Window tkwin,
 	    int *xPtr, int *yPtr, int *widthPtr, int *heightPtr)
 }
-
 declare 114 generic {
-    int Tk_Grab (Tcl_Interp *interp, Tk_Window tkwin, int grabGlobal)
+    int Tk_Grab(Tcl_Interp *interp, Tk_Window tkwin, int grabGlobal)
 }
-
 declare 115 generic {
-    void Tk_HandleEvent (XEvent *eventPtr)
+    void Tk_HandleEvent(XEvent *eventPtr)
 }
-
 declare 116 generic {
-    Tk_Window Tk_IdToWindow (Display *display, Window window)
+    Tk_Window Tk_IdToWindow(Display *display, Window window)
 }
-
 declare 117 generic {
-    void Tk_ImageChanged (Tk_ImageMaster master, int x, int y,
+    void Tk_ImageChanged(Tk_ImageMaster master, int x, int y,
 	    int width, int height, int imageWidth, int imageHeight)
 }
-
 declare 118 generic {
-    int Tk_Init (Tcl_Interp *interp)
+    int Tk_Init(Tcl_Interp *interp)
 }
-
 declare 119 generic {
-    Atom Tk_InternAtom (Tk_Window tkwin, CONST char *name)
+    Atom Tk_InternAtom(Tk_Window tkwin, CONST char *name)
 }
-
 declare 120 generic {
-    int Tk_IntersectTextLayout (Tk_TextLayout layout, int x, int y,
+    int Tk_IntersectTextLayout(Tk_TextLayout layout, int x, int y,
 	    int width, int height)
 }
-
 declare 121 generic {
-    void Tk_MaintainGeometry (Tk_Window slave,
+    void Tk_MaintainGeometry(Tk_Window slave,
 	    Tk_Window master, int x, int y, int width, int height)
 }
-
 declare 122 generic {
-    Tk_Window Tk_MainWindow (Tcl_Interp *interp)
+    Tk_Window Tk_MainWindow(Tcl_Interp *interp)
 }
-
 declare 123 generic {
-    void Tk_MakeWindowExist (Tk_Window tkwin)
+    void Tk_MakeWindowExist(Tk_Window tkwin)
 }
-
 declare 124 generic {
-    void Tk_ManageGeometry (Tk_Window tkwin,
+    void Tk_ManageGeometry(Tk_Window tkwin,
 	    CONST Tk_GeomMgr *mgrPtr, ClientData clientData)
 }
-
 declare 125 generic {
-    void Tk_MapWindow (Tk_Window tkwin)
+    void Tk_MapWindow(Tk_Window tkwin)
 }
-
 declare 126 generic {
-    int Tk_MeasureChars (Tk_Font tkfont,
+    int Tk_MeasureChars(Tk_Font tkfont,
 	    CONST char *source, int numBytes, int maxPixels,
 	    int flags, int *lengthPtr)
 }
-
 declare 127 generic {
-    void Tk_MoveResizeWindow (Tk_Window tkwin,
+    void Tk_MoveResizeWindow(Tk_Window tkwin,
 	    int x, int y, int width, int height)
 }
-
 declare 128 generic {
-    void Tk_MoveWindow (Tk_Window tkwin, int x, int y)
+    void Tk_MoveWindow(Tk_Window tkwin, int x, int y)
 }
-
 declare 129 generic {
-    void Tk_MoveToplevelWindow (Tk_Window tkwin, int x, int y)
+    void Tk_MoveToplevelWindow(Tk_Window tkwin, int x, int y)
 }
-
 declare 130 generic {
-    CONST84_RETURN char * Tk_NameOf3DBorder (Tk_3DBorder border)
+    CONST84_RETURN char * Tk_NameOf3DBorder(Tk_3DBorder border)
 }
-
 declare 131 generic {
-    CONST84_RETURN char * Tk_NameOfAnchor (Tk_Anchor anchor)
+    CONST84_RETURN char * Tk_NameOfAnchor(Tk_Anchor anchor)
 }
-
 declare 132 generic {
-    CONST84_RETURN char * Tk_NameOfBitmap (Display *display, Pixmap bitmap)
+    CONST84_RETURN char * Tk_NameOfBitmap(Display *display, Pixmap bitmap)
 }
-
 declare 133 generic {
-    CONST84_RETURN char * Tk_NameOfCapStyle (int cap)
+    CONST84_RETURN char * Tk_NameOfCapStyle(int cap)
 }
-
 declare 134 generic {
-    CONST84_RETURN char * Tk_NameOfColor (XColor *colorPtr)
+    CONST84_RETURN char * Tk_NameOfColor(XColor *colorPtr)
 }
-
 declare 135 generic {
-    CONST84_RETURN char * Tk_NameOfCursor (Display *display, Tk_Cursor cursor)
+    CONST84_RETURN char * Tk_NameOfCursor(Display *display, Tk_Cursor cursor)
 }
-
 declare 136 generic {
-    CONST84_RETURN char * Tk_NameOfFont (Tk_Font font)
+    CONST84_RETURN char * Tk_NameOfFont(Tk_Font font)
 }
-
 declare 137 generic {
-    CONST84_RETURN char * Tk_NameOfImage (Tk_ImageMaster imageMaster)
+    CONST84_RETURN char * Tk_NameOfImage(Tk_ImageMaster imageMaster)
 }
-
 declare 138 generic {
-    CONST84_RETURN char * Tk_NameOfJoinStyle (int join)
+    CONST84_RETURN char * Tk_NameOfJoinStyle(int join)
 }
-
 declare 139 generic {
-    CONST84_RETURN char * Tk_NameOfJustify (Tk_Justify justify)
+    CONST84_RETURN char * Tk_NameOfJustify(Tk_Justify justify)
 }
-
 declare 140 generic {
-    CONST84_RETURN char * Tk_NameOfRelief (int relief)
+    CONST84_RETURN char * Tk_NameOfRelief(int relief)
 }
-
 declare 141 generic {
-    Tk_Window Tk_NameToWindow (Tcl_Interp *interp,
+    Tk_Window Tk_NameToWindow(Tcl_Interp *interp,
 	    CONST char *pathName, Tk_Window tkwin)
 }
-
 declare 142 generic {
-    void Tk_OwnSelection (Tk_Window tkwin,
+    void Tk_OwnSelection(Tk_Window tkwin,
 	    Atom selection, Tk_LostSelProc *proc,
 	    ClientData clientData)
 }
-
 declare 143 generic {
-    int Tk_ParseArgv (Tcl_Interp *interp,
+    int Tk_ParseArgv(Tcl_Interp *interp,
 	    Tk_Window tkwin, int *argcPtr, CONST84 char **argv,
 	    Tk_ArgvInfo *argTable, int flags)
 }
-
 declare 144 generic {
-    void Tk_PhotoPutBlock_NoComposite (Tk_PhotoHandle handle,
+    void Tk_PhotoPutBlock_NoComposite(Tk_PhotoHandle handle,
 	    Tk_PhotoImageBlock *blockPtr, int x, int y,
 	    int width, int height)
 }
-
 declare 145 generic {
-    void Tk_PhotoPutZoomedBlock_NoComposite (Tk_PhotoHandle handle,
+    void Tk_PhotoPutZoomedBlock_NoComposite(Tk_PhotoHandle handle,
 	    Tk_PhotoImageBlock *blockPtr, int x, int y,
 	    int width, int height, int zoomX, int zoomY,
 	    int subsampleX, int subsampleY)
 }
-
 declare 146 generic {
-    int Tk_PhotoGetImage (Tk_PhotoHandle handle, Tk_PhotoImageBlock *blockPtr)
+    int Tk_PhotoGetImage(Tk_PhotoHandle handle, Tk_PhotoImageBlock *blockPtr)
 }
-
 declare 147 generic {
-    void Tk_PhotoBlank (Tk_PhotoHandle handle)
+    void Tk_PhotoBlank(Tk_PhotoHandle handle)
 }
-
 declare 148 generic {
-    void Tk_PhotoExpand_Panic (Tk_PhotoHandle handle, int width, int height )
+    void Tk_PhotoExpand_Panic(Tk_PhotoHandle handle, int width, int height )
 }
-
 declare 149 generic {
-    void Tk_PhotoGetSize (Tk_PhotoHandle handle, int *widthPtr, int *heightPtr)
+    void Tk_PhotoGetSize(Tk_PhotoHandle handle, int *widthPtr, int *heightPtr)
 }
-
 declare 150 generic {
-    void Tk_PhotoSetSize_Panic (Tk_PhotoHandle handle, int width, int height)
+    void Tk_PhotoSetSize_Panic(Tk_PhotoHandle handle, int width, int height)
 }
-
 declare 151 generic {
-    int Tk_PointToChar (Tk_TextLayout layout, int x, int y)
+    int Tk_PointToChar(Tk_TextLayout layout, int x, int y)
 }
-
 declare 152 generic {
-    int Tk_PostscriptFontName (Tk_Font tkfont, Tcl_DString *dsPtr)
+    int Tk_PostscriptFontName(Tk_Font tkfont, Tcl_DString *dsPtr)
 }
-
 declare 153 generic {
-    void Tk_PreserveColormap (Display *display, Colormap colormap)
+    void Tk_PreserveColormap(Display *display, Colormap colormap)
 }
-
 declare 154 generic {
-    void Tk_QueueWindowEvent (XEvent *eventPtr, Tcl_QueuePosition position)
+    void Tk_QueueWindowEvent(XEvent *eventPtr, Tcl_QueuePosition position)
 }
-
 declare 155 generic {
-    void Tk_RedrawImage (Tk_Image image, int imageX,
+    void Tk_RedrawImage(Tk_Image image, int imageX,
 	    int imageY, int width, int height,
 	    Drawable drawable, int drawableX, int drawableY)
 }
-
 declare 156 generic {
-    void Tk_ResizeWindow (Tk_Window tkwin, int width, int height)
+    void Tk_ResizeWindow(Tk_Window tkwin, int width, int height)
 }
-
 declare 157 generic {
-    int Tk_RestackWindow (Tk_Window tkwin, int aboveBelow, Tk_Window other)
+    int Tk_RestackWindow(Tk_Window tkwin, int aboveBelow, Tk_Window other)
 }
-
 declare 158 generic {
-    Tk_RestrictProc *Tk_RestrictEvents (Tk_RestrictProc *proc,
+    Tk_RestrictProc *Tk_RestrictEvents(Tk_RestrictProc *proc,
 	    ClientData arg, ClientData *prevArgPtr)
 }
-
 declare 159 generic {
-    int Tk_SafeInit (Tcl_Interp *interp)
+    int Tk_SafeInit(Tcl_Interp *interp)
 }
-
 declare 160 generic {
-    CONST char * Tk_SetAppName (Tk_Window tkwin, CONST char *name)
+    CONST char * Tk_SetAppName(Tk_Window tkwin, CONST char *name)
 }
-
 declare 161 generic {
-    void Tk_SetBackgroundFromBorder (Tk_Window tkwin, Tk_3DBorder border)
+    void Tk_SetBackgroundFromBorder(Tk_Window tkwin, Tk_3DBorder border)
 }
-
 declare 162 generic {
-    void Tk_SetClass (Tk_Window tkwin, CONST char *className)
+    void Tk_SetClass(Tk_Window tkwin, CONST char *className)
 }
-
 declare 163 generic {
-    void Tk_SetGrid (Tk_Window tkwin, int reqWidth, int reqHeight,
+    void Tk_SetGrid(Tk_Window tkwin, int reqWidth, int reqHeight,
 	    int gridWidth, int gridHeight)
 }
-
 declare 164 generic {
-    void Tk_SetInternalBorder (Tk_Window tkwin, int width)
+    void Tk_SetInternalBorder(Tk_Window tkwin, int width)
 }
-
 declare 165 generic {
-    void Tk_SetWindowBackground (Tk_Window tkwin, unsigned long pixel)
+    void Tk_SetWindowBackground(Tk_Window tkwin, unsigned long pixel)
 }
-
 declare 166 generic {
-    void Tk_SetWindowBackgroundPixmap (Tk_Window tkwin, Pixmap pixmap)
+    void Tk_SetWindowBackgroundPixmap(Tk_Window tkwin, Pixmap pixmap)
 }
-
 declare 167 generic {
-    void Tk_SetWindowBorder (Tk_Window tkwin, unsigned long pixel)
+    void Tk_SetWindowBorder(Tk_Window tkwin, unsigned long pixel)
 }
-
 declare 168 generic {
-    void Tk_SetWindowBorderWidth (Tk_Window tkwin, int width)
+    void Tk_SetWindowBorderWidth(Tk_Window tkwin, int width)
 }
-
 declare 169 generic {
-    void Tk_SetWindowBorderPixmap (Tk_Window tkwin, Pixmap pixmap)
+    void Tk_SetWindowBorderPixmap(Tk_Window tkwin, Pixmap pixmap)
 }
-
 declare 170 generic {
-    void Tk_SetWindowColormap (Tk_Window tkwin, Colormap colormap)
+    void Tk_SetWindowColormap(Tk_Window tkwin, Colormap colormap)
 }
-
 declare 171 generic {
-    int Tk_SetWindowVisual (Tk_Window tkwin, Visual *visual, int depth,
+    int Tk_SetWindowVisual(Tk_Window tkwin, Visual *visual, int depth,
 	    Colormap colormap)
 }
-
 declare 172 generic {
-    void Tk_SizeOfBitmap (Display *display, Pixmap bitmap, int *widthPtr,
+    void Tk_SizeOfBitmap(Display *display, Pixmap bitmap, int *widthPtr,
 	    int *heightPtr)
 }
-
 declare 173 generic {
-    void Tk_SizeOfImage (Tk_Image image, int *widthPtr, int *heightPtr)
+    void Tk_SizeOfImage(Tk_Image image, int *widthPtr, int *heightPtr)
 }
-
 declare 174 generic {
-    int Tk_StrictMotif (Tk_Window tkwin)
+    int Tk_StrictMotif(Tk_Window tkwin)
 }
-
 declare 175 generic {
-    void Tk_TextLayoutToPostscript (Tcl_Interp *interp, Tk_TextLayout layout)
+    void Tk_TextLayoutToPostscript(Tcl_Interp *interp, Tk_TextLayout layout)
 }
-
 declare 176 generic {
-    int Tk_TextWidth (Tk_Font font, CONST char *str, int numBytes)
+    int Tk_TextWidth(Tk_Font font, CONST char *str, int numBytes)
 }
-
 declare 177 generic {
-    void Tk_UndefineCursor (Tk_Window window)
+    void Tk_UndefineCursor(Tk_Window window)
 }
-
 declare 178 generic {
-    void Tk_UnderlineChars (Display *display,
+    void Tk_UnderlineChars(Display *display,
 	    Drawable drawable, GC gc, Tk_Font tkfont,
 	    CONST char *source, int x, int y, int firstByte,
 	    int lastByte)
 }
-
 declare 179 generic {
-    void Tk_UnderlineTextLayout (Display *display, Drawable drawable, GC gc,
+    void Tk_UnderlineTextLayout(Display *display, Drawable drawable, GC gc,
 	    Tk_TextLayout layout, int x, int y,
 	    int underline)
 }
-
 declare 180 generic {
-    void Tk_Ungrab (Tk_Window tkwin)
+    void Tk_Ungrab(Tk_Window tkwin)
 }
-
 declare 181 generic {
-    void Tk_UnmaintainGeometry (Tk_Window slave, Tk_Window master)
+    void Tk_UnmaintainGeometry(Tk_Window slave, Tk_Window master)
 }
-
 declare 182 generic {
-    void Tk_UnmapWindow (Tk_Window tkwin)
+    void Tk_UnmapWindow(Tk_Window tkwin)
 }
-
 declare 183 generic {
-    void Tk_UnsetGrid (Tk_Window tkwin)
+    void Tk_UnsetGrid(Tk_Window tkwin)
 }
-
 declare 184 generic {
-    void Tk_UpdatePointer (Tk_Window tkwin, int x, int y, int state)
+    void Tk_UpdatePointer(Tk_Window tkwin, int x, int y, int state)
 }
 
 # new functions for 8.1
 
 declare 185 generic {
-    Pixmap  Tk_AllocBitmapFromObj (Tcl_Interp *interp, Tk_Window tkwin,
+    Pixmap  Tk_AllocBitmapFromObj(Tcl_Interp *interp, Tk_Window tkwin,
     Tcl_Obj *objPtr)
 }
-
 declare 186 generic {
-    Tk_3DBorder Tk_Alloc3DBorderFromObj (Tcl_Interp *interp, Tk_Window tkwin,
+    Tk_3DBorder Tk_Alloc3DBorderFromObj(Tcl_Interp *interp, Tk_Window tkwin,
 	    Tcl_Obj *objPtr)
 }
-
 declare 187 generic {
-    XColor *  Tk_AllocColorFromObj (Tcl_Interp *interp, Tk_Window tkwin,
+    XColor *  Tk_AllocColorFromObj(Tcl_Interp *interp, Tk_Window tkwin,
 	    Tcl_Obj *objPtr)
 }
-
 declare 188 generic {
-    Tk_Cursor Tk_AllocCursorFromObj (Tcl_Interp *interp, Tk_Window tkwin,
+    Tk_Cursor Tk_AllocCursorFromObj(Tcl_Interp *interp, Tk_Window tkwin,
 	    Tcl_Obj *objPtr)
 }
-
 declare 189 generic {
-    Tk_Font  Tk_AllocFontFromObj (Tcl_Interp *interp, Tk_Window tkwin,
+    Tk_Font  Tk_AllocFontFromObj(Tcl_Interp *interp, Tk_Window tkwin,
 	    Tcl_Obj *objPtr)
 
 }
-
 declare 190 generic {
-    Tk_OptionTable Tk_CreateOptionTable (Tcl_Interp *interp,
+    Tk_OptionTable Tk_CreateOptionTable(Tcl_Interp *interp,
 	    CONST Tk_OptionSpec *templatePtr)
 }
-
 declare 191 generic {
-    void  Tk_DeleteOptionTable (Tk_OptionTable optionTable)
+    void  Tk_DeleteOptionTable(Tk_OptionTable optionTable)
 }
-
 declare 192 generic {
-    void  Tk_Free3DBorderFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    void  Tk_Free3DBorderFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 193 generic {
-    void  Tk_FreeBitmapFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    void  Tk_FreeBitmapFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 194 generic {
-    void  Tk_FreeColorFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    void  Tk_FreeColorFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 195 generic {
-    void  Tk_FreeConfigOptions (char *recordPtr, Tk_OptionTable optionToken,
+    void  Tk_FreeConfigOptions(char *recordPtr, Tk_OptionTable optionToken,
 	    Tk_Window tkwin)
 
 }
-
 declare 196 generic {
-    void  Tk_FreeSavedOptions (Tk_SavedOptions *savePtr)
+    void  Tk_FreeSavedOptions(Tk_SavedOptions *savePtr)
 }
-
 declare 197 generic {
-    void  Tk_FreeCursorFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    void  Tk_FreeCursorFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 198 generic {
-    void  Tk_FreeFontFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    void  Tk_FreeFontFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 199 generic {
-    Tk_3DBorder Tk_Get3DBorderFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    Tk_3DBorder Tk_Get3DBorderFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 200 generic {
-    int	 Tk_GetAnchorFromObj (Tcl_Interp *interp, Tcl_Obj *objPtr,
+    int	 Tk_GetAnchorFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr,
 	    Tk_Anchor *anchorPtr)
 }
-
 declare 201 generic {
-    Pixmap  Tk_GetBitmapFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    Pixmap  Tk_GetBitmapFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 202 generic {
-    XColor *  Tk_GetColorFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    XColor *  Tk_GetColorFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 203 generic {
-    Tk_Cursor Tk_GetCursorFromObj (Tk_Window tkwin, Tcl_Obj *objPtr)
+    Tk_Cursor Tk_GetCursorFromObj(Tk_Window tkwin, Tcl_Obj *objPtr)
 }
-
 declare 204 generic {
-    Tcl_Obj * Tk_GetOptionInfo (Tcl_Interp *interp,
+    Tcl_Obj * Tk_GetOptionInfo(Tcl_Interp *interp,
 	    char *recordPtr, Tk_OptionTable optionTable,
 	    Tcl_Obj *namePtr, Tk_Window tkwin)
 }
-
 declare 205 generic {
-    Tcl_Obj * Tk_GetOptionValue (Tcl_Interp *interp, char *recordPtr,
+    Tcl_Obj * Tk_GetOptionValue(Tcl_Interp *interp, char *recordPtr,
 	    Tk_OptionTable optionTable, Tcl_Obj *namePtr, Tk_Window tkwin)
 }
-
 declare 206 generic {
-    int	 Tk_GetJustifyFromObj (Tcl_Interp *interp,
+    int	 Tk_GetJustifyFromObj(Tcl_Interp *interp,
 	    Tcl_Obj *objPtr, Tk_Justify *justifyPtr)
 }
-
 declare 207 generic {
-    int	 Tk_GetMMFromObj (Tcl_Interp *interp,
+    int	 Tk_GetMMFromObj(Tcl_Interp *interp,
 	    Tk_Window tkwin, Tcl_Obj *objPtr, double *doublePtr)
 }
-
 declare 208 generic {
-    int	 Tk_GetPixelsFromObj (Tcl_Interp *interp,
+    int	 Tk_GetPixelsFromObj(Tcl_Interp *interp,
 	    Tk_Window tkwin, Tcl_Obj *objPtr, int *intPtr)
 }
-
 declare 209 generic {
-    int	 Tk_GetReliefFromObj (Tcl_Interp *interp,
+    int	 Tk_GetReliefFromObj(Tcl_Interp *interp,
 	    Tcl_Obj *objPtr, int *resultPtr)
 }
-
 declare 210 generic {
-    int	 Tk_GetScrollInfoObj (Tcl_Interp *interp,
+    int	 Tk_GetScrollInfoObj(Tcl_Interp *interp,
 	    int objc, Tcl_Obj *CONST objv[], double *dblPtr, int *intPtr)
 }
-
 declare 211 generic {
-    int	 Tk_InitOptions (Tcl_Interp *interp, char *recordPtr,
+    int	 Tk_InitOptions(Tcl_Interp *interp, char *recordPtr,
 	    Tk_OptionTable optionToken, Tk_Window tkwin)
 }
-
 declare 212 generic {
-    void  Tk_MainEx (int argc, char **argv, Tcl_AppInitProc *appInitProc,
+    void  Tk_MainEx(int argc, char **argv, Tcl_AppInitProc *appInitProc,
 	    Tcl_Interp *interp)
 }
-
 declare 213 generic {
-    void  Tk_RestoreSavedOptions (Tk_SavedOptions *savePtr)
+    void  Tk_RestoreSavedOptions(Tk_SavedOptions *savePtr)
 }
-
 declare 214 generic {
-    int	 Tk_SetOptions (Tcl_Interp *interp, char *recordPtr,
+    int	 Tk_SetOptions(Tcl_Interp *interp, char *recordPtr,
 	    Tk_OptionTable optionTable, int objc,
 	    Tcl_Obj *CONST objv[], Tk_Window tkwin,
 	    Tk_SavedOptions *savePtr, int *maskPtr)
 }
-
 declare 215 generic {
-    void Tk_InitConsoleChannels (Tcl_Interp *interp)
+    void Tk_InitConsoleChannels(Tcl_Interp *interp)
 }
-
 declare 216 generic {
-    int Tk_CreateConsoleWindow (Tcl_Interp *interp)
+    int Tk_CreateConsoleWindow(Tcl_Interp *interp)
 }
-
 declare 217 generic {
-    void Tk_CreateSmoothMethod (Tcl_Interp *interp, Tk_SmoothMethod *method)
+    void Tk_CreateSmoothMethod(Tcl_Interp *interp, Tk_SmoothMethod *method)
 }
 
 #declare 218 generic {
-#    void Tk_CreateCanvasVisitor (Tcl_Interp *interp, VOID *typePtr)
+#    void Tk_CreateCanvasVisitor(Tcl_Interp *interp, VOID *typePtr)
 #}
 
 #declare 219 generic {
-#    VOID *Tk_GetCanvasVisitor (Tcl_Interp *interp, CONST char *name)
+#    VOID *Tk_GetCanvasVisitor(Tcl_Interp *interp, CONST char *name)
 #}
 
 declare 220 generic {
-    int Tk_GetDash (Tcl_Interp *interp, CONST char *value, Tk_Dash *dash)
+    int Tk_GetDash(Tcl_Interp *interp, CONST char *value, Tk_Dash *dash)
 }
 declare 221 generic {
-    void Tk_CreateOutline (Tk_Outline *outline)
+    void Tk_CreateOutline(Tk_Outline *outline)
 }
 declare 222 generic {
-    void Tk_DeleteOutline (Display *display, Tk_Outline *outline)
+    void Tk_DeleteOutline(Display *display, Tk_Outline *outline)
 }
 declare 223 generic {
-    int Tk_ConfigOutlineGC (XGCValues *gcValues, Tk_Canvas canvas,
+    int Tk_ConfigOutlineGC(XGCValues *gcValues, Tk_Canvas canvas,
 	    Tk_Item *item, Tk_Outline *outline)
 }
 declare 224 generic {
-    int Tk_ChangeOutlineGC (Tk_Canvas canvas, Tk_Item *item,
+    int Tk_ChangeOutlineGC(Tk_Canvas canvas, Tk_Item *item,
 	    Tk_Outline *outline)
 }
 declare 225 generic {
-    int Tk_ResetOutlineGC (Tk_Canvas canvas, Tk_Item *item,
+    int Tk_ResetOutlineGC(Tk_Canvas canvas, Tk_Item *item,
 	    Tk_Outline *outline)
 }
 declare 226 generic {
-    int Tk_CanvasPsOutline (Tk_Canvas canvas, Tk_Item *item,
+    int Tk_CanvasPsOutline(Tk_Canvas canvas, Tk_Item *item,
 	    Tk_Outline *outline)
 }
 declare 227 generic {
-    void Tk_SetTSOrigin (Tk_Window tkwin, GC gc, int x, int y)
+    void Tk_SetTSOrigin(Tk_Window tkwin, GC gc, int x, int y)
 }
 declare 228 generic {
-    int Tk_CanvasGetCoordFromObj (Tcl_Interp *interp, Tk_Canvas canvas,
+    int Tk_CanvasGetCoordFromObj(Tcl_Interp *interp, Tk_Canvas canvas,
 	    Tcl_Obj *obj, double *doublePtr)
 }
 declare 229 generic {
-    void Tk_CanvasSetOffset (Tk_Canvas canvas, GC gc, Tk_TSOffset *offset)
+    void Tk_CanvasSetOffset(Tk_Canvas canvas, GC gc, Tk_TSOffset *offset)
 }
 declare 230 generic {
-    void Tk_DitherPhoto (Tk_PhotoHandle handle, int x, int y, int width,
+    void Tk_DitherPhoto(Tk_PhotoHandle handle, int x, int y, int width,
 	    int height)
 }
 declare 231 generic {
-    int Tk_PostscriptBitmap (Tcl_Interp *interp, Tk_Window tkwin,
+    int Tk_PostscriptBitmap(Tcl_Interp *interp, Tk_Window tkwin,
 	    Tk_PostscriptInfo psInfo, Pixmap bitmap, int startX,
 	    int startY, int width, int height)
 }
 declare 232 generic {
-    int Tk_PostscriptColor (Tcl_Interp *interp, Tk_PostscriptInfo psInfo,
+    int Tk_PostscriptColor(Tcl_Interp *interp, Tk_PostscriptInfo psInfo,
 	    XColor *colorPtr)
 }
 declare 233 generic {
-    int Tk_PostscriptFont (Tcl_Interp *interp, Tk_PostscriptInfo psInfo,
+    int Tk_PostscriptFont(Tcl_Interp *interp, Tk_PostscriptInfo psInfo,
 	    Tk_Font font)
 }
 declare 234 generic {
-    int Tk_PostscriptImage (Tk_Image image, Tcl_Interp *interp,
+    int Tk_PostscriptImage(Tk_Image image, Tcl_Interp *interp,
 	    Tk_Window tkwin, Tk_PostscriptInfo psinfo, int x, int y,
 	    int width, int height, int prepass)
 }
 declare 235 generic {
-    void Tk_PostscriptPath (Tcl_Interp *interp, Tk_PostscriptInfo psInfo,
+    void Tk_PostscriptPath(Tcl_Interp *interp, Tk_PostscriptInfo psInfo,
 	    double *coordPtr, int numPoints)
 }
 declare 236 generic {
-    int Tk_PostscriptStipple (Tcl_Interp *interp, Tk_Window tkwin,
+    int Tk_PostscriptStipple(Tcl_Interp *interp, Tk_Window tkwin,
 	    Tk_PostscriptInfo psInfo, Pixmap bitmap)
 }
 declare 237 generic {
-    double Tk_PostscriptY (double y, Tk_PostscriptInfo psInfo)
+    double Tk_PostscriptY(double y, Tk_PostscriptInfo psInfo)
 }
 declare 238 generic {
-    int	Tk_PostscriptPhoto (Tcl_Interp *interp,
+    int	Tk_PostscriptPhoto(Tcl_Interp *interp,
 	    Tk_PhotoImageBlock *blockPtr, Tk_PostscriptInfo psInfo,
 	    int width, int height)
 }
@@ -1131,114 +915,112 @@ declare 238 generic {
 # New in 8.4a1
 #
 declare 239 generic {
-    void Tk_CreateClientMessageHandler (Tk_ClientMessageProc *proc)
+    void Tk_CreateClientMessageHandler(Tk_ClientMessageProc *proc)
 }
 declare 240 generic {
-    void Tk_DeleteClientMessageHandler (Tk_ClientMessageProc *proc)
+    void Tk_DeleteClientMessageHandler(Tk_ClientMessageProc *proc)
 }
 
 # New in 8.4a2
 #
 declare 241 generic {
-    Tk_Window Tk_CreateAnonymousWindow (Tcl_Interp *interp,
+    Tk_Window Tk_CreateAnonymousWindow(Tcl_Interp *interp,
 	    Tk_Window parent, CONST char *screenName)
 }
 declare 242 generic {
-    void Tk_SetClassProcs (Tk_Window tkwin,
+    void Tk_SetClassProcs(Tk_Window tkwin,
 	    Tk_ClassProcs *procs, ClientData instanceData)
 }
 
 # New in 8.4a4
 #
 declare 243 generic {
-    void Tk_SetInternalBorderEx (Tk_Window tkwin, int left, int right,
+    void Tk_SetInternalBorderEx(Tk_Window tkwin, int left, int right,
 	    int top, int bottom)
 }
 declare 244 generic {
-    void Tk_SetMinimumRequestSize (Tk_Window tkwin,
+    void Tk_SetMinimumRequestSize(Tk_Window tkwin,
 	    int minWidth, int minHeight)
 }
 
 # New in 8.4a5
 #
 declare 245 generic {
-    void Tk_SetCaretPos (Tk_Window tkwin, int x, int y, int height)
+    void Tk_SetCaretPos(Tk_Window tkwin, int x, int y, int height)
 }
-
 declare 246 generic {
-    void Tk_PhotoPutBlock_Panic (Tk_PhotoHandle handle,
+    void Tk_PhotoPutBlock_Panic(Tk_PhotoHandle handle,
 	    Tk_PhotoImageBlock *blockPtr, int x, int y,
 	    int width, int height, int compRule)
 }
 declare 247 generic {
-    void Tk_PhotoPutZoomedBlock_Panic (Tk_PhotoHandle handle,
+    void Tk_PhotoPutZoomedBlock_Panic(Tk_PhotoHandle handle,
 	    Tk_PhotoImageBlock *blockPtr, int x, int y,
 	    int width, int height, int zoomX, int zoomY,
 	    int subsampleX, int subsampleY, int compRule)
 }
-
 declare 248 generic {
-    int Tk_CollapseMotionEvents (Display *display, int collapse)
+    int Tk_CollapseMotionEvents(Display *display, int collapse)
 }
 
 # Style engine
 declare 249 generic {
-    Tk_StyleEngine Tk_RegisterStyleEngine (CONST char *name,
+    Tk_StyleEngine Tk_RegisterStyleEngine(CONST char *name,
 	    Tk_StyleEngine parent)
 }
 declare 250 generic {
-    Tk_StyleEngine Tk_GetStyleEngine (CONST char *name)
+    Tk_StyleEngine Tk_GetStyleEngine(CONST char *name)
 }
 declare 251 generic {
-    int Tk_RegisterStyledElement (Tk_StyleEngine engine,
+    int Tk_RegisterStyledElement(Tk_StyleEngine engine,
 	    Tk_ElementSpec *templatePtr)
 }
 declare 252 generic {
-    int Tk_GetElementId (CONST char *name)
+    int Tk_GetElementId(CONST char *name)
 }
 declare 253 generic {
-    Tk_Style Tk_CreateStyle (CONST char *name, Tk_StyleEngine engine,
+    Tk_Style Tk_CreateStyle(CONST char *name, Tk_StyleEngine engine,
 	    ClientData clientData)
 }
 declare 254 generic {
-    Tk_Style Tk_GetStyle (Tcl_Interp *interp, CONST char *name)
+    Tk_Style Tk_GetStyle(Tcl_Interp *interp, CONST char *name)
 }
 declare 255 generic {
-    void Tk_FreeStyle (Tk_Style style)
+    void Tk_FreeStyle(Tk_Style style)
 }
 declare 256 generic {
-    CONST char * Tk_NameOfStyle (Tk_Style style)
+    CONST char * Tk_NameOfStyle(Tk_Style style)
 }
 declare 257 generic {
-    Tk_Style  Tk_AllocStyleFromObj (Tcl_Interp *interp, Tcl_Obj *objPtr)
+    Tk_Style  Tk_AllocStyleFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr)
 }
 declare 258 generic {
-    Tk_Style Tk_GetStyleFromObj (Tcl_Obj *objPtr)
+    Tk_Style Tk_GetStyleFromObj(Tcl_Obj *objPtr)
 }
 declare 259 generic {
-    void  Tk_FreeStyleFromObj (Tcl_Obj *objPtr)
+    void  Tk_FreeStyleFromObj(Tcl_Obj *objPtr)
 }
 declare 260 generic {
-    Tk_StyledElement Tk_GetStyledElement (Tk_Style style, int elementId,
+    Tk_StyledElement Tk_GetStyledElement(Tk_Style style, int elementId,
 	Tk_OptionTable optionTable)
 }
 declare 261 generic {
-    void Tk_GetElementSize (Tk_Style style, Tk_StyledElement element,
+    void Tk_GetElementSize(Tk_Style style, Tk_StyledElement element,
 	    char *recordPtr, Tk_Window tkwin, int width, int height,
 	    int inner, int *widthPtr, int *heightPtr)
 }
 declare 262 generic {
-    void Tk_GetElementBox (Tk_Style style, Tk_StyledElement element,
+    void Tk_GetElementBox(Tk_Style style, Tk_StyledElement element,
 	    char *recordPtr, Tk_Window tkwin, int x, int y, int width,
 	    int height, int inner, int *xPtr, int *yPtr, int *widthPtr,
 	    int *heightPtr)
 }
 declare 263 generic {
-    int Tk_GetElementBorderWidth (Tk_Style style, Tk_StyledElement element,
+    int Tk_GetElementBorderWidth(Tk_Style style, Tk_StyledElement element,
 	    char *recordPtr, Tk_Window tkwin)
 }
 declare 264 generic {
-    void Tk_DrawElement (Tk_Style style, Tk_StyledElement element,
+    void Tk_DrawElement(Tk_Style style, Tk_StyledElement element,
 	    char *recordPtr, Tk_Window tkwin, Drawable d, int x, int y,
 	    int width, int height, int state)
 }
@@ -1272,11 +1054,11 @@ declare 270 generic {
 
 # TIP #264
 declare 271 generic {
-    Tcl_Interp * Tk_Interp (Tk_Window tkwin)
+    Tcl_Interp * Tk_Interp(Tk_Window tkwin)
 }
 
 # Now that the Tk 8.2 -> 8.3 transition is long past, use more conventional
-# means to continue support for extensions using the USE_OLD_IMAGE to 
+# means to continue support for extensions using the USE_OLD_IMAGE to
 # continue use of their string-based Tcl_ImageTypes and Tcl_PhotoImageFormats.
 #
 # Note that this restores the usual rules for stub compatibility.  Stub-enabled
@@ -1297,104 +1079,103 @@ declare 273 generic {
 
 interface tkPlat
 
+################################
 # Unix specific functions
 #   (none)
 
+################################
 # Windows specific functions
 
 declare 0 win {
-    Window Tk_AttachHWND (Tk_Window tkwin, HWND hwnd)
+    Window Tk_AttachHWND(Tk_Window tkwin, HWND hwnd)
 }
-
 declare 1 win {
-    HINSTANCE Tk_GetHINSTANCE (void)
+    HINSTANCE Tk_GetHINSTANCE(void)
 }
-
 declare 2 win {
-    HWND Tk_GetHWND (Window window)
+    HWND Tk_GetHWND(Window window)
 }
-
 declare 3 win {
-    Tk_Window Tk_HWNDToWindow (HWND hwnd)
+    Tk_Window Tk_HWNDToWindow(HWND hwnd)
 }
-
 declare 4 win {
-    void Tk_PointerEvent (HWND hwnd, int x, int y)
+    void Tk_PointerEvent(HWND hwnd, int x, int y)
 }
-
 declare 5 win {
-    int Tk_TranslateWinEvent (HWND hwnd,
+    int Tk_TranslateWinEvent(HWND hwnd,
 	    UINT message, WPARAM wParam, LPARAM lParam, LRESULT *result)
 }
 
-# Mac OS X specific functions
+################################
+# Aqua specific functions
 
 declare 0 aqua {
-    void Tk_MacOSXSetEmbedHandler ( \
-	    Tk_MacOSXEmbedRegisterWinProc *registerWinProcPtr, \
-	    Tk_MacOSXEmbedGetGrafPortProc *getPortProcPtr, \
-	    Tk_MacOSXEmbedMakeContainerExistProc *containerExistProcPtr, \
-	    Tk_MacOSXEmbedGetClipProc *getClipProc, \
+    void Tk_MacOSXSetEmbedHandler(
+	    Tk_MacOSXEmbedRegisterWinProc *registerWinProcPtr,
+	    Tk_MacOSXEmbedGetGrafPortProc *getPortProcPtr,
+	    Tk_MacOSXEmbedMakeContainerExistProc *containerExistProcPtr,
+	    Tk_MacOSXEmbedGetClipProc *getClipProc,
 	    Tk_MacOSXEmbedGetOffsetInParentProc *getOffsetProc)
 }
- 
 declare 1 aqua {
-    void Tk_MacOSXTurnOffMenus (void)
+    void Tk_MacOSXTurnOffMenus(void)
 }
-
 declare 2 aqua {
-    void Tk_MacOSXTkOwnsCursor (int tkOwnsIt)
+    void Tk_MacOSXTkOwnsCursor(int tkOwnsIt)
 }
-
 declare 3 aqua {
-    void TkMacOSXInitMenus (Tcl_Interp *interp)
+    void TkMacOSXInitMenus(Tcl_Interp *interp)
 }
-
 declare 4 aqua {
-    void TkMacOSXInitAppleEvents (Tcl_Interp *interp)
+    void TkMacOSXInitAppleEvents(Tcl_Interp *interp)
 }
-
 declare 5 aqua {
-    void TkGenWMConfigureEvent (Tk_Window tkwin, \
-	    int x, int y, int width, int height, int flags)
+    void TkGenWMConfigureEvent(Tk_Window tkwin, int x, int y, int width,
+	    int height, int flags)
 }
-
 declare 6 aqua {
-    void TkMacOSXInvalClipRgns (Tk_Window tkwin)
+    void TkMacOSXInvalClipRgns(Tk_Window tkwin)
 }
-
 declare 7 aqua {
-    GWorldPtr TkMacOSXGetDrawablePort (Drawable drawable)
+    GWorldPtr TkMacOSXGetDrawablePort(Drawable drawable)
 }
-
 declare 8 aqua {
-    ControlRef TkMacOSXGetRootControl (Drawable drawable)
+    ControlRef TkMacOSXGetRootControl(Drawable drawable)
 }
-
 declare 9 aqua {
-    void Tk_MacOSXSetupTkNotifier (void)
+    void Tk_MacOSXSetupTkNotifier(void)
 }
-
 declare 10 aqua {
-    int Tk_MacOSXIsAppInFront (void)
+    int Tk_MacOSXIsAppInFront(void)
 }
 
 ##############################################################################
 
-# Public functions that are not accessible via the stubs table:
-# (listed here _as comments_ so that the 'checkstubs' make target does not 
-# complain about them) 
+# Public functions that are not accessible via the stubs table.
 
-# const char *Tk_InitStubs(Tcl_Interp *interp, const char *version, int exact)
-# const char *Tk_PkgInitStubsCheck(Tcl_Interp *interp, const char *version,
-#	int exact);
+export {
+    CONST char *Tk_InitStubs(Tcl_Interp *interp, CONST char *version,
+	    int exact)
+}
+export {
+    CONST char *Tk_PkgInitStubsCheck(Tcl_Interp *interp, CONST char *version,
+	int exact);
+}
 
-# Global variables that need to be exported from the tcl shared library:
-# (listed here _as comments_ so that the 'checkstubs' make target does not 
-# complain about them, c.f. tk bug bug 1716117)
+# Global variables that need to be exported from the tcl shared library.
 
-# TkStubs *tkStubsPtr                   (fool checkstubs)
-# TkPlatStubs *tkPlatStubsPtr           (fool checkstubs)
-# TkIntStubs *tkIntStubsPtr             (fool checkstubs)
-# TkIntPlatStubs *tkIntPlatStubsPtr     (fool checkstubs)
-# TkIntXlibStubs *tkIntXlibStubsPtr     (fool checkstubs)
+export {
+    TkStubs *tkStubsPtr                         (fool checkstubs)
+}
+export {
+    TkPlatStubs *tkPlatStubsPtr                 (fool checkstubs)
+}
+export {
+    TkIntStubs *tkIntStubsPtr                   (fool checkstubs)
+}
+export {
+    TkIntPlatStubs *tkIntPlatStubsPtr           (fool checkstubs)
+}
+export {
+    TkIntXlibStubs *tkIntXlibStubsPtr           (fool checkstubs)
+}