summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorwolfsuit <wolfsuit>2001-10-15 09:21:59 (GMT)
committerwolfsuit <wolfsuit>2001-10-15 09:21:59 (GMT)
commita3014412e50718ef8e18906598145caab4b898f0 (patch)
tree7105a93a860c8f55a94974a10b6fdfe6c6dd8a2f /generic
parent343a12a735abd601b4cd5c087be337a51851adb6 (diff)
downloadtk-a3014412e50718ef8e18906598145caab4b898f0.zip
tk-a3014412e50718ef8e18906598145caab4b898f0.tar.gz
tk-a3014412e50718ef8e18906598145caab4b898f0.tar.bz2
First checkin of support for Tk on Mac OS X.
Diffstat (limited to 'generic')
-rw-r--r--generic/default.h8
-rw-r--r--generic/tk.decls61
-rw-r--r--generic/tk.h15
-rw-r--r--generic/tkBind.c4
-rw-r--r--generic/tkCmds.c7
-rw-r--r--generic/tkFileFilter.h5
-rw-r--r--generic/tkFont.c30
-rw-r--r--generic/tkGrab.c7
-rw-r--r--generic/tkInt.decls418
-rw-r--r--generic/tkIntDecls.h315
-rw-r--r--generic/tkIntPlatDecls.h378
-rw-r--r--generic/tkIntXlibDecls.h742
-rw-r--r--generic/tkMain.c4
-rw-r--r--generic/tkPlatDecls.h105
-rw-r--r--generic/tkPointer.c4
-rw-r--r--generic/tkPort.h6
-rw-r--r--generic/tkSelect.c4
-rw-r--r--generic/tkStubInit.c279
-rw-r--r--generic/tkStubLib.c11
-rw-r--r--generic/tkTest.c22
-rw-r--r--generic/tkText.c4
-rw-r--r--generic/tkWindow.c14
22 files changed, 2230 insertions, 213 deletions
diff --git a/generic/default.h b/generic/default.h
index f87c197..6c285df 100644
--- a/generic/default.h
+++ b/generic/default.h
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: default.h,v 1.3 2001/07/24 22:54:55 mdejong Exp $
+ * RCS: @(#) $Id: default.h,v 1.3.2.1 2001/10/15 09:21:59 wolfsuit Exp $
*/
#ifndef _DEFAULT
@@ -20,8 +20,10 @@
defined(__CYGWIN__) || defined(__MINGW32__)
# include "tkWinDefault.h"
#else
-# if defined(MAC_TCL)
-# include "tkMacDefault.h"
+# if defined(MAC_OSX_TCL)
+# include "tkMacOSXDefault.h"
+# elif defined(MAC_TCL)
+# include "tkMacDefault.h"
# else
# include "tkUnixDefault.h"
# endif
diff --git a/generic/tk.decls b/generic/tk.decls
index 3d99766..bcae238 100644
--- a/generic/tk.decls
+++ b/generic/tk.decls
@@ -11,7 +11,7 @@
# 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.15 2001/09/26 20:25:17 pspjuth Exp $
+# RCS: @(#) $Id: tk.decls,v 1.15.2.1 2001/10/15 09:22:00 wolfsuit Exp $
library tk
@@ -1245,3 +1245,62 @@ declare 10 mac {
GWorldPtr TkMacGetDrawablePort (Drawable drawable)
}
+# Mac OS X specific functions
+
+declare 0 macosx {
+ void Tk_MacOSXSetEmbedHandler ( \
+ Tk_MacOSXEmbedRegisterWinProc *registerWinProcPtr, \
+ Tk_MacOSXEmbedGetGrafPortProc *getPortProcPtr, \
+ Tk_MacOSXEmbedMakeContainerExistProc *containerExistProcPtr, \
+ Tk_MacOSXEmbedGetClipProc *getClipProc, \
+ Tk_MacOSXEmbedGetOffsetInParentProc *getOffsetProc)
+}
+
+declare 1 macosx {
+ void Tk_MacOSXTurnOffMenus (void)
+}
+
+declare 2 macosx {
+ void Tk_MacOSXTkOwnsCursor (int tkOwnsIt)
+}
+
+declare 3 macosx {
+ void TkMacOSXInitMenus (Tcl_Interp *interp)
+}
+
+declare 4 macosx {
+ void TkMacOSXInitAppleEvents (Tcl_Interp *interp)
+}
+
+declare 5 macosx {
+ void TkGenWMConfigureEvent (Tk_Window tkwin, \
+ int x, int y, int width, int height, int flags)
+}
+
+declare 6 macosx {
+ void TkMacOSXInvalClipRgns (TkWindow *winPtr)
+}
+
+declare 7 macosx {
+ GWorldPtr TkMacOSXGetDrawablePort (Drawable drawable)
+}
+
+declare 8 macosx {
+ ControlRef TkMacOSXGetRootControl (Drawable drawable)
+}
+
+declare 9 macosx {
+ int Tk_MacOSXOpenBundleResources (Tcl_Interp *interp, \
+ char *bundleName, \
+ char *libraryPath, \
+ int maxPathLen, \
+ int hasResourceFile)
+}
+
+declare 10 macosx {
+ void Tk_MacOSXSetupTkNotifier (void)
+}
+
+declare 11 macosx {
+ int Tk_MacOSXIsAppInFront (void)
+} \ No newline at end of file
diff --git a/generic/tk.h b/generic/tk.h
index 9903342..8c8ffa9 100644
--- a/generic/tk.h
+++ b/generic/tk.h
@@ -12,7 +12,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tk.h,v 1.57 2001/09/26 20:25:17 pspjuth Exp $
+ * RCS: @(#) $Id: tk.h,v 1.57.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#ifndef _TK
@@ -39,7 +39,7 @@ extern "C" {
* win/README (not patchlevel)
* unix/README (not patchlevel)
* unix/tk.spec (3 LOC Major/Minor, 2 LOC patch)
- * win/tcl.m4 (not patchlevel)
+ * win/tcl.m4 (not patchlevel)
*
* You may also need to update some of these files when the numbers change
* for the version of Tcl that this release of Tk is compiled against.
@@ -58,7 +58,7 @@ extern "C" {
* compilers. We use this method because there is no autoconf equivalent.
*/
-#ifdef MAC_TCL
+#if defined(MAC_TCL) || defined(MAC_OSX_TCL)
# ifndef REDO_KEYSYM_LOOKUP
# define REDO_KEYSYM_LOOKUP
# endif
@@ -76,9 +76,12 @@ extern "C" {
#ifndef RESOURCE_INCLUDED
#ifndef _XLIB_H
-# ifdef MAC_TCL
-# include <Xlib.h>
-# include <X.h>
+# if defined (MAC_TCL)
+# include <Xlib.h>
+# include <X.h>
+# elif defined(MAC_OSX_TCL)
+# include <X11/Xlib.h>
+# include <X11/X.h>
# else
# include <X11/Xlib.h>
# endif
diff --git a/generic/tkBind.c b/generic/tkBind.c
index ddd7e39..9c2b20e 100644
--- a/generic/tkBind.c
+++ b/generic/tkBind.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkBind.c,v 1.18 2001/09/25 16:25:20 dgp Exp $
+ * RCS: @(#) $Id: tkBind.c,v 1.18.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "tkPort.h"
@@ -21,7 +21,7 @@
#include "tkWinInt.h"
#endif
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL)) /* UNIX */
#include "tkUnixInt.h"
#endif
diff --git a/generic/tkCmds.c b/generic/tkCmds.c
index 2149d58..db2a4cb 100644
--- a/generic/tkCmds.c
+++ b/generic/tkCmds.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkCmds.c,v 1.20 2001/09/21 21:19:02 hobbs Exp $
+ * RCS: @(#) $Id: tkCmds.c,v 1.20.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "tkPort.h"
@@ -22,6 +22,8 @@
#include "tkWinInt.h"
#elif defined(MAC_TCL)
#include "tkMacInt.h"
+#elif defined(MAC_OSX_TCL)
+#include "tkMacOSXInt.h"
#else
#include "tkUnixInt.h"
#endif
@@ -305,7 +307,6 @@ TkBindEventProc(winPtr, eventPtr)
*
*----------------------------------------------------------------------
*/
-
int
Tk_BindtagsObjCmd(clientData, interp, objc, objv)
ClientData clientData; /* Main window associated with interpreter. */
@@ -390,7 +391,7 @@ Tk_BindtagsObjCmd(clientData, interp, objc, objv)
}
return TCL_OK;
}
-
+
/*
*----------------------------------------------------------------------
*
diff --git a/generic/tkFileFilter.h b/generic/tkFileFilter.h
index e1bc763..cfe2aee 100644
--- a/generic/tkFileFilter.h
+++ b/generic/tkFileFilter.h
@@ -9,15 +9,16 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkFileFilter.h,v 1.4 1998/09/14 18:23:10 stanton Exp $
+ * RCS: @(#) $Id: tkFileFilter.h,v 1.4.24.1 2001/10/15 09:22:00 wolfsuit Exp $
*
*/
#ifndef _TK_FILE_FILTER
#define _TK_FILE_FILTER
-#ifdef MAC_TCL
+#if defined(MAC_TCL)
#include <StandardFile.h>
+#define OSType long
#else
#define OSType long
#endif
diff --git a/generic/tkFont.c b/generic/tkFont.c
index ded3745..e8746dc 100644
--- a/generic/tkFont.c
+++ b/generic/tkFont.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkFont.c,v 1.12 2001/08/15 15:44:36 dkf Exp $
+ * RCS: @(#) $Id: tkFont.c,v 1.12.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "tkPort.h"
@@ -3683,3 +3683,31 @@ TkDebugFont(tkwin, name)
}
return resultPtr;
}
+
+int
+Tk_GetFirstTextLayout(
+ Tk_TextLayout layout, /* Layout information, from a previous call
+ * to Tk_ComputeTextLayout(). */
+ Tk_Font * font,
+ char * dst
+)
+{
+ TextLayout *layoutPtr;
+ LayoutChunk *chunkPtr;
+ int numDisplayChars;
+
+ layoutPtr = (TextLayout *)layout;
+ if (layoutPtr==NULL) {
+ return 0;
+ }
+ if (layoutPtr->numChunks==0) {
+ return 0;
+ }
+ chunkPtr = layoutPtr->chunks;
+ numDisplayChars = chunkPtr->numDisplayChars;
+ strncpy(dst, chunkPtr->start, numDisplayChars);
+ *font = layoutPtr->tkfont;
+ return numDisplayChars;
+}
+
+
diff --git a/generic/tkGrab.c b/generic/tkGrab.c
index e5b7fcf..0e60d50 100644
--- a/generic/tkGrab.c
+++ b/generic/tkGrab.c
@@ -9,13 +9,13 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkGrab.c,v 1.6 2000/09/06 19:02:16 hobbs Exp $
+ * RCS: @(#) $Id: tkGrab.c,v 1.6.6.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "tkPort.h"
#include "tkInt.h"
-#if !defined(__WIN32__) && !defined(MAC_TCL)
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))
#include "tkUnixInt.h"
#endif
@@ -432,7 +432,6 @@ Tk_Grab(interp, tkwin, grabGlobal)
}
Tk_Ungrab((Tk_Window) dispPtr->eventualGrabWinPtr);
}
-
Tk_MakeWindowExist(tkwin);
if (!grabGlobal) {
Window dummy1, dummy2;
@@ -480,7 +479,7 @@ Tk_Grab(interp, tkwin, grabGlobal)
grabResult = 0; /* Needed only to prevent gcc
* compiler warnings. */
- for (numTries = 0; numTries < 10; numTries++) {
+ for (numTries = 0; numTries < 10; numTries++) {
grabResult = XGrabPointer(dispPtr->display, winPtr->window,
True, ButtonPressMask|ButtonReleaseMask|ButtonMotionMask
|PointerMotionMask, GrabModeAsync, GrabModeAsync, None,
diff --git a/generic/tkInt.decls b/generic/tkInt.decls
index 71d5690..58310ba 100644
--- a/generic/tkInt.decls
+++ b/generic/tkInt.decls
@@ -9,7 +9,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: tkInt.decls,v 1.21 2001/09/25 16:25:20 dgp Exp $
+# RCS: @(#) $Id: tkInt.decls,v 1.21.2.1 2001/10/15 09:22:00 wolfsuit Exp $
library tk
@@ -526,87 +526,87 @@ declare 112 generic {
void TkpMenuThreadInit (void)
}
-declare 113 {mac win} {
+declare 113 {mac macosx win} {
void TkClipBox (TkRegion rgn, XRectangle* rect_return)
}
-declare 114 {mac win} {
+declare 114 {mac macosx win} {
TkRegion TkCreateRegion (void)
}
-declare 115 {mac win} {
+declare 115 {mac macosx win} {
void TkDestroyRegion (TkRegion rgn)
}
-declare 116 {mac win} {
+declare 116 {mac macosx win} {
void TkIntersectRegion (TkRegion sra, TkRegion srcb, TkRegion dr_return)
}
-declare 117 {mac win} {
+declare 117 {mac macosx win} {
int TkRectInRegion (TkRegion rgn, int x, int y, unsigned int width, \
unsigned int height)
}
-declare 118 {mac win} {
+declare 118 {mac macosx win} {
void TkSetRegion (Display* display, GC gc, TkRegion rgn)
}
-declare 119 {mac win} {
+declare 119 {mac macosx win} {
void TkUnionRectWithRegion (XRectangle* rect, \
TkRegion src, TkRegion dr_return)
}
-declare 120 mac {
+declare 120 {mac macosx} {
void TkGenerateActivateEvents (TkWindow *winPtr, int active)
}
-declare 121 mac {
+declare 121 {mac macosx} {
Pixmap TkpCreateNativeBitmap (Display *display, char * source)
}
-declare 122 mac {
+declare 122 {mac macosx} {
void TkpDefineNativeBitmaps (void)
}
-declare 123 mac {
+declare 123 {mac macosx} {
unsigned long TkpGetMS (void)
}
-declare 124 mac {
+declare 124 {mac macosx} {
Pixmap TkpGetNativeAppBitmap (Display *display, \
CONST char *name, int *width, int *height)
}
-declare 125 mac {
+declare 125 {mac macosx} {
void TkPointerDeadWindow (TkWindow *winPtr)
}
-declare 126 mac {
+declare 126 {mac macosx} {
void TkpSetCapture (TkWindow *winPtr)
}
-declare 127 mac {
+declare 127 {mac macosx} {
void TkpSetCursor (TkpCursor cursor)
}
-declare 128 mac {
+declare 128 {mac macosx} {
void TkpWmSetState (TkWindow *winPtr, int state)
}
-declare 130 mac {
+declare 130 {mac macosx} {
Window TkGetTransientMaster (TkWindow *winPtr)
}
-declare 131 mac {
+declare 131 {mac macosx} {
int TkGenerateButtonEvent (int x, int y, \
Window window, unsigned int state)
}
-declare 133 mac {
+declare 133 {mac macosx} {
void TkGenWMDestroyEvent (Tk_Window tkwin)
}
-declare 134 mac {
+declare 134 {mac macosx} {
void TkGenWMConfigureEvent (Tk_Window tkwin, int x, int y, \
int width, int height, int flags)
}
@@ -1056,6 +1056,202 @@ declare 65 mac {
void TkMacPreprocessMenu (void)
}
+########################
+# Mac OS X specific functions
+
+declare 0 macosx {
+ void TkGenerateActivateEvents (TkWindow *winPtr, int active)
+}
+
+declare 1 macosx {
+ Pixmap TkpCreateNativeBitmap (Display *display, char * source)
+}
+
+declare 2 macosx {
+ void TkpDefineNativeBitmaps (void)
+}
+
+declare 3 macosx {
+ void TkPointerDeadWindow (TkWindow *winPtr)
+}
+
+declare 4 macosx {
+ void TkpSetCapture (TkWindow *winPtr)
+}
+
+declare 5 macosx {
+ void TkpSetCursor (TkpCursor cursor)
+}
+
+declare 6 macosx {
+ void TkpWmSetState (TkWindow *winPtr, int state)
+}
+
+declare 7 macosx {
+ void TkAboutDlg (void)
+}
+
+declare 8 macosx {
+ unsigned int TkMacOSXButtonKeyState (void)
+}
+
+declare 9 macosx {
+ void TkMacOSXClearMenubarActive (void)
+}
+
+declare 10 macosx {
+ int TkMacOSXDispatchMenuEvent (int menuID, int index)
+}
+
+declare 11 macosx {
+ void TkMacOSXInstallCursor (int resizeOverride)
+}
+
+declare 12 macosx {
+ void TkMacOSXHandleTearoffMenu (void)
+}
+
+declare 13 macosx {
+ void TkMacOSXInvalClipRgns (TkWindow *winPtr)
+}
+
+declare 14 macosx {
+ int TkMacOSXDoHLEvent (EventRecord *theEvent)
+}
+
+declare 15 macosx {
+ GWorldPtr TkMacOSXGetDrawablePort (Drawable drawable)
+}
+
+declare 16 macosx {
+ Window TkMacOSXGetXWindow (WindowRef macWinPtr)
+}
+
+declare 17 macosx {
+ int TkMacOSXGrowToplevel (WindowRef whichWindow, Point start)
+}
+
+declare 18 macosx {
+ void TkMacOSXHandleMenuSelect (long mResult, int optionKeyPressed)
+}
+
+declare 19 macosx {
+ void TkMacOSXInitAppleEvents (Tcl_Interp *interp)
+}
+
+declare 20 macosx {
+ void TkMacOSXInitMenus (Tcl_Interp *interp)
+}
+
+declare 21 macosx {
+ void TkMacOSXInvalidateWindow (MacDrawable *macWin, int flag)
+}
+
+declare 22 macosx {
+ int TkMacOSXIsCharacterMissing (Tk_Font tkfont, unsigned int searchChar)
+}
+
+declare 23 macosx {
+ void TkMacOSXMakeRealWindowExist (TkWindow *winPtr)
+}
+
+declare 24 macosx {
+ BitMapPtr TkMacOSXMakeStippleMap(Drawable d1, Drawable d2)
+}
+
+declare 25 macosx {
+ void TkMacOSXMenuClick (void)
+}
+
+declare 26 macosx {
+ void TkMacOSXRegisterOffScreenWindow (Window window, GWorldPtr portPtr)
+}
+
+declare 27 macosx {
+ int TkMacOSXResizable (TkWindow *winPtr)
+}
+
+declare 28 macosx {
+ void TkMacOSXSetHelpMenuItemCount (void)
+}
+
+declare 29 macosx {
+ void TkMacOSXSetScrollbarGrow (TkWindow *winPtr, int flag)
+}
+
+declare 30 macosx {
+ void TkMacOSXSetUpClippingRgn (Drawable drawable)
+}
+
+declare 31 macosx {
+ void TkMacOSXSetUpGraphicsPort (GC gc, GWorldPtr destPort)
+}
+
+declare 32 macosx {
+ void TkMacOSXUpdateClipRgn (TkWindow *winPtr)
+}
+
+declare 33 macosx {
+ void TkMacOSXUnregisterMacWindow (WindowRef portPtr)
+}
+
+declare 34 macosx {
+ int TkMacOSXUseMenuID (short macID)
+}
+
+declare 35 macosx {
+ RgnHandle TkMacOSXVisableClipRgn (TkWindow *winPtr)
+}
+
+declare 36 macosx {
+ void TkMacOSXWinBounds (TkWindow *winPtr, Rect *geometry)
+}
+
+declare 37 macosx {
+ void TkMacOSXWindowOffset (WindowRef wRef, int *xOffset, int *yOffset)
+}
+
+declare 38 macosx {
+ int TkSetMacColor (unsigned long pixel, RGBColor *macColor)
+}
+
+declare 39 macosx {
+ void TkSetWMName (TkWindow *winPtr, Tk_Uid titleUid)
+}
+
+declare 40 macosx {
+ void TkSuspendClipboard (void)
+}
+
+declare 41 macosx {
+ int TkMacOSXZoomToplevel (WindowPtr whichWindow, Point where, short zoomPart)
+}
+
+declare 42 macosx {
+ Tk_Window Tk_TopCoordsToWindow (Tk_Window tkwin, \
+ int rootX, int rootY, int *newX, int *newY)
+}
+
+declare 43 macosx {
+ MacDrawable * TkMacOSXContainerId (TkWindow *winPtr)
+}
+
+declare 44 macosx {
+ MacDrawable * TkMacOSXGetHostToplevel (TkWindow *winPtr)
+}
+
+declare 45 macosx {
+ void TkMacOSXPreprocessMenu (void)
+}
+
+declare 46 macosx {
+ int TkpIsWindowFloating (WindowRef window)
+}
+
+declare 47 macosx {
+ Tk_Window TkMacOSXGetCapture (void)
+}
+
##############################################################################
@@ -1548,407 +1744,407 @@ declare 105 win {
# X functions for Mac
-declare 0 mac {
+declare 0 {mac macosx} {
void XSetDashes (Display* display, GC gc, int dash_offset,
_Xconst char* dash_list, int n)
}
-declare 1 mac {
+declare 1 {mac macosx} {
XModifierKeymap* XGetModifierMapping (Display* d)
}
-declare 2 mac {
+declare 2 {mac macosx} {
XImage * XCreateImage (Display* d, Visual* v, unsigned int ui1, int i1, \
int i2, char* cp, unsigned int ui2, unsigned int ui3, int i3, \
int i4)
}
-declare 3 mac {
+declare 3 {mac macosx} {
XImage *XGetImage (Display* d, Drawable dr, int i1, int i2, \
unsigned int ui1, unsigned int ui2, unsigned long ul, int i3)
}
-declare 4 mac {
+declare 4 {mac macosx} {
char *XGetAtomName (Display* d,Atom a)
}
-declare 5 mac {
+declare 5 {mac macosx} {
char *XKeysymToString (KeySym k)
}
-declare 6 mac {
+declare 6 {mac macosx} {
Colormap XCreateColormap (Display* d, Window w, Visual* v, int i)
}
-declare 7 mac {
+declare 7 {mac macosx} {
GContext XGContextFromGC (GC g)
}
-declare 8 mac {
+declare 8 {mac macosx} {
KeySym XKeycodeToKeysym (Display* d, KeyCode k, int i)
}
-declare 9 mac {
+declare 9 {mac macosx} {
KeySym XStringToKeysym (_Xconst char* c)
}
-declare 10 mac {
+declare 10 {mac macosx} {
Window XRootWindow (Display* d, int i)
}
-declare 11 mac {
+declare 11 {mac macosx} {
XErrorHandler XSetErrorHandler (XErrorHandler x)
}
-declare 12 mac {
+declare 12 {mac macosx} {
Status XAllocColor (Display* d, Colormap c, XColor* xp)
}
-declare 13 mac {
+declare 13 {mac macosx} {
void XBell (Display* d, int i)
}
-declare 14 mac {
+declare 14 {mac macosx} {
void XChangeProperty (Display* d, Window w, Atom a1, Atom a2, int i1, \
int i2, _Xconst unsigned char* c, int i3)
}
-declare 15 mac {
+declare 15 {mac macosx} {
void XChangeWindowAttributes (Display* d, Window w, unsigned long ul, \
XSetWindowAttributes* x)
}
-declare 16 mac {
+declare 16 {mac macosx} {
void XConfigureWindow (Display* d, Window w, unsigned int i, \
XWindowChanges* x)
}
-declare 17 mac {
+declare 17 {mac macosx} {
void XCopyArea (Display* d, Drawable dr1, Drawable dr2, GC g, int i1, \
int i2, unsigned int ui1, \
unsigned int ui2, int i3, int i4)
}
-declare 18 mac {
+declare 18 {mac macosx} {
void XCopyPlane (Display* d, Drawable dr1, Drawable dr2, GC g, int i1, \
int i2, unsigned int ui1, \
unsigned int ui2, int i3, int i4, unsigned long ul)
}
-declare 19 mac {
+declare 19 {mac macosx} {
Pixmap XCreateBitmapFromData(Display* display, Drawable d, \
_Xconst char* data, unsigned int width,unsigned int height)
}
-declare 20 mac {
+declare 20 {mac macosx} {
void XDefineCursor (Display* d, Window w, Cursor c)
}
-declare 21 mac {
+declare 21 {mac macosx} {
void XDestroyWindow (Display* d, Window w)
}
-declare 22 mac {
+declare 22 {mac macosx} {
void XDrawArc (Display* d, Drawable dr, GC g, int i1, int i2, \
unsigned int ui1, unsigned int ui2, int i3, int i4)
}
-declare 23 mac {
+declare 23 {mac macosx} {
void XDrawLines (Display* d, Drawable dr, GC g, XPoint* x, int i1, int i2)
}
-declare 24 mac {
+declare 24 {mac macosx} {
void XDrawRectangle (Display* d, Drawable dr, GC g, int i1, int i2,\
unsigned int ui1, unsigned int ui2)
}
-declare 25 mac {
+declare 25 {mac macosx} {
void XFillArc (Display* d, Drawable dr, GC g, int i1, int i2, \
unsigned int ui1, unsigned int ui2, int i3, int i4)
}
-declare 26 mac {
+declare 26 {mac macosx} {
void XFillPolygon (Display* d, Drawable dr, GC g, XPoint* x, \
int i1, int i2, int i3)
}
-declare 27 mac {
+declare 27 {mac macosx} {
void XFillRectangles (Display* d, Drawable dr, GC g, XRectangle* x, int i)
}
-declare 28 mac {
+declare 28 {mac macosx} {
void XFreeColormap (Display* d, Colormap c)
}
-declare 29 mac {
+declare 29 {mac macosx} {
void XFreeColors (Display* d, Colormap c, \
unsigned long* ulp, int i, unsigned long ul)
}
-declare 30 mac {
+declare 30 {mac macosx} {
void XFreeModifiermap (XModifierKeymap* x)
}
-declare 31 mac {
+declare 31 {mac macosx} {
Status XGetGeometry (Display* d, Drawable dr, Window* w, int* i1, \
int* i2, unsigned int* ui1, unsigned int* ui2, unsigned int* ui3, \
unsigned int* ui4)
}
-declare 32 mac {
+declare 32 {mac macosx} {
int XGetWindowProperty (Display* d, Window w, Atom a1, long l1, long l2, \
Bool b, Atom a2, Atom* ap, int* ip, unsigned long* ulp1, \
unsigned long* ulp2, unsigned char** cpp)
}
-declare 33 mac {
+declare 33 {mac macosx} {
int XGrabKeyboard (Display* d, Window w, Bool b, int i1, int i2, Time t)
}
-declare 34 mac {
+declare 34 {mac macosx} {
int XGrabPointer (Display* d, Window w1, Bool b, unsigned int ui, \
int i1, int i2, Window w2, Cursor c, Time t)
}
-declare 35 mac {
+declare 35 {mac macosx} {
KeyCode XKeysymToKeycode (Display* d, KeySym k)
}
-declare 36 mac {
+declare 36 {mac macosx} {
void XMapWindow (Display* d, Window w)
}
-declare 37 mac {
+declare 37 {mac macosx} {
void XMoveResizeWindow (Display* d, Window w, int i1, int i2, \
unsigned int ui1, unsigned int ui2)
}
-declare 38 mac {
+declare 38 {mac macosx} {
void XMoveWindow (Display* d, Window w, int i1, int i2)
}
-declare 39 mac {
+declare 39 {mac macosx} {
Bool XQueryPointer (Display* d, Window w1, Window* w2, Window* w3, \
int* i1, int* i2, int* i3, int* i4, unsigned int* ui)
}
-declare 40 mac {
+declare 40 {mac macosx} {
void XRaiseWindow (Display* d, Window w)
}
-declare 41 mac {
+declare 41 {mac macosx} {
void XRefreshKeyboardMapping (XMappingEvent* x)
}
-declare 42 mac {
+declare 42 {mac macosx} {
void XResizeWindow (Display* d, Window w, unsigned int ui1, \
unsigned int ui2)
}
-declare 43 mac {
+declare 43 {mac macosx} {
void XSelectInput (Display* d, Window w, long l)
}
-declare 44 mac {
+declare 44 {mac macosx} {
Status XSendEvent (Display* d, Window w, Bool b, long l, XEvent* x)
}
-declare 45 mac {
+declare 45 {mac macosx} {
void XSetIconName (Display* d, Window w, _Xconst char* c)
}
-declare 46 mac {
+declare 46 {mac macosx} {
void XSetInputFocus (Display* d, Window w, int i, Time t)
}
-declare 47 mac {
+declare 47 {mac macosx} {
void XSetSelectionOwner (Display* d, Atom a, Window w, Time t)
}
-declare 48 mac {
+declare 48 {mac macosx} {
void XSetWindowBackground (Display* d, Window w, unsigned long ul)
}
-declare 49 mac {
+declare 49 {mac macosx} {
void XSetWindowBackgroundPixmap (Display* d, Window w, Pixmap p)
}
-declare 50 mac {
+declare 50 {mac macosx} {
void XSetWindowBorder (Display* d, Window w, unsigned long ul)
}
-declare 51 mac {
+declare 51 {mac macosx} {
void XSetWindowBorderPixmap (Display* d, Window w, Pixmap p)
}
-declare 52 mac {
+declare 52 {mac macosx} {
void XSetWindowBorderWidth (Display* d, Window w, unsigned int ui)
}
-declare 53 mac {
+declare 53 {mac macosx} {
void XSetWindowColormap (Display* d, Window w, Colormap c)
}
-declare 54 mac {
+declare 54 {mac macosx} {
void XUngrabKeyboard (Display* d, Time t)
}
-declare 55 mac {
+declare 55 {mac macosx} {
void XUngrabPointer (Display* d, Time t)
}
-declare 56 mac {
+declare 56 {mac macosx} {
void XUnmapWindow (Display* d, Window w)
}
-declare 57 mac {
+declare 57 {mac macosx} {
void TkPutImage (unsigned long *colors, \
int ncolors, Display* display, Drawable d, \
GC gc, XImage* image, int src_x, int src_y, \
int dest_x, int dest_y, unsigned int width, \
unsigned int height)
}
-declare 58 mac {
+declare 58 {mac macosx} {
Status XParseColor (Display *display, Colormap map, \
_Xconst char* spec, XColor *colorPtr)
}
-declare 59 mac {
+declare 59 {mac macosx} {
GC XCreateGC(Display* display, Drawable d, \
unsigned long valuemask, XGCValues* values)
}
-declare 60 mac {
+declare 60 {mac macosx} {
void XFreeGC(Display* display, GC gc)
}
-declare 61 mac {
+declare 61 {mac macosx} {
Atom XInternAtom(Display* display,_Xconst char* atom_name, \
Bool only_if_exists)
}
-declare 62 mac {
+declare 62 {mac macosx} {
void XSetBackground(Display* display, GC gc, \
unsigned long foreground)
}
-declare 63 mac {
+declare 63 {mac macosx} {
void XSetForeground(Display* display, GC gc, \
unsigned long foreground)
}
-declare 64 mac {
+declare 64 {mac macosx} {
void XSetClipMask(Display* display, GC gc, Pixmap pixmap)
}
-declare 65 mac {
+declare 65 {mac macosx} {
void XSetClipOrigin(Display* display, GC gc, \
int clip_x_origin, int clip_y_origin)
}
-declare 66 mac {
+declare 66 {mac macosx} {
void XSetTSOrigin(Display* display, GC gc, \
int ts_x_origin, int ts_y_origin)
}
-declare 67 mac {
+declare 67 {mac macosx} {
void XChangeGC(Display * d, GC gc, unsigned long mask, XGCValues *values)
}
-declare 68 mac {
+declare 68 {mac macosx} {
void XSetFont(Display *display, GC gc, Font font)
}
-declare 69 mac {
+declare 69 {mac macosx} {
void XSetArcMode(Display *display, GC gc, int arc_mode)
}
-declare 70 mac {
+declare 70 {mac macosx} {
void XSetStipple(Display *display, GC gc, Pixmap stipple)
}
-declare 71 mac {
+declare 71 {mac macosx} {
void XSetFillRule(Display *display, GC gc, int fill_rule)
}
-declare 72 mac {
+declare 72 {mac macosx} {
void XSetFillStyle(Display *display, GC gc, int fill_style)
}
-declare 73 mac {
+declare 73 {mac macosx} {
void XSetFunction(Display *display, GC gc, int function)
}
-declare 74 mac {
+declare 74 {mac macosx} {
void XSetLineAttributes(Display *display, GC gc, \
unsigned int line_width, int line_style, \
int cap_style, int join_style)
}
-declare 75 mac {
+declare 75 {mac macosx} {
int _XInitImageFuncPtrs(XImage *image)
}
-declare 76 mac {
+declare 76 {mac macosx} {
XIC XCreateIC(void)
}
-declare 77 mac {
+declare 77 {mac macosx} {
XVisualInfo *XGetVisualInfo(Display* display, long vinfo_mask, \
XVisualInfo* vinfo_template, int* nitems_return)
}
-declare 78 mac {
+declare 78 {mac macosx} {
void XSetWMClientMachine(Display* display, Window w, \
XTextProperty* text_prop)
}
-declare 79 mac {
+declare 79 {mac macosx} {
Status XStringListToTextProperty(char** list, int count, \
XTextProperty* text_prop_return)
}
-declare 80 mac {
+declare 80 {mac macosx} {
void XDrawSegments(Display *display, Drawable d, GC gc, \
XSegment *segments, int nsegments)
}
-declare 81 mac {
+declare 81 {mac macosx} {
void XForceScreenSaver(Display* display, int mode)
}
-declare 82 mac {
+declare 82 {mac macosx} {
void XDrawLine (Display* d, Drawable dr, GC g, int x1, int y1, \
int x2, int y2)
}
-declare 83 mac {
+declare 83 {mac macosx} {
void XFillRectangle (Display* display, Drawable d, GC gc, \
int x, int y, unsigned int width, unsigned int height)
}
-declare 84 mac {
+declare 84 {mac macosx} {
void XClearWindow (Display* d, Window w)
}
-declare 85 mac {
+declare 85 {mac macosx} {
void XDrawPoint (Display* display, Drawable d, GC gc, int x, int y)
}
-declare 86 mac {
+declare 86 {mac macosx} {
void XDrawPoints (Display* display, Drawable d, GC gc, XPoint *points, \
int npoints, int mode)
}
-declare 87 mac {
+declare 87 {mac macosx} {
void XWarpPointer (Display* display, Window src_w, Window dest_w, \
int src_x, int src_y, unsigned int src_width, \
unsigned int src_height, int dest_x, int dest_y)
}
-declare 88 mac {
+declare 88 {mac macosx} {
void XQueryColor (Display *display, Colormap colormap, XColor *def_in_out)
}
-declare 89 mac {
+declare 89 {mac macosx} {
void XQueryColors (Display *display, Colormap colormap, \
XColor *defs_in_out, int ncolors)
}
diff --git a/generic/tkIntDecls.h b/generic/tkIntDecls.h
index 9477f4e..8e6d59e 100644
--- a/generic/tkIntDecls.h
+++ b/generic/tkIntDecls.h
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkIntDecls.h,v 1.13 2001/09/21 21:19:43 hobbs Exp $
+ * RCS: @(#) $Id: tkIntDecls.h,v 1.13.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#ifndef _TKINTDECLS
@@ -377,6 +377,11 @@ EXTERN void TkClipBox _ANSI_ARGS_((TkRegion rgn,
EXTERN void TkClipBox _ANSI_ARGS_((TkRegion rgn,
XRectangle* rect_return));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 113 */
+EXTERN void TkClipBox _ANSI_ARGS_((TkRegion rgn,
+ XRectangle* rect_return));
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
/* 114 */
EXTERN TkRegion TkCreateRegion _ANSI_ARGS_((void));
@@ -385,6 +390,10 @@ EXTERN TkRegion TkCreateRegion _ANSI_ARGS_((void));
/* 114 */
EXTERN TkRegion TkCreateRegion _ANSI_ARGS_((void));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 114 */
+EXTERN TkRegion TkCreateRegion _ANSI_ARGS_((void));
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
/* 115 */
EXTERN void TkDestroyRegion _ANSI_ARGS_((TkRegion rgn));
@@ -393,6 +402,10 @@ EXTERN void TkDestroyRegion _ANSI_ARGS_((TkRegion rgn));
/* 115 */
EXTERN void TkDestroyRegion _ANSI_ARGS_((TkRegion rgn));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 115 */
+EXTERN void TkDestroyRegion _ANSI_ARGS_((TkRegion rgn));
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
/* 116 */
EXTERN void TkIntersectRegion _ANSI_ARGS_((TkRegion sra,
@@ -403,6 +416,11 @@ EXTERN void TkIntersectRegion _ANSI_ARGS_((TkRegion sra,
EXTERN void TkIntersectRegion _ANSI_ARGS_((TkRegion sra,
TkRegion srcb, TkRegion dr_return));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 116 */
+EXTERN void TkIntersectRegion _ANSI_ARGS_((TkRegion sra,
+ TkRegion srcb, TkRegion dr_return));
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
/* 117 */
EXTERN int TkRectInRegion _ANSI_ARGS_((TkRegion rgn, int x,
@@ -415,6 +433,12 @@ EXTERN int TkRectInRegion _ANSI_ARGS_((TkRegion rgn, int x,
int y, unsigned int width,
unsigned int height));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 117 */
+EXTERN int TkRectInRegion _ANSI_ARGS_((TkRegion rgn, int x,
+ int y, unsigned int width,
+ unsigned int height));
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
/* 118 */
EXTERN void TkSetRegion _ANSI_ARGS_((Display* display, GC gc,
@@ -425,6 +449,11 @@ EXTERN void TkSetRegion _ANSI_ARGS_((Display* display, GC gc,
EXTERN void TkSetRegion _ANSI_ARGS_((Display* display, GC gc,
TkRegion rgn));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 118 */
+EXTERN void TkSetRegion _ANSI_ARGS_((Display* display, GC gc,
+ TkRegion rgn));
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
/* 119 */
EXTERN void TkUnionRectWithRegion _ANSI_ARGS_((XRectangle* rect,
@@ -435,67 +464,131 @@ EXTERN void TkUnionRectWithRegion _ANSI_ARGS_((XRectangle* rect,
EXTERN void TkUnionRectWithRegion _ANSI_ARGS_((XRectangle* rect,
TkRegion src, TkRegion dr_return));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 119 */
+EXTERN void TkUnionRectWithRegion _ANSI_ARGS_((XRectangle* rect,
+ TkRegion src, TkRegion dr_return));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 120 */
EXTERN void TkGenerateActivateEvents _ANSI_ARGS_((
TkWindow * winPtr, int active));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 120 */
+EXTERN void TkGenerateActivateEvents _ANSI_ARGS_((
+ TkWindow * winPtr, int active));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 121 */
EXTERN Pixmap TkpCreateNativeBitmap _ANSI_ARGS_((Display * display,
char * source));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 121 */
+EXTERN Pixmap TkpCreateNativeBitmap _ANSI_ARGS_((Display * display,
+ char * source));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 122 */
EXTERN void TkpDefineNativeBitmaps _ANSI_ARGS_((void));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 122 */
+EXTERN void TkpDefineNativeBitmaps _ANSI_ARGS_((void));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 123 */
EXTERN unsigned long TkpGetMS _ANSI_ARGS_((void));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 123 */
+EXTERN unsigned long TkpGetMS _ANSI_ARGS_((void));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 124 */
EXTERN Pixmap TkpGetNativeAppBitmap _ANSI_ARGS_((Display * display,
CONST char * name, int * width, int * height));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 124 */
+EXTERN Pixmap TkpGetNativeAppBitmap _ANSI_ARGS_((Display * display,
+ CONST char * name, int * width, int * height));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 125 */
EXTERN void TkPointerDeadWindow _ANSI_ARGS_((TkWindow * winPtr));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 125 */
+EXTERN void TkPointerDeadWindow _ANSI_ARGS_((TkWindow * winPtr));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 126 */
EXTERN void TkpSetCapture _ANSI_ARGS_((TkWindow * winPtr));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 126 */
+EXTERN void TkpSetCapture _ANSI_ARGS_((TkWindow * winPtr));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 127 */
EXTERN void TkpSetCursor _ANSI_ARGS_((TkpCursor cursor));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 127 */
+EXTERN void TkpSetCursor _ANSI_ARGS_((TkpCursor cursor));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 128 */
EXTERN void TkpWmSetState _ANSI_ARGS_((TkWindow * winPtr,
int state));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 128 */
+EXTERN void TkpWmSetState _ANSI_ARGS_((TkWindow * winPtr,
+ int state));
+#endif /* MAC_OSX_TCL */
/* Slot 129 is reserved */
#ifdef MAC_TCL
/* 130 */
EXTERN Window TkGetTransientMaster _ANSI_ARGS_((TkWindow * winPtr));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 130 */
+EXTERN Window TkGetTransientMaster _ANSI_ARGS_((TkWindow * winPtr));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 131 */
EXTERN int TkGenerateButtonEvent _ANSI_ARGS_((int x, int y,
Window window, unsigned int state));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 131 */
+EXTERN int TkGenerateButtonEvent _ANSI_ARGS_((int x, int y,
+ Window window, unsigned int state));
+#endif /* MAC_OSX_TCL */
/* Slot 132 is reserved */
#ifdef MAC_TCL
/* 133 */
EXTERN void TkGenWMDestroyEvent _ANSI_ARGS_((Tk_Window tkwin));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 133 */
+EXTERN void TkGenWMDestroyEvent _ANSI_ARGS_((Tk_Window tkwin));
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
/* 134 */
EXTERN void TkGenWMConfigureEvent _ANSI_ARGS_((Tk_Window tkwin,
int x, int y, int width, int height,
int flags));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 134 */
+EXTERN void TkGenWMConfigureEvent _ANSI_ARGS_((Tk_Window tkwin,
+ int x, int y, int width, int height,
+ int flags));
+#endif /* MAC_OSX_TCL */
/* 135 */
EXTERN void TkpDrawHighlightBorder _ANSI_ARGS_((Tk_Window tkwin,
GC fgGC, GC bgGC, int highlightWidth,
@@ -632,7 +725,7 @@ typedef struct TkIntStubs {
void (*tkpGetSubFonts) _ANSI_ARGS_((Tcl_Interp * interp, Tk_Font tkfont)); /* 110 */
Tcl_Obj * (*tkpGetSystemDefault) _ANSI_ARGS_((Tk_Window tkwin, char * dbName, char * className)); /* 111 */
void (*tkpMenuThreadInit) _ANSI_ARGS_((void)); /* 112 */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved113;
#endif /* UNIX */
#ifdef __WIN32__
@@ -641,7 +734,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkClipBox) _ANSI_ARGS_((TkRegion rgn, XRectangle* rect_return)); /* 113 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkClipBox) _ANSI_ARGS_((TkRegion rgn, XRectangle* rect_return)); /* 113 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved114;
#endif /* UNIX */
#ifdef __WIN32__
@@ -650,7 +746,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
TkRegion (*tkCreateRegion) _ANSI_ARGS_((void)); /* 114 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkRegion (*tkCreateRegion) _ANSI_ARGS_((void)); /* 114 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved115;
#endif /* UNIX */
#ifdef __WIN32__
@@ -659,7 +758,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkDestroyRegion) _ANSI_ARGS_((TkRegion rgn)); /* 115 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkDestroyRegion) _ANSI_ARGS_((TkRegion rgn)); /* 115 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved116;
#endif /* UNIX */
#ifdef __WIN32__
@@ -668,7 +770,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkIntersectRegion) _ANSI_ARGS_((TkRegion sra, TkRegion srcb, TkRegion dr_return)); /* 116 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkIntersectRegion) _ANSI_ARGS_((TkRegion sra, TkRegion srcb, TkRegion dr_return)); /* 116 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved117;
#endif /* UNIX */
#ifdef __WIN32__
@@ -677,7 +782,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
int (*tkRectInRegion) _ANSI_ARGS_((TkRegion rgn, int x, int y, unsigned int width, unsigned int height)); /* 117 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ int (*tkRectInRegion) _ANSI_ARGS_((TkRegion rgn, int x, int y, unsigned int width, unsigned int height)); /* 117 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved118;
#endif /* UNIX */
#ifdef __WIN32__
@@ -686,7 +794,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkSetRegion) _ANSI_ARGS_((Display* display, GC gc, TkRegion rgn)); /* 118 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkSetRegion) _ANSI_ARGS_((Display* display, GC gc, TkRegion rgn)); /* 118 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved119;
#endif /* UNIX */
#ifdef __WIN32__
@@ -695,7 +806,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkUnionRectWithRegion) _ANSI_ARGS_((XRectangle* rect, TkRegion src, TkRegion dr_return)); /* 119 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkUnionRectWithRegion) _ANSI_ARGS_((XRectangle* rect, TkRegion src, TkRegion dr_return)); /* 119 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved120;
#endif /* UNIX */
#ifdef __WIN32__
@@ -704,7 +818,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkGenerateActivateEvents) _ANSI_ARGS_((TkWindow * winPtr, int active)); /* 120 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkGenerateActivateEvents) _ANSI_ARGS_((TkWindow * winPtr, int active)); /* 120 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved121;
#endif /* UNIX */
#ifdef __WIN32__
@@ -713,7 +830,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
Pixmap (*tkpCreateNativeBitmap) _ANSI_ARGS_((Display * display, char * source)); /* 121 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ Pixmap (*tkpCreateNativeBitmap) _ANSI_ARGS_((Display * display, char * source)); /* 121 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved122;
#endif /* UNIX */
#ifdef __WIN32__
@@ -722,7 +842,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkpDefineNativeBitmaps) _ANSI_ARGS_((void)); /* 122 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkpDefineNativeBitmaps) _ANSI_ARGS_((void)); /* 122 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved123;
#endif /* UNIX */
#ifdef __WIN32__
@@ -731,7 +854,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
unsigned long (*tkpGetMS) _ANSI_ARGS_((void)); /* 123 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ unsigned long (*tkpGetMS) _ANSI_ARGS_((void)); /* 123 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved124;
#endif /* UNIX */
#ifdef __WIN32__
@@ -740,7 +866,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
Pixmap (*tkpGetNativeAppBitmap) _ANSI_ARGS_((Display * display, CONST char * name, int * width, int * height)); /* 124 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ Pixmap (*tkpGetNativeAppBitmap) _ANSI_ARGS_((Display * display, CONST char * name, int * width, int * height)); /* 124 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved125;
#endif /* UNIX */
#ifdef __WIN32__
@@ -749,7 +878,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkPointerDeadWindow) _ANSI_ARGS_((TkWindow * winPtr)); /* 125 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkPointerDeadWindow) _ANSI_ARGS_((TkWindow * winPtr)); /* 125 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved126;
#endif /* UNIX */
#ifdef __WIN32__
@@ -758,7 +890,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkpSetCapture) _ANSI_ARGS_((TkWindow * winPtr)); /* 126 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkpSetCapture) _ANSI_ARGS_((TkWindow * winPtr)); /* 126 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved127;
#endif /* UNIX */
#ifdef __WIN32__
@@ -767,7 +902,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkpSetCursor) _ANSI_ARGS_((TkpCursor cursor)); /* 127 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkpSetCursor) _ANSI_ARGS_((TkpCursor cursor)); /* 127 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved128;
#endif /* UNIX */
#ifdef __WIN32__
@@ -776,8 +914,11 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkpWmSetState) _ANSI_ARGS_((TkWindow * winPtr, int state)); /* 128 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ void (*tkpWmSetState) _ANSI_ARGS_((TkWindow * winPtr, int state)); /* 128 */
+#endif /* MAC_OSX_TCL */
void *reserved129;
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved130;
#endif /* UNIX */
#ifdef __WIN32__
@@ -786,7 +927,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
Window (*tkGetTransientMaster) _ANSI_ARGS_((TkWindow * winPtr)); /* 130 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ Window (*tkGetTransientMaster) _ANSI_ARGS_((TkWindow * winPtr)); /* 130 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved131;
#endif /* UNIX */
#ifdef __WIN32__
@@ -795,8 +939,11 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
int (*tkGenerateButtonEvent) _ANSI_ARGS_((int x, int y, Window window, unsigned int state)); /* 131 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ int (*tkGenerateButtonEvent) _ANSI_ARGS_((int x, int y, Window window, unsigned int state)); /* 131 */
+#endif /* MAC_OSX_TCL */
void *reserved132;
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved133;
#endif /* UNIX */
#ifdef __WIN32__
@@ -805,7 +952,10 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkGenWMDestroyEvent) _ANSI_ARGS_((Tk_Window tkwin)); /* 133 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ void (*tkGenWMDestroyEvent) _ANSI_ARGS_((Tk_Window tkwin)); /* 133 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void *reserved134;
#endif /* UNIX */
#ifdef __WIN32__
@@ -814,6 +964,9 @@ typedef struct TkIntStubs {
#ifdef MAC_TCL
void (*tkGenWMConfigureEvent) _ANSI_ARGS_((Tk_Window tkwin, int x, int y, int width, int height, int flags)); /* 134 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ void (*tkGenWMConfigureEvent) _ANSI_ARGS_((Tk_Window tkwin, int x, int y, int width, int height, int flags)); /* 134 */
+#endif /* MAC_OSX_TCL */
void (*tkpDrawHighlightBorder) _ANSI_ARGS_((Tk_Window tkwin, GC fgGC, GC bgGC, int highlightWidth, Drawable drawable)); /* 135 */
void (*tkSetFocusWin) _ANSI_ARGS_((TkWindow * winPtr, int force)); /* 136 */
void (*tkpSetKeycodeAndState) _ANSI_ARGS_((Tk_Window tkwin, KeySym keySym, XEvent * eventPtr)); /* 137 */
@@ -1297,6 +1450,12 @@ extern TkIntStubs *tkIntStubsPtr;
(tkIntStubsPtr->tkClipBox) /* 113 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkClipBox
+#define TkClipBox \
+ (tkIntStubsPtr->tkClipBox) /* 113 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
#ifndef TkCreateRegion
#define TkCreateRegion \
@@ -1309,6 +1468,12 @@ extern TkIntStubs *tkIntStubsPtr;
(tkIntStubsPtr->tkCreateRegion) /* 114 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkCreateRegion
+#define TkCreateRegion \
+ (tkIntStubsPtr->tkCreateRegion) /* 114 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
#ifndef TkDestroyRegion
#define TkDestroyRegion \
@@ -1321,6 +1486,12 @@ extern TkIntStubs *tkIntStubsPtr;
(tkIntStubsPtr->tkDestroyRegion) /* 115 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkDestroyRegion
+#define TkDestroyRegion \
+ (tkIntStubsPtr->tkDestroyRegion) /* 115 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
#ifndef TkIntersectRegion
#define TkIntersectRegion \
@@ -1333,6 +1504,12 @@ extern TkIntStubs *tkIntStubsPtr;
(tkIntStubsPtr->tkIntersectRegion) /* 116 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkIntersectRegion
+#define TkIntersectRegion \
+ (tkIntStubsPtr->tkIntersectRegion) /* 116 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
#ifndef TkRectInRegion
#define TkRectInRegion \
@@ -1345,6 +1522,12 @@ extern TkIntStubs *tkIntStubsPtr;
(tkIntStubsPtr->tkRectInRegion) /* 117 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkRectInRegion
+#define TkRectInRegion \
+ (tkIntStubsPtr->tkRectInRegion) /* 117 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
#ifndef TkSetRegion
#define TkSetRegion \
@@ -1357,6 +1540,12 @@ extern TkIntStubs *tkIntStubsPtr;
(tkIntStubsPtr->tkSetRegion) /* 118 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkSetRegion
+#define TkSetRegion \
+ (tkIntStubsPtr->tkSetRegion) /* 118 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef __WIN32__
#ifndef TkUnionRectWithRegion
#define TkUnionRectWithRegion \
@@ -1369,60 +1558,120 @@ extern TkIntStubs *tkIntStubsPtr;
(tkIntStubsPtr->tkUnionRectWithRegion) /* 119 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkUnionRectWithRegion
+#define TkUnionRectWithRegion \
+ (tkIntStubsPtr->tkUnionRectWithRegion) /* 119 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkGenerateActivateEvents
#define TkGenerateActivateEvents \
(tkIntStubsPtr->tkGenerateActivateEvents) /* 120 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkGenerateActivateEvents
+#define TkGenerateActivateEvents \
+ (tkIntStubsPtr->tkGenerateActivateEvents) /* 120 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkpCreateNativeBitmap
#define TkpCreateNativeBitmap \
(tkIntStubsPtr->tkpCreateNativeBitmap) /* 121 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkpCreateNativeBitmap
+#define TkpCreateNativeBitmap \
+ (tkIntStubsPtr->tkpCreateNativeBitmap) /* 121 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkpDefineNativeBitmaps
#define TkpDefineNativeBitmaps \
(tkIntStubsPtr->tkpDefineNativeBitmaps) /* 122 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkpDefineNativeBitmaps
+#define TkpDefineNativeBitmaps \
+ (tkIntStubsPtr->tkpDefineNativeBitmaps) /* 122 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkpGetMS
#define TkpGetMS \
(tkIntStubsPtr->tkpGetMS) /* 123 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkpGetMS
+#define TkpGetMS \
+ (tkIntStubsPtr->tkpGetMS) /* 123 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkpGetNativeAppBitmap
#define TkpGetNativeAppBitmap \
(tkIntStubsPtr->tkpGetNativeAppBitmap) /* 124 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkpGetNativeAppBitmap
+#define TkpGetNativeAppBitmap \
+ (tkIntStubsPtr->tkpGetNativeAppBitmap) /* 124 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkPointerDeadWindow
#define TkPointerDeadWindow \
(tkIntStubsPtr->tkPointerDeadWindow) /* 125 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkPointerDeadWindow
+#define TkPointerDeadWindow \
+ (tkIntStubsPtr->tkPointerDeadWindow) /* 125 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkpSetCapture
#define TkpSetCapture \
(tkIntStubsPtr->tkpSetCapture) /* 126 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkpSetCapture
+#define TkpSetCapture \
+ (tkIntStubsPtr->tkpSetCapture) /* 126 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkpSetCursor
#define TkpSetCursor \
(tkIntStubsPtr->tkpSetCursor) /* 127 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkpSetCursor
+#define TkpSetCursor \
+ (tkIntStubsPtr->tkpSetCursor) /* 127 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkpWmSetState
#define TkpWmSetState \
(tkIntStubsPtr->tkpWmSetState) /* 128 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkpWmSetState
+#define TkpWmSetState \
+ (tkIntStubsPtr->tkpWmSetState) /* 128 */
+#endif
+#endif /* MAC_OSX_TCL */
/* Slot 129 is reserved */
#ifdef MAC_TCL
#ifndef TkGetTransientMaster
@@ -1430,12 +1679,24 @@ extern TkIntStubs *tkIntStubsPtr;
(tkIntStubsPtr->tkGetTransientMaster) /* 130 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkGetTransientMaster
+#define TkGetTransientMaster \
+ (tkIntStubsPtr->tkGetTransientMaster) /* 130 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkGenerateButtonEvent
#define TkGenerateButtonEvent \
(tkIntStubsPtr->tkGenerateButtonEvent) /* 131 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkGenerateButtonEvent
+#define TkGenerateButtonEvent \
+ (tkIntStubsPtr->tkGenerateButtonEvent) /* 131 */
+#endif
+#endif /* MAC_OSX_TCL */
/* Slot 132 is reserved */
#ifdef MAC_TCL
#ifndef TkGenWMDestroyEvent
@@ -1443,12 +1704,24 @@ extern TkIntStubs *tkIntStubsPtr;
(tkIntStubsPtr->tkGenWMDestroyEvent) /* 133 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkGenWMDestroyEvent
+#define TkGenWMDestroyEvent \
+ (tkIntStubsPtr->tkGenWMDestroyEvent) /* 133 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifdef MAC_TCL
#ifndef TkGenWMConfigureEvent
#define TkGenWMConfigureEvent \
(tkIntStubsPtr->tkGenWMConfigureEvent) /* 134 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkGenWMConfigureEvent
+#define TkGenWMConfigureEvent \
+ (tkIntStubsPtr->tkGenWMConfigureEvent) /* 134 */
+#endif
+#endif /* MAC_OSX_TCL */
#ifndef TkpDrawHighlightBorder
#define TkpDrawHighlightBorder \
(tkIntStubsPtr->tkpDrawHighlightBorder) /* 135 */
diff --git a/generic/tkIntPlatDecls.h b/generic/tkIntPlatDecls.h
index 234dcd5..e19959f 100644
--- a/generic/tkIntPlatDecls.h
+++ b/generic/tkIntPlatDecls.h
@@ -9,7 +9,7 @@
* Copyright (c) 1998-1999 by Scriptics Corporation.
* All rights reserved.
*
- * RCS: @(#) $Id: tkIntPlatDecls.h,v 1.9 2001/09/25 16:25:20 dgp Exp $
+ * RCS: @(#) $Id: tkIntPlatDecls.h,v 1.9.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#ifndef _TKINTPLATDECLS
@@ -32,7 +32,7 @@
* Exported function declarations:
*/
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
/* 0 */
EXTERN void TkCreateXEventSource _ANSI_ARGS_((void));
/* 1 */
@@ -296,12 +296,138 @@ EXTERN MacDrawable * TkMacGetHostToplevel _ANSI_ARGS_((TkWindow * winPtr));
/* 65 */
EXTERN void TkMacPreprocessMenu _ANSI_ARGS_((void));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 0 */
+EXTERN void TkGenerateActivateEvents _ANSI_ARGS_((
+ TkWindow * winPtr, int active));
+/* 1 */
+EXTERN Pixmap TkpCreateNativeBitmap _ANSI_ARGS_((Display * display,
+ char * source));
+/* 2 */
+EXTERN void TkpDefineNativeBitmaps _ANSI_ARGS_((void));
+/* 3 */
+EXTERN void TkPointerDeadWindow _ANSI_ARGS_((TkWindow * winPtr));
+/* 4 */
+EXTERN void TkpSetCapture _ANSI_ARGS_((TkWindow * winPtr));
+/* 5 */
+EXTERN void TkpSetCursor _ANSI_ARGS_((TkpCursor cursor));
+/* 6 */
+EXTERN void TkpWmSetState _ANSI_ARGS_((TkWindow * winPtr,
+ int state));
+/* 7 */
+EXTERN void TkAboutDlg _ANSI_ARGS_((void));
+/* 8 */
+EXTERN unsigned int TkMacOSXButtonKeyState _ANSI_ARGS_((void));
+/* 9 */
+EXTERN void TkMacOSXClearMenubarActive _ANSI_ARGS_((void));
+/* 10 */
+EXTERN int TkMacOSXDispatchMenuEvent _ANSI_ARGS_((int menuID,
+ int index));
+/* 11 */
+EXTERN void TkMacOSXInstallCursor _ANSI_ARGS_((
+ int resizeOverride));
+/* 12 */
+EXTERN void TkMacOSXHandleTearoffMenu _ANSI_ARGS_((void));
+/* 13 */
+EXTERN void TkMacOSXInvalClipRgns _ANSI_ARGS_((TkWindow * winPtr));
+/* 14 */
+EXTERN int TkMacOSXDoHLEvent _ANSI_ARGS_((
+ EventRecord * theEvent));
+/* 15 */
+EXTERN GWorldPtr TkMacOSXGetDrawablePort _ANSI_ARGS_((
+ Drawable drawable));
+/* 16 */
+EXTERN Window TkMacOSXGetXWindow _ANSI_ARGS_((WindowRef macWinPtr));
+/* 17 */
+EXTERN int TkMacOSXGrowToplevel _ANSI_ARGS_((
+ WindowRef whichWindow, Point start));
+/* 18 */
+EXTERN void TkMacOSXHandleMenuSelect _ANSI_ARGS_((long mResult,
+ int optionKeyPressed));
+/* 19 */
+EXTERN void TkMacOSXInitAppleEvents _ANSI_ARGS_((
+ Tcl_Interp * interp));
+/* 20 */
+EXTERN void TkMacOSXInitMenus _ANSI_ARGS_((Tcl_Interp * interp));
+/* 21 */
+EXTERN void TkMacOSXInvalidateWindow _ANSI_ARGS_((
+ MacDrawable * macWin, int flag));
+/* 22 */
+EXTERN int TkMacOSXIsCharacterMissing _ANSI_ARGS_((
+ Tk_Font tkfont, unsigned int searchChar));
+/* 23 */
+EXTERN void TkMacOSXMakeRealWindowExist _ANSI_ARGS_((
+ TkWindow * winPtr));
+/* 24 */
+EXTERN BitMapPtr TkMacOSXMakeStippleMap _ANSI_ARGS_((Drawable d1,
+ Drawable d2));
+/* 25 */
+EXTERN void TkMacOSXMenuClick _ANSI_ARGS_((void));
+/* 26 */
+EXTERN void TkMacOSXRegisterOffScreenWindow _ANSI_ARGS_((
+ Window window, GWorldPtr portPtr));
+/* 27 */
+EXTERN int TkMacOSXResizable _ANSI_ARGS_((TkWindow * winPtr));
+/* 28 */
+EXTERN void TkMacOSXSetHelpMenuItemCount _ANSI_ARGS_((void));
+/* 29 */
+EXTERN void TkMacOSXSetScrollbarGrow _ANSI_ARGS_((
+ TkWindow * winPtr, int flag));
+/* 30 */
+EXTERN void TkMacOSXSetUpClippingRgn _ANSI_ARGS_((
+ Drawable drawable));
+/* 31 */
+EXTERN void TkMacOSXSetUpGraphicsPort _ANSI_ARGS_((GC gc,
+ GWorldPtr destPort));
+/* 32 */
+EXTERN void TkMacOSXUpdateClipRgn _ANSI_ARGS_((TkWindow * winPtr));
+/* 33 */
+EXTERN void TkMacOSXUnregisterMacWindow _ANSI_ARGS_((
+ WindowRef portPtr));
+/* 34 */
+EXTERN int TkMacOSXUseMenuID _ANSI_ARGS_((short macID));
+/* 35 */
+EXTERN RgnHandle TkMacOSXVisableClipRgn _ANSI_ARGS_((
+ TkWindow * winPtr));
+/* 36 */
+EXTERN void TkMacOSXWinBounds _ANSI_ARGS_((TkWindow * winPtr,
+ Rect * geometry));
+/* 37 */
+EXTERN void TkMacOSXWindowOffset _ANSI_ARGS_((WindowRef wRef,
+ int * xOffset, int * yOffset));
+/* 38 */
+EXTERN int TkSetMacColor _ANSI_ARGS_((unsigned long pixel,
+ RGBColor * macColor));
+/* 39 */
+EXTERN void TkSetWMName _ANSI_ARGS_((TkWindow * winPtr,
+ Tk_Uid titleUid));
+/* 40 */
+EXTERN void TkSuspendClipboard _ANSI_ARGS_((void));
+/* 41 */
+EXTERN int TkMacOSXZoomToplevel _ANSI_ARGS_((
+ WindowPtr whichWindow, Point where,
+ short zoomPart));
+/* 42 */
+EXTERN Tk_Window Tk_TopCoordsToWindow _ANSI_ARGS_((Tk_Window tkwin,
+ int rootX, int rootY, int * newX, int * newY));
+/* 43 */
+EXTERN MacDrawable * TkMacOSXContainerId _ANSI_ARGS_((TkWindow * winPtr));
+/* 44 */
+EXTERN MacDrawable * TkMacOSXGetHostToplevel _ANSI_ARGS_((
+ TkWindow * winPtr));
+/* 45 */
+EXTERN void TkMacOSXPreprocessMenu _ANSI_ARGS_((void));
+/* 46 */
+EXTERN int TkpIsWindowFloating _ANSI_ARGS_((WindowRef window));
+/* 47 */
+EXTERN Tk_Window TkMacOSXGetCapture _ANSI_ARGS_((void));
+#endif /* MAC_OSX_TCL */
typedef struct TkIntPlatStubs {
int magic;
struct TkIntPlatStubHooks *hooks;
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
void (*tkCreateXEventSource) _ANSI_ARGS_((void)); /* 0 */
void (*tkFreeWindowId) _ANSI_ARGS_((TkDisplay * dispPtr, Window w)); /* 1 */
void (*tkInitXId) _ANSI_ARGS_((TkDisplay * dispPtr)); /* 2 */
@@ -416,6 +542,56 @@ typedef struct TkIntPlatStubs {
MacDrawable * (*tkMacGetHostToplevel) _ANSI_ARGS_((TkWindow * winPtr)); /* 64 */
void (*tkMacPreprocessMenu) _ANSI_ARGS_((void)); /* 65 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ void (*tkGenerateActivateEvents) _ANSI_ARGS_((TkWindow * winPtr, int active)); /* 0 */
+ Pixmap (*tkpCreateNativeBitmap) _ANSI_ARGS_((Display * display, char * source)); /* 1 */
+ void (*tkpDefineNativeBitmaps) _ANSI_ARGS_((void)); /* 2 */
+ void (*tkPointerDeadWindow) _ANSI_ARGS_((TkWindow * winPtr)); /* 3 */
+ void (*tkpSetCapture) _ANSI_ARGS_((TkWindow * winPtr)); /* 4 */
+ void (*tkpSetCursor) _ANSI_ARGS_((TkpCursor cursor)); /* 5 */
+ void (*tkpWmSetState) _ANSI_ARGS_((TkWindow * winPtr, int state)); /* 6 */
+ void (*tkAboutDlg) _ANSI_ARGS_((void)); /* 7 */
+ unsigned int (*tkMacOSXButtonKeyState) _ANSI_ARGS_((void)); /* 8 */
+ void (*tkMacOSXClearMenubarActive) _ANSI_ARGS_((void)); /* 9 */
+ int (*tkMacOSXDispatchMenuEvent) _ANSI_ARGS_((int menuID, int index)); /* 10 */
+ void (*tkMacOSXInstallCursor) _ANSI_ARGS_((int resizeOverride)); /* 11 */
+ void (*tkMacOSXHandleTearoffMenu) _ANSI_ARGS_((void)); /* 12 */
+ void (*tkMacOSXInvalClipRgns) _ANSI_ARGS_((TkWindow * winPtr)); /* 13 */
+ int (*tkMacOSXDoHLEvent) _ANSI_ARGS_((EventRecord * theEvent)); /* 14 */
+ GWorldPtr (*tkMacOSXGetDrawablePort) _ANSI_ARGS_((Drawable drawable)); /* 15 */
+ Window (*tkMacOSXGetXWindow) _ANSI_ARGS_((WindowRef macWinPtr)); /* 16 */
+ int (*tkMacOSXGrowToplevel) _ANSI_ARGS_((WindowRef whichWindow, Point start)); /* 17 */
+ void (*tkMacOSXHandleMenuSelect) _ANSI_ARGS_((long mResult, int optionKeyPressed)); /* 18 */
+ void (*tkMacOSXInitAppleEvents) _ANSI_ARGS_((Tcl_Interp * interp)); /* 19 */
+ void (*tkMacOSXInitMenus) _ANSI_ARGS_((Tcl_Interp * interp)); /* 20 */
+ void (*tkMacOSXInvalidateWindow) _ANSI_ARGS_((MacDrawable * macWin, int flag)); /* 21 */
+ int (*tkMacOSXIsCharacterMissing) _ANSI_ARGS_((Tk_Font tkfont, unsigned int searchChar)); /* 22 */
+ void (*tkMacOSXMakeRealWindowExist) _ANSI_ARGS_((TkWindow * winPtr)); /* 23 */
+ BitMapPtr (*tkMacOSXMakeStippleMap) _ANSI_ARGS_((Drawable d1, Drawable d2)); /* 24 */
+ void (*tkMacOSXMenuClick) _ANSI_ARGS_((void)); /* 25 */
+ void (*tkMacOSXRegisterOffScreenWindow) _ANSI_ARGS_((Window window, GWorldPtr portPtr)); /* 26 */
+ int (*tkMacOSXResizable) _ANSI_ARGS_((TkWindow * winPtr)); /* 27 */
+ void (*tkMacOSXSetHelpMenuItemCount) _ANSI_ARGS_((void)); /* 28 */
+ void (*tkMacOSXSetScrollbarGrow) _ANSI_ARGS_((TkWindow * winPtr, int flag)); /* 29 */
+ void (*tkMacOSXSetUpClippingRgn) _ANSI_ARGS_((Drawable drawable)); /* 30 */
+ void (*tkMacOSXSetUpGraphicsPort) _ANSI_ARGS_((GC gc, GWorldPtr destPort)); /* 31 */
+ void (*tkMacOSXUpdateClipRgn) _ANSI_ARGS_((TkWindow * winPtr)); /* 32 */
+ void (*tkMacOSXUnregisterMacWindow) _ANSI_ARGS_((WindowRef portPtr)); /* 33 */
+ int (*tkMacOSXUseMenuID) _ANSI_ARGS_((short macID)); /* 34 */
+ RgnHandle (*tkMacOSXVisableClipRgn) _ANSI_ARGS_((TkWindow * winPtr)); /* 35 */
+ void (*tkMacOSXWinBounds) _ANSI_ARGS_((TkWindow * winPtr, Rect * geometry)); /* 36 */
+ void (*tkMacOSXWindowOffset) _ANSI_ARGS_((WindowRef wRef, int * xOffset, int * yOffset)); /* 37 */
+ int (*tkSetMacColor) _ANSI_ARGS_((unsigned long pixel, RGBColor * macColor)); /* 38 */
+ void (*tkSetWMName) _ANSI_ARGS_((TkWindow * winPtr, Tk_Uid titleUid)); /* 39 */
+ void (*tkSuspendClipboard) _ANSI_ARGS_((void)); /* 40 */
+ int (*tkMacOSXZoomToplevel) _ANSI_ARGS_((WindowPtr whichWindow, Point where, short zoomPart)); /* 41 */
+ Tk_Window (*tk_TopCoordsToWindow) _ANSI_ARGS_((Tk_Window tkwin, int rootX, int rootY, int * newX, int * newY)); /* 42 */
+ MacDrawable * (*tkMacOSXContainerId) _ANSI_ARGS_((TkWindow * winPtr)); /* 43 */
+ MacDrawable * (*tkMacOSXGetHostToplevel) _ANSI_ARGS_((TkWindow * winPtr)); /* 44 */
+ void (*tkMacOSXPreprocessMenu) _ANSI_ARGS_((void)); /* 45 */
+ int (*tkpIsWindowFloating) _ANSI_ARGS_((WindowRef window)); /* 46 */
+ Tk_Window (*tkMacOSXGetCapture) _ANSI_ARGS_((void)); /* 47 */
+#endif /* MAC_OSX_TCL */
} TkIntPlatStubs;
#ifdef __cplusplus
@@ -432,7 +608,7 @@ extern TkIntPlatStubs *tkIntPlatStubsPtr;
* Inline function declarations:
*/
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
#ifndef TkCreateXEventSource
#define TkCreateXEventSource \
(tkIntPlatStubsPtr->tkCreateXEventSource) /* 0 */
@@ -841,6 +1017,200 @@ extern TkIntPlatStubs *tkIntPlatStubsPtr;
(tkIntPlatStubsPtr->tkMacPreprocessMenu) /* 65 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef TkGenerateActivateEvents
+#define TkGenerateActivateEvents \
+ (tkIntPlatStubsPtr->tkGenerateActivateEvents) /* 0 */
+#endif
+#ifndef TkpCreateNativeBitmap
+#define TkpCreateNativeBitmap \
+ (tkIntPlatStubsPtr->tkpCreateNativeBitmap) /* 1 */
+#endif
+#ifndef TkpDefineNativeBitmaps
+#define TkpDefineNativeBitmaps \
+ (tkIntPlatStubsPtr->tkpDefineNativeBitmaps) /* 2 */
+#endif
+#ifndef TkPointerDeadWindow
+#define TkPointerDeadWindow \
+ (tkIntPlatStubsPtr->tkPointerDeadWindow) /* 3 */
+#endif
+#ifndef TkpSetCapture
+#define TkpSetCapture \
+ (tkIntPlatStubsPtr->tkpSetCapture) /* 4 */
+#endif
+#ifndef TkpSetCursor
+#define TkpSetCursor \
+ (tkIntPlatStubsPtr->tkpSetCursor) /* 5 */
+#endif
+#ifndef TkpWmSetState
+#define TkpWmSetState \
+ (tkIntPlatStubsPtr->tkpWmSetState) /* 6 */
+#endif
+#ifndef TkAboutDlg
+#define TkAboutDlg \
+ (tkIntPlatStubsPtr->tkAboutDlg) /* 7 */
+#endif
+#ifndef TkMacOSXButtonKeyState
+#define TkMacOSXButtonKeyState \
+ (tkIntPlatStubsPtr->tkMacOSXButtonKeyState) /* 8 */
+#endif
+#ifndef TkMacOSXClearMenubarActive
+#define TkMacOSXClearMenubarActive \
+ (tkIntPlatStubsPtr->tkMacOSXClearMenubarActive) /* 9 */
+#endif
+#ifndef TkMacOSXDispatchMenuEvent
+#define TkMacOSXDispatchMenuEvent \
+ (tkIntPlatStubsPtr->tkMacOSXDispatchMenuEvent) /* 10 */
+#endif
+#ifndef TkMacOSXInstallCursor
+#define TkMacOSXInstallCursor \
+ (tkIntPlatStubsPtr->tkMacOSXInstallCursor) /* 11 */
+#endif
+#ifndef TkMacOSXHandleTearoffMenu
+#define TkMacOSXHandleTearoffMenu \
+ (tkIntPlatStubsPtr->tkMacOSXHandleTearoffMenu) /* 12 */
+#endif
+#ifndef TkMacOSXInvalClipRgns
+#define TkMacOSXInvalClipRgns \
+ (tkIntPlatStubsPtr->tkMacOSXInvalClipRgns) /* 13 */
+#endif
+#ifndef TkMacOSXDoHLEvent
+#define TkMacOSXDoHLEvent \
+ (tkIntPlatStubsPtr->tkMacOSXDoHLEvent) /* 14 */
+#endif
+#ifndef TkMacOSXGetDrawablePort
+#define TkMacOSXGetDrawablePort \
+ (tkIntPlatStubsPtr->tkMacOSXGetDrawablePort) /* 15 */
+#endif
+#ifndef TkMacOSXGetXWindow
+#define TkMacOSXGetXWindow \
+ (tkIntPlatStubsPtr->tkMacOSXGetXWindow) /* 16 */
+#endif
+#ifndef TkMacOSXGrowToplevel
+#define TkMacOSXGrowToplevel \
+ (tkIntPlatStubsPtr->tkMacOSXGrowToplevel) /* 17 */
+#endif
+#ifndef TkMacOSXHandleMenuSelect
+#define TkMacOSXHandleMenuSelect \
+ (tkIntPlatStubsPtr->tkMacOSXHandleMenuSelect) /* 18 */
+#endif
+#ifndef TkMacOSXInitAppleEvents
+#define TkMacOSXInitAppleEvents \
+ (tkIntPlatStubsPtr->tkMacOSXInitAppleEvents) /* 19 */
+#endif
+#ifndef TkMacOSXInitMenus
+#define TkMacOSXInitMenus \
+ (tkIntPlatStubsPtr->tkMacOSXInitMenus) /* 20 */
+#endif
+#ifndef TkMacOSXInvalidateWindow
+#define TkMacOSXInvalidateWindow \
+ (tkIntPlatStubsPtr->tkMacOSXInvalidateWindow) /* 21 */
+#endif
+#ifndef TkMacOSXIsCharacterMissing
+#define TkMacOSXIsCharacterMissing \
+ (tkIntPlatStubsPtr->tkMacOSXIsCharacterMissing) /* 22 */
+#endif
+#ifndef TkMacOSXMakeRealWindowExist
+#define TkMacOSXMakeRealWindowExist \
+ (tkIntPlatStubsPtr->tkMacOSXMakeRealWindowExist) /* 23 */
+#endif
+#ifndef TkMacOSXMakeStippleMap
+#define TkMacOSXMakeStippleMap \
+ (tkIntPlatStubsPtr->tkMacOSXMakeStippleMap) /* 24 */
+#endif
+#ifndef TkMacOSXMenuClick
+#define TkMacOSXMenuClick \
+ (tkIntPlatStubsPtr->tkMacOSXMenuClick) /* 25 */
+#endif
+#ifndef TkMacOSXRegisterOffScreenWindow
+#define TkMacOSXRegisterOffScreenWindow \
+ (tkIntPlatStubsPtr->tkMacOSXRegisterOffScreenWindow) /* 26 */
+#endif
+#ifndef TkMacOSXResizable
+#define TkMacOSXResizable \
+ (tkIntPlatStubsPtr->tkMacOSXResizable) /* 27 */
+#endif
+#ifndef TkMacOSXSetHelpMenuItemCount
+#define TkMacOSXSetHelpMenuItemCount \
+ (tkIntPlatStubsPtr->tkMacOSXSetHelpMenuItemCount) /* 28 */
+#endif
+#ifndef TkMacOSXSetScrollbarGrow
+#define TkMacOSXSetScrollbarGrow \
+ (tkIntPlatStubsPtr->tkMacOSXSetScrollbarGrow) /* 29 */
+#endif
+#ifndef TkMacOSXSetUpClippingRgn
+#define TkMacOSXSetUpClippingRgn \
+ (tkIntPlatStubsPtr->tkMacOSXSetUpClippingRgn) /* 30 */
+#endif
+#ifndef TkMacOSXSetUpGraphicsPort
+#define TkMacOSXSetUpGraphicsPort \
+ (tkIntPlatStubsPtr->tkMacOSXSetUpGraphicsPort) /* 31 */
+#endif
+#ifndef TkMacOSXUpdateClipRgn
+#define TkMacOSXUpdateClipRgn \
+ (tkIntPlatStubsPtr->tkMacOSXUpdateClipRgn) /* 32 */
+#endif
+#ifndef TkMacOSXUnregisterMacWindow
+#define TkMacOSXUnregisterMacWindow \
+ (tkIntPlatStubsPtr->tkMacOSXUnregisterMacWindow) /* 33 */
+#endif
+#ifndef TkMacOSXUseMenuID
+#define TkMacOSXUseMenuID \
+ (tkIntPlatStubsPtr->tkMacOSXUseMenuID) /* 34 */
+#endif
+#ifndef TkMacOSXVisableClipRgn
+#define TkMacOSXVisableClipRgn \
+ (tkIntPlatStubsPtr->tkMacOSXVisableClipRgn) /* 35 */
+#endif
+#ifndef TkMacOSXWinBounds
+#define TkMacOSXWinBounds \
+ (tkIntPlatStubsPtr->tkMacOSXWinBounds) /* 36 */
+#endif
+#ifndef TkMacOSXWindowOffset
+#define TkMacOSXWindowOffset \
+ (tkIntPlatStubsPtr->tkMacOSXWindowOffset) /* 37 */
+#endif
+#ifndef TkSetMacColor
+#define TkSetMacColor \
+ (tkIntPlatStubsPtr->tkSetMacColor) /* 38 */
+#endif
+#ifndef TkSetWMName
+#define TkSetWMName \
+ (tkIntPlatStubsPtr->tkSetWMName) /* 39 */
+#endif
+#ifndef TkSuspendClipboard
+#define TkSuspendClipboard \
+ (tkIntPlatStubsPtr->tkSuspendClipboard) /* 40 */
+#endif
+#ifndef TkMacOSXZoomToplevel
+#define TkMacOSXZoomToplevel \
+ (tkIntPlatStubsPtr->tkMacOSXZoomToplevel) /* 41 */
+#endif
+#ifndef Tk_TopCoordsToWindow
+#define Tk_TopCoordsToWindow \
+ (tkIntPlatStubsPtr->tk_TopCoordsToWindow) /* 42 */
+#endif
+#ifndef TkMacOSXContainerId
+#define TkMacOSXContainerId \
+ (tkIntPlatStubsPtr->tkMacOSXContainerId) /* 43 */
+#endif
+#ifndef TkMacOSXGetHostToplevel
+#define TkMacOSXGetHostToplevel \
+ (tkIntPlatStubsPtr->tkMacOSXGetHostToplevel) /* 44 */
+#endif
+#ifndef TkMacOSXPreprocessMenu
+#define TkMacOSXPreprocessMenu \
+ (tkIntPlatStubsPtr->tkMacOSXPreprocessMenu) /* 45 */
+#endif
+#ifndef TkpIsWindowFloating
+#define TkpIsWindowFloating \
+ (tkIntPlatStubsPtr->tkpIsWindowFloating) /* 46 */
+#endif
+#ifndef TkMacOSXGetCapture
+#define TkMacOSXGetCapture \
+ (tkIntPlatStubsPtr->tkMacOSXGetCapture) /* 47 */
+#endif
+#endif /* MAC_OSX_TCL */
#endif /* defined(USE_TK_STUBS) && !defined(USE_TK_STUB_PROCS) */
diff --git a/generic/tkIntXlibDecls.h b/generic/tkIntXlibDecls.h
index 36cdcf9..e2ec06e 100644
--- a/generic/tkIntXlibDecls.h
+++ b/generic/tkIntXlibDecls.h
@@ -9,7 +9,7 @@
* Copyright (c) 1998-1999 by Scriptics Corporation.
* All rights reserved.
*
- * RCS: @(#) $Id: tkIntXlibDecls.h,v 1.13 2000/02/10 08:52:34 hobbs Exp $
+ * RCS: @(#) $Id: tkIntXlibDecls.h,v 1.13.8.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#ifndef _TKINTXLIBDECLS
@@ -652,6 +652,292 @@ EXTERN void XQueryColors _ANSI_ARGS_((Display * display,
Colormap colormap, XColor * defs_in_out,
int ncolors));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 0 */
+EXTERN void XSetDashes _ANSI_ARGS_((Display* display, GC gc,
+ int dash_offset, _Xconst char* dash_list,
+ int n));
+/* 1 */
+EXTERN XModifierKeymap* XGetModifierMapping _ANSI_ARGS_((Display* d));
+/* 2 */
+EXTERN XImage * XCreateImage _ANSI_ARGS_((Display* d, Visual* v,
+ unsigned int ui1, int i1, int i2, char* cp,
+ unsigned int ui2, unsigned int ui3, int i3,
+ int i4));
+/* 3 */
+EXTERN XImage * XGetImage _ANSI_ARGS_((Display* d, Drawable dr,
+ int i1, int i2, unsigned int ui1,
+ unsigned int ui2, unsigned long ul, int i3));
+/* 4 */
+EXTERN char * XGetAtomName _ANSI_ARGS_((Display* d, Atom a));
+/* 5 */
+EXTERN char * XKeysymToString _ANSI_ARGS_((KeySym k));
+/* 6 */
+EXTERN Colormap XCreateColormap _ANSI_ARGS_((Display* d, Window w,
+ Visual* v, int i));
+/* 7 */
+EXTERN GContext XGContextFromGC _ANSI_ARGS_((GC g));
+/* 8 */
+EXTERN KeySym XKeycodeToKeysym _ANSI_ARGS_((Display* d, KeyCode k,
+ int i));
+/* 9 */
+EXTERN KeySym XStringToKeysym _ANSI_ARGS_((_Xconst char* c));
+/* 10 */
+EXTERN Window XRootWindow _ANSI_ARGS_((Display* d, int i));
+/* 11 */
+EXTERN XErrorHandler XSetErrorHandler _ANSI_ARGS_((XErrorHandler x));
+/* 12 */
+EXTERN Status XAllocColor _ANSI_ARGS_((Display* d, Colormap c,
+ XColor* xp));
+/* 13 */
+EXTERN void XBell _ANSI_ARGS_((Display* d, int i));
+/* 14 */
+EXTERN void XChangeProperty _ANSI_ARGS_((Display* d, Window w,
+ Atom a1, Atom a2, int i1, int i2,
+ _Xconst unsigned char* c, int i3));
+/* 15 */
+EXTERN void XChangeWindowAttributes _ANSI_ARGS_((Display* d,
+ Window w, unsigned long ul,
+ XSetWindowAttributes* x));
+/* 16 */
+EXTERN void XConfigureWindow _ANSI_ARGS_((Display* d, Window w,
+ unsigned int i, XWindowChanges* x));
+/* 17 */
+EXTERN void XCopyArea _ANSI_ARGS_((Display* d, Drawable dr1,
+ Drawable dr2, GC g, int i1, int i2,
+ unsigned int ui1, unsigned int ui2, int i3,
+ int i4));
+/* 18 */
+EXTERN void XCopyPlane _ANSI_ARGS_((Display* d, Drawable dr1,
+ Drawable dr2, GC g, int i1, int i2,
+ unsigned int ui1, unsigned int ui2, int i3,
+ int i4, unsigned long ul));
+/* 19 */
+EXTERN Pixmap XCreateBitmapFromData _ANSI_ARGS_((Display* display,
+ Drawable d, _Xconst char* data,
+ unsigned int width, unsigned int height));
+/* 20 */
+EXTERN void XDefineCursor _ANSI_ARGS_((Display* d, Window w,
+ Cursor c));
+/* 21 */
+EXTERN void XDestroyWindow _ANSI_ARGS_((Display* d, Window w));
+/* 22 */
+EXTERN void XDrawArc _ANSI_ARGS_((Display* d, Drawable dr, GC g,
+ int i1, int i2, unsigned int ui1,
+ unsigned int ui2, int i3, int i4));
+/* 23 */
+EXTERN void XDrawLines _ANSI_ARGS_((Display* d, Drawable dr,
+ GC g, XPoint* x, int i1, int i2));
+/* 24 */
+EXTERN void XDrawRectangle _ANSI_ARGS_((Display* d, Drawable dr,
+ GC g, int i1, int i2, unsigned int ui1,
+ unsigned int ui2));
+/* 25 */
+EXTERN void XFillArc _ANSI_ARGS_((Display* d, Drawable dr, GC g,
+ int i1, int i2, unsigned int ui1,
+ unsigned int ui2, int i3, int i4));
+/* 26 */
+EXTERN void XFillPolygon _ANSI_ARGS_((Display* d, Drawable dr,
+ GC g, XPoint* x, int i1, int i2, int i3));
+/* 27 */
+EXTERN void XFillRectangles _ANSI_ARGS_((Display* d, Drawable dr,
+ GC g, XRectangle* x, int i));
+/* 28 */
+EXTERN void XFreeColormap _ANSI_ARGS_((Display* d, Colormap c));
+/* 29 */
+EXTERN void XFreeColors _ANSI_ARGS_((Display* d, Colormap c,
+ unsigned long* ulp, int i, unsigned long ul));
+/* 30 */
+EXTERN void XFreeModifiermap _ANSI_ARGS_((XModifierKeymap* x));
+/* 31 */
+EXTERN Status XGetGeometry _ANSI_ARGS_((Display* d, Drawable dr,
+ Window* w, int* i1, int* i2,
+ unsigned int* ui1, unsigned int* ui2,
+ unsigned int* ui3, unsigned int* ui4));
+/* 32 */
+EXTERN int XGetWindowProperty _ANSI_ARGS_((Display* d, Window w,
+ Atom a1, long l1, long l2, Bool b, Atom a2,
+ Atom* ap, int* ip, unsigned long* ulp1,
+ unsigned long* ulp2, unsigned char** cpp));
+/* 33 */
+EXTERN int XGrabKeyboard _ANSI_ARGS_((Display* d, Window w,
+ Bool b, int i1, int i2, Time t));
+/* 34 */
+EXTERN int XGrabPointer _ANSI_ARGS_((Display* d, Window w1,
+ Bool b, unsigned int ui, int i1, int i2,
+ Window w2, Cursor c, Time t));
+/* 35 */
+EXTERN KeyCode XKeysymToKeycode _ANSI_ARGS_((Display* d, KeySym k));
+/* 36 */
+EXTERN void XMapWindow _ANSI_ARGS_((Display* d, Window w));
+/* 37 */
+EXTERN void XMoveResizeWindow _ANSI_ARGS_((Display* d, Window w,
+ int i1, int i2, unsigned int ui1,
+ unsigned int ui2));
+/* 38 */
+EXTERN void XMoveWindow _ANSI_ARGS_((Display* d, Window w,
+ int i1, int i2));
+/* 39 */
+EXTERN Bool XQueryPointer _ANSI_ARGS_((Display* d, Window w1,
+ Window* w2, Window* w3, int* i1, int* i2,
+ int* i3, int* i4, unsigned int* ui));
+/* 40 */
+EXTERN void XRaiseWindow _ANSI_ARGS_((Display* d, Window w));
+/* 41 */
+EXTERN void XRefreshKeyboardMapping _ANSI_ARGS_((
+ XMappingEvent* x));
+/* 42 */
+EXTERN void XResizeWindow _ANSI_ARGS_((Display* d, Window w,
+ unsigned int ui1, unsigned int ui2));
+/* 43 */
+EXTERN void XSelectInput _ANSI_ARGS_((Display* d, Window w,
+ long l));
+/* 44 */
+EXTERN Status XSendEvent _ANSI_ARGS_((Display* d, Window w, Bool b,
+ long l, XEvent* x));
+/* 45 */
+EXTERN void XSetIconName _ANSI_ARGS_((Display* d, Window w,
+ _Xconst char* c));
+/* 46 */
+EXTERN void XSetInputFocus _ANSI_ARGS_((Display* d, Window w,
+ int i, Time t));
+/* 47 */
+EXTERN void XSetSelectionOwner _ANSI_ARGS_((Display* d, Atom a,
+ Window w, Time t));
+/* 48 */
+EXTERN void XSetWindowBackground _ANSI_ARGS_((Display* d,
+ Window w, unsigned long ul));
+/* 49 */
+EXTERN void XSetWindowBackgroundPixmap _ANSI_ARGS_((Display* d,
+ Window w, Pixmap p));
+/* 50 */
+EXTERN void XSetWindowBorder _ANSI_ARGS_((Display* d, Window w,
+ unsigned long ul));
+/* 51 */
+EXTERN void XSetWindowBorderPixmap _ANSI_ARGS_((Display* d,
+ Window w, Pixmap p));
+/* 52 */
+EXTERN void XSetWindowBorderWidth _ANSI_ARGS_((Display* d,
+ Window w, unsigned int ui));
+/* 53 */
+EXTERN void XSetWindowColormap _ANSI_ARGS_((Display* d, Window w,
+ Colormap c));
+/* 54 */
+EXTERN void XUngrabKeyboard _ANSI_ARGS_((Display* d, Time t));
+/* 55 */
+EXTERN void XUngrabPointer _ANSI_ARGS_((Display* d, Time t));
+/* 56 */
+EXTERN void XUnmapWindow _ANSI_ARGS_((Display* d, Window w));
+/* 57 */
+EXTERN void TkPutImage _ANSI_ARGS_((unsigned long * colors,
+ int ncolors, Display* display, Drawable d,
+ GC gc, XImage* image, int src_x, int src_y,
+ int dest_x, int dest_y, unsigned int width,
+ unsigned int height));
+/* 58 */
+EXTERN Status XParseColor _ANSI_ARGS_((Display * display,
+ Colormap map, _Xconst char* spec,
+ XColor * colorPtr));
+/* 59 */
+EXTERN GC XCreateGC _ANSI_ARGS_((Display* display, Drawable d,
+ unsigned long valuemask, XGCValues* values));
+/* 60 */
+EXTERN void XFreeGC _ANSI_ARGS_((Display* display, GC gc));
+/* 61 */
+EXTERN Atom XInternAtom _ANSI_ARGS_((Display* display,
+ _Xconst char* atom_name, Bool only_if_exists));
+/* 62 */
+EXTERN void XSetBackground _ANSI_ARGS_((Display* display, GC gc,
+ unsigned long foreground));
+/* 63 */
+EXTERN void XSetForeground _ANSI_ARGS_((Display* display, GC gc,
+ unsigned long foreground));
+/* 64 */
+EXTERN void XSetClipMask _ANSI_ARGS_((Display* display, GC gc,
+ Pixmap pixmap));
+/* 65 */
+EXTERN void XSetClipOrigin _ANSI_ARGS_((Display* display, GC gc,
+ int clip_x_origin, int clip_y_origin));
+/* 66 */
+EXTERN void XSetTSOrigin _ANSI_ARGS_((Display* display, GC gc,
+ int ts_x_origin, int ts_y_origin));
+/* 67 */
+EXTERN void XChangeGC _ANSI_ARGS_((Display * d, GC gc,
+ unsigned long mask, XGCValues * values));
+/* 68 */
+EXTERN void XSetFont _ANSI_ARGS_((Display * display, GC gc,
+ Font font));
+/* 69 */
+EXTERN void XSetArcMode _ANSI_ARGS_((Display * display, GC gc,
+ int arc_mode));
+/* 70 */
+EXTERN void XSetStipple _ANSI_ARGS_((Display * display, GC gc,
+ Pixmap stipple));
+/* 71 */
+EXTERN void XSetFillRule _ANSI_ARGS_((Display * display, GC gc,
+ int fill_rule));
+/* 72 */
+EXTERN void XSetFillStyle _ANSI_ARGS_((Display * display, GC gc,
+ int fill_style));
+/* 73 */
+EXTERN void XSetFunction _ANSI_ARGS_((Display * display, GC gc,
+ int function));
+/* 74 */
+EXTERN void XSetLineAttributes _ANSI_ARGS_((Display * display,
+ GC gc, unsigned int line_width,
+ int line_style, int cap_style,
+ int join_style));
+/* 75 */
+EXTERN int _XInitImageFuncPtrs _ANSI_ARGS_((XImage * image));
+/* 76 */
+EXTERN XIC XCreateIC _ANSI_ARGS_((void));
+/* 77 */
+EXTERN XVisualInfo * XGetVisualInfo _ANSI_ARGS_((Display* display,
+ long vinfo_mask, XVisualInfo* vinfo_template,
+ int* nitems_return));
+/* 78 */
+EXTERN void XSetWMClientMachine _ANSI_ARGS_((Display* display,
+ Window w, XTextProperty* text_prop));
+/* 79 */
+EXTERN Status XStringListToTextProperty _ANSI_ARGS_((char** list,
+ int count, XTextProperty* text_prop_return));
+/* 80 */
+EXTERN void XDrawSegments _ANSI_ARGS_((Display * display,
+ Drawable d, GC gc, XSegment * segments,
+ int nsegments));
+/* 81 */
+EXTERN void XForceScreenSaver _ANSI_ARGS_((Display* display,
+ int mode));
+/* 82 */
+EXTERN void XDrawLine _ANSI_ARGS_((Display* d, Drawable dr, GC g,
+ int x1, int y1, int x2, int y2));
+/* 83 */
+EXTERN void XFillRectangle _ANSI_ARGS_((Display* display,
+ Drawable d, GC gc, int x, int y,
+ unsigned int width, unsigned int height));
+/* 84 */
+EXTERN void XClearWindow _ANSI_ARGS_((Display* d, Window w));
+/* 85 */
+EXTERN void XDrawPoint _ANSI_ARGS_((Display* display, Drawable d,
+ GC gc, int x, int y));
+/* 86 */
+EXTERN void XDrawPoints _ANSI_ARGS_((Display* display,
+ Drawable d, GC gc, XPoint * points,
+ int npoints, int mode));
+/* 87 */
+EXTERN void XWarpPointer _ANSI_ARGS_((Display* display,
+ Window src_w, Window dest_w, int src_x,
+ int src_y, unsigned int src_width,
+ unsigned int src_height, int dest_x,
+ int dest_y));
+/* 88 */
+EXTERN void XQueryColor _ANSI_ARGS_((Display * display,
+ Colormap colormap, XColor * def_in_out));
+/* 89 */
+EXTERN void XQueryColors _ANSI_ARGS_((Display * display,
+ Colormap colormap, XColor * defs_in_out,
+ int ncolors));
+#endif /* MAC_OSX_TCL */
typedef struct TkIntXlibStubs {
int magic;
@@ -858,6 +1144,98 @@ typedef struct TkIntXlibStubs {
void (*xQueryColor) _ANSI_ARGS_((Display * display, Colormap colormap, XColor * def_in_out)); /* 88 */
void (*xQueryColors) _ANSI_ARGS_((Display * display, Colormap colormap, XColor * defs_in_out, int ncolors)); /* 89 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ void (*xSetDashes) _ANSI_ARGS_((Display* display, GC gc, int dash_offset, _Xconst char* dash_list, int n)); /* 0 */
+ XModifierKeymap* (*xGetModifierMapping) _ANSI_ARGS_((Display* d)); /* 1 */
+ XImage * (*xCreateImage) _ANSI_ARGS_((Display* d, Visual* v, unsigned int ui1, int i1, int i2, char* cp, unsigned int ui2, unsigned int ui3, int i3, int i4)); /* 2 */
+ XImage * (*xGetImage) _ANSI_ARGS_((Display* d, Drawable dr, int i1, int i2, unsigned int ui1, unsigned int ui2, unsigned long ul, int i3)); /* 3 */
+ char * (*xGetAtomName) _ANSI_ARGS_((Display* d, Atom a)); /* 4 */
+ char * (*xKeysymToString) _ANSI_ARGS_((KeySym k)); /* 5 */
+ Colormap (*xCreateColormap) _ANSI_ARGS_((Display* d, Window w, Visual* v, int i)); /* 6 */
+ GContext (*xGContextFromGC) _ANSI_ARGS_((GC g)); /* 7 */
+ KeySym (*xKeycodeToKeysym) _ANSI_ARGS_((Display* d, KeyCode k, int i)); /* 8 */
+ KeySym (*xStringToKeysym) _ANSI_ARGS_((_Xconst char* c)); /* 9 */
+ Window (*xRootWindow) _ANSI_ARGS_((Display* d, int i)); /* 10 */
+ XErrorHandler (*xSetErrorHandler) _ANSI_ARGS_((XErrorHandler x)); /* 11 */
+ Status (*xAllocColor) _ANSI_ARGS_((Display* d, Colormap c, XColor* xp)); /* 12 */
+ void (*xBell) _ANSI_ARGS_((Display* d, int i)); /* 13 */
+ void (*xChangeProperty) _ANSI_ARGS_((Display* d, Window w, Atom a1, Atom a2, int i1, int i2, _Xconst unsigned char* c, int i3)); /* 14 */
+ void (*xChangeWindowAttributes) _ANSI_ARGS_((Display* d, Window w, unsigned long ul, XSetWindowAttributes* x)); /* 15 */
+ void (*xConfigureWindow) _ANSI_ARGS_((Display* d, Window w, unsigned int i, XWindowChanges* x)); /* 16 */
+ void (*xCopyArea) _ANSI_ARGS_((Display* d, Drawable dr1, Drawable dr2, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2, int i3, int i4)); /* 17 */
+ void (*xCopyPlane) _ANSI_ARGS_((Display* d, Drawable dr1, Drawable dr2, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2, int i3, int i4, unsigned long ul)); /* 18 */
+ Pixmap (*xCreateBitmapFromData) _ANSI_ARGS_((Display* display, Drawable d, _Xconst char* data, unsigned int width, unsigned int height)); /* 19 */
+ void (*xDefineCursor) _ANSI_ARGS_((Display* d, Window w, Cursor c)); /* 20 */
+ void (*xDestroyWindow) _ANSI_ARGS_((Display* d, Window w)); /* 21 */
+ void (*xDrawArc) _ANSI_ARGS_((Display* d, Drawable dr, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2, int i3, int i4)); /* 22 */
+ void (*xDrawLines) _ANSI_ARGS_((Display* d, Drawable dr, GC g, XPoint* x, int i1, int i2)); /* 23 */
+ void (*xDrawRectangle) _ANSI_ARGS_((Display* d, Drawable dr, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2)); /* 24 */
+ void (*xFillArc) _ANSI_ARGS_((Display* d, Drawable dr, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2, int i3, int i4)); /* 25 */
+ void (*xFillPolygon) _ANSI_ARGS_((Display* d, Drawable dr, GC g, XPoint* x, int i1, int i2, int i3)); /* 26 */
+ void (*xFillRectangles) _ANSI_ARGS_((Display* d, Drawable dr, GC g, XRectangle* x, int i)); /* 27 */
+ void (*xFreeColormap) _ANSI_ARGS_((Display* d, Colormap c)); /* 28 */
+ void (*xFreeColors) _ANSI_ARGS_((Display* d, Colormap c, unsigned long* ulp, int i, unsigned long ul)); /* 29 */
+ void (*xFreeModifiermap) _ANSI_ARGS_((XModifierKeymap* x)); /* 30 */
+ Status (*xGetGeometry) _ANSI_ARGS_((Display* d, Drawable dr, Window* w, int* i1, int* i2, unsigned int* ui1, unsigned int* ui2, unsigned int* ui3, unsigned int* ui4)); /* 31 */
+ int (*xGetWindowProperty) _ANSI_ARGS_((Display* d, Window w, Atom a1, long l1, long l2, Bool b, Atom a2, Atom* ap, int* ip, unsigned long* ulp1, unsigned long* ulp2, unsigned char** cpp)); /* 32 */
+ int (*xGrabKeyboard) _ANSI_ARGS_((Display* d, Window w, Bool b, int i1, int i2, Time t)); /* 33 */
+ int (*xGrabPointer) _ANSI_ARGS_((Display* d, Window w1, Bool b, unsigned int ui, int i1, int i2, Window w2, Cursor c, Time t)); /* 34 */
+ KeyCode (*xKeysymToKeycode) _ANSI_ARGS_((Display* d, KeySym k)); /* 35 */
+ void (*xMapWindow) _ANSI_ARGS_((Display* d, Window w)); /* 36 */
+ void (*xMoveResizeWindow) _ANSI_ARGS_((Display* d, Window w, int i1, int i2, unsigned int ui1, unsigned int ui2)); /* 37 */
+ void (*xMoveWindow) _ANSI_ARGS_((Display* d, Window w, int i1, int i2)); /* 38 */
+ Bool (*xQueryPointer) _ANSI_ARGS_((Display* d, Window w1, Window* w2, Window* w3, int* i1, int* i2, int* i3, int* i4, unsigned int* ui)); /* 39 */
+ void (*xRaiseWindow) _ANSI_ARGS_((Display* d, Window w)); /* 40 */
+ void (*xRefreshKeyboardMapping) _ANSI_ARGS_((XMappingEvent* x)); /* 41 */
+ void (*xResizeWindow) _ANSI_ARGS_((Display* d, Window w, unsigned int ui1, unsigned int ui2)); /* 42 */
+ void (*xSelectInput) _ANSI_ARGS_((Display* d, Window w, long l)); /* 43 */
+ Status (*xSendEvent) _ANSI_ARGS_((Display* d, Window w, Bool b, long l, XEvent* x)); /* 44 */
+ void (*xSetIconName) _ANSI_ARGS_((Display* d, Window w, _Xconst char* c)); /* 45 */
+ void (*xSetInputFocus) _ANSI_ARGS_((Display* d, Window w, int i, Time t)); /* 46 */
+ void (*xSetSelectionOwner) _ANSI_ARGS_((Display* d, Atom a, Window w, Time t)); /* 47 */
+ void (*xSetWindowBackground) _ANSI_ARGS_((Display* d, Window w, unsigned long ul)); /* 48 */
+ void (*xSetWindowBackgroundPixmap) _ANSI_ARGS_((Display* d, Window w, Pixmap p)); /* 49 */
+ void (*xSetWindowBorder) _ANSI_ARGS_((Display* d, Window w, unsigned long ul)); /* 50 */
+ void (*xSetWindowBorderPixmap) _ANSI_ARGS_((Display* d, Window w, Pixmap p)); /* 51 */
+ void (*xSetWindowBorderWidth) _ANSI_ARGS_((Display* d, Window w, unsigned int ui)); /* 52 */
+ void (*xSetWindowColormap) _ANSI_ARGS_((Display* d, Window w, Colormap c)); /* 53 */
+ void (*xUngrabKeyboard) _ANSI_ARGS_((Display* d, Time t)); /* 54 */
+ void (*xUngrabPointer) _ANSI_ARGS_((Display* d, Time t)); /* 55 */
+ void (*xUnmapWindow) _ANSI_ARGS_((Display* d, Window w)); /* 56 */
+ void (*tkPutImage) _ANSI_ARGS_((unsigned long * colors, int ncolors, Display* display, Drawable d, GC gc, XImage* image, int src_x, int src_y, int dest_x, int dest_y, unsigned int width, unsigned int height)); /* 57 */
+ Status (*xParseColor) _ANSI_ARGS_((Display * display, Colormap map, _Xconst char* spec, XColor * colorPtr)); /* 58 */
+ GC (*xCreateGC) _ANSI_ARGS_((Display* display, Drawable d, unsigned long valuemask, XGCValues* values)); /* 59 */
+ void (*xFreeGC) _ANSI_ARGS_((Display* display, GC gc)); /* 60 */
+ Atom (*xInternAtom) _ANSI_ARGS_((Display* display, _Xconst char* atom_name, Bool only_if_exists)); /* 61 */
+ void (*xSetBackground) _ANSI_ARGS_((Display* display, GC gc, unsigned long foreground)); /* 62 */
+ void (*xSetForeground) _ANSI_ARGS_((Display* display, GC gc, unsigned long foreground)); /* 63 */
+ void (*xSetClipMask) _ANSI_ARGS_((Display* display, GC gc, Pixmap pixmap)); /* 64 */
+ void (*xSetClipOrigin) _ANSI_ARGS_((Display* display, GC gc, int clip_x_origin, int clip_y_origin)); /* 65 */
+ void (*xSetTSOrigin) _ANSI_ARGS_((Display* display, GC gc, int ts_x_origin, int ts_y_origin)); /* 66 */
+ void (*xChangeGC) _ANSI_ARGS_((Display * d, GC gc, unsigned long mask, XGCValues * values)); /* 67 */
+ void (*xSetFont) _ANSI_ARGS_((Display * display, GC gc, Font font)); /* 68 */
+ void (*xSetArcMode) _ANSI_ARGS_((Display * display, GC gc, int arc_mode)); /* 69 */
+ void (*xSetStipple) _ANSI_ARGS_((Display * display, GC gc, Pixmap stipple)); /* 70 */
+ void (*xSetFillRule) _ANSI_ARGS_((Display * display, GC gc, int fill_rule)); /* 71 */
+ void (*xSetFillStyle) _ANSI_ARGS_((Display * display, GC gc, int fill_style)); /* 72 */
+ void (*xSetFunction) _ANSI_ARGS_((Display * display, GC gc, int function)); /* 73 */
+ void (*xSetLineAttributes) _ANSI_ARGS_((Display * display, GC gc, unsigned int line_width, int line_style, int cap_style, int join_style)); /* 74 */
+ int (*_XInitImageFuncPtrs) _ANSI_ARGS_((XImage * image)); /* 75 */
+ XIC (*xCreateIC) _ANSI_ARGS_((void)); /* 76 */
+ XVisualInfo * (*xGetVisualInfo) _ANSI_ARGS_((Display* display, long vinfo_mask, XVisualInfo* vinfo_template, int* nitems_return)); /* 77 */
+ void (*xSetWMClientMachine) _ANSI_ARGS_((Display* display, Window w, XTextProperty* text_prop)); /* 78 */
+ Status (*xStringListToTextProperty) _ANSI_ARGS_((char** list, int count, XTextProperty* text_prop_return)); /* 79 */
+ void (*xDrawSegments) _ANSI_ARGS_((Display * display, Drawable d, GC gc, XSegment * segments, int nsegments)); /* 80 */
+ void (*xForceScreenSaver) _ANSI_ARGS_((Display* display, int mode)); /* 81 */
+ void (*xDrawLine) _ANSI_ARGS_((Display* d, Drawable dr, GC g, int x1, int y1, int x2, int y2)); /* 82 */
+ void (*xFillRectangle) _ANSI_ARGS_((Display* display, Drawable d, GC gc, int x, int y, unsigned int width, unsigned int height)); /* 83 */
+ void (*xClearWindow) _ANSI_ARGS_((Display* d, Window w)); /* 84 */
+ void (*xDrawPoint) _ANSI_ARGS_((Display* display, Drawable d, GC gc, int x, int y)); /* 85 */
+ void (*xDrawPoints) _ANSI_ARGS_((Display* display, Drawable d, GC gc, XPoint * points, int npoints, int mode)); /* 86 */
+ void (*xWarpPointer) _ANSI_ARGS_((Display* display, Window src_w, Window dest_w, int src_x, int src_y, unsigned int src_width, unsigned int src_height, int dest_x, int dest_y)); /* 87 */
+ void (*xQueryColor) _ANSI_ARGS_((Display * display, Colormap colormap, XColor * def_in_out)); /* 88 */
+ void (*xQueryColors) _ANSI_ARGS_((Display * display, Colormap colormap, XColor * defs_in_out, int ncolors)); /* 89 */
+#endif /* MAC_OSX_TCL */
} TkIntXlibStubs;
#ifdef __cplusplus
@@ -1663,6 +2041,368 @@ extern TkIntXlibStubs *tkIntXlibStubsPtr;
(tkIntXlibStubsPtr->xQueryColors) /* 89 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef XSetDashes
+#define XSetDashes \
+ (tkIntXlibStubsPtr->xSetDashes) /* 0 */
+#endif
+#ifndef XGetModifierMapping
+#define XGetModifierMapping \
+ (tkIntXlibStubsPtr->xGetModifierMapping) /* 1 */
+#endif
+#ifndef XCreateImage
+#define XCreateImage \
+ (tkIntXlibStubsPtr->xCreateImage) /* 2 */
+#endif
+#ifndef XGetImage
+#define XGetImage \
+ (tkIntXlibStubsPtr->xGetImage) /* 3 */
+#endif
+#ifndef XGetAtomName
+#define XGetAtomName \
+ (tkIntXlibStubsPtr->xGetAtomName) /* 4 */
+#endif
+#ifndef XKeysymToString
+#define XKeysymToString \
+ (tkIntXlibStubsPtr->xKeysymToString) /* 5 */
+#endif
+#ifndef XCreateColormap
+#define XCreateColormap \
+ (tkIntXlibStubsPtr->xCreateColormap) /* 6 */
+#endif
+#ifndef XGContextFromGC
+#define XGContextFromGC \
+ (tkIntXlibStubsPtr->xGContextFromGC) /* 7 */
+#endif
+#ifndef XKeycodeToKeysym
+#define XKeycodeToKeysym \
+ (tkIntXlibStubsPtr->xKeycodeToKeysym) /* 8 */
+#endif
+#ifndef XStringToKeysym
+#define XStringToKeysym \
+ (tkIntXlibStubsPtr->xStringToKeysym) /* 9 */
+#endif
+#ifndef XRootWindow
+#define XRootWindow \
+ (tkIntXlibStubsPtr->xRootWindow) /* 10 */
+#endif
+#ifndef XSetErrorHandler
+#define XSetErrorHandler \
+ (tkIntXlibStubsPtr->xSetErrorHandler) /* 11 */
+#endif
+#ifndef XAllocColor
+#define XAllocColor \
+ (tkIntXlibStubsPtr->xAllocColor) /* 12 */
+#endif
+#ifndef XBell
+#define XBell \
+ (tkIntXlibStubsPtr->xBell) /* 13 */
+#endif
+#ifndef XChangeProperty
+#define XChangeProperty \
+ (tkIntXlibStubsPtr->xChangeProperty) /* 14 */
+#endif
+#ifndef XChangeWindowAttributes
+#define XChangeWindowAttributes \
+ (tkIntXlibStubsPtr->xChangeWindowAttributes) /* 15 */
+#endif
+#ifndef XConfigureWindow
+#define XConfigureWindow \
+ (tkIntXlibStubsPtr->xConfigureWindow) /* 16 */
+#endif
+#ifndef XCopyArea
+#define XCopyArea \
+ (tkIntXlibStubsPtr->xCopyArea) /* 17 */
+#endif
+#ifndef XCopyPlane
+#define XCopyPlane \
+ (tkIntXlibStubsPtr->xCopyPlane) /* 18 */
+#endif
+#ifndef XCreateBitmapFromData
+#define XCreateBitmapFromData \
+ (tkIntXlibStubsPtr->xCreateBitmapFromData) /* 19 */
+#endif
+#ifndef XDefineCursor
+#define XDefineCursor \
+ (tkIntXlibStubsPtr->xDefineCursor) /* 20 */
+#endif
+#ifndef XDestroyWindow
+#define XDestroyWindow \
+ (tkIntXlibStubsPtr->xDestroyWindow) /* 21 */
+#endif
+#ifndef XDrawArc
+#define XDrawArc \
+ (tkIntXlibStubsPtr->xDrawArc) /* 22 */
+#endif
+#ifndef XDrawLines
+#define XDrawLines \
+ (tkIntXlibStubsPtr->xDrawLines) /* 23 */
+#endif
+#ifndef XDrawRectangle
+#define XDrawRectangle \
+ (tkIntXlibStubsPtr->xDrawRectangle) /* 24 */
+#endif
+#ifndef XFillArc
+#define XFillArc \
+ (tkIntXlibStubsPtr->xFillArc) /* 25 */
+#endif
+#ifndef XFillPolygon
+#define XFillPolygon \
+ (tkIntXlibStubsPtr->xFillPolygon) /* 26 */
+#endif
+#ifndef XFillRectangles
+#define XFillRectangles \
+ (tkIntXlibStubsPtr->xFillRectangles) /* 27 */
+#endif
+#ifndef XFreeColormap
+#define XFreeColormap \
+ (tkIntXlibStubsPtr->xFreeColormap) /* 28 */
+#endif
+#ifndef XFreeColors
+#define XFreeColors \
+ (tkIntXlibStubsPtr->xFreeColors) /* 29 */
+#endif
+#ifndef XFreeModifiermap
+#define XFreeModifiermap \
+ (tkIntXlibStubsPtr->xFreeModifiermap) /* 30 */
+#endif
+#ifndef XGetGeometry
+#define XGetGeometry \
+ (tkIntXlibStubsPtr->xGetGeometry) /* 31 */
+#endif
+#ifndef XGetWindowProperty
+#define XGetWindowProperty \
+ (tkIntXlibStubsPtr->xGetWindowProperty) /* 32 */
+#endif
+#ifndef XGrabKeyboard
+#define XGrabKeyboard \
+ (tkIntXlibStubsPtr->xGrabKeyboard) /* 33 */
+#endif
+#ifndef XGrabPointer
+#define XGrabPointer \
+ (tkIntXlibStubsPtr->xGrabPointer) /* 34 */
+#endif
+#ifndef XKeysymToKeycode
+#define XKeysymToKeycode \
+ (tkIntXlibStubsPtr->xKeysymToKeycode) /* 35 */
+#endif
+#ifndef XMapWindow
+#define XMapWindow \
+ (tkIntXlibStubsPtr->xMapWindow) /* 36 */
+#endif
+#ifndef XMoveResizeWindow
+#define XMoveResizeWindow \
+ (tkIntXlibStubsPtr->xMoveResizeWindow) /* 37 */
+#endif
+#ifndef XMoveWindow
+#define XMoveWindow \
+ (tkIntXlibStubsPtr->xMoveWindow) /* 38 */
+#endif
+#ifndef XQueryPointer
+#define XQueryPointer \
+ (tkIntXlibStubsPtr->xQueryPointer) /* 39 */
+#endif
+#ifndef XRaiseWindow
+#define XRaiseWindow \
+ (tkIntXlibStubsPtr->xRaiseWindow) /* 40 */
+#endif
+#ifndef XRefreshKeyboardMapping
+#define XRefreshKeyboardMapping \
+ (tkIntXlibStubsPtr->xRefreshKeyboardMapping) /* 41 */
+#endif
+#ifndef XResizeWindow
+#define XResizeWindow \
+ (tkIntXlibStubsPtr->xResizeWindow) /* 42 */
+#endif
+#ifndef XSelectInput
+#define XSelectInput \
+ (tkIntXlibStubsPtr->xSelectInput) /* 43 */
+#endif
+#ifndef XSendEvent
+#define XSendEvent \
+ (tkIntXlibStubsPtr->xSendEvent) /* 44 */
+#endif
+#ifndef XSetIconName
+#define XSetIconName \
+ (tkIntXlibStubsPtr->xSetIconName) /* 45 */
+#endif
+#ifndef XSetInputFocus
+#define XSetInputFocus \
+ (tkIntXlibStubsPtr->xSetInputFocus) /* 46 */
+#endif
+#ifndef XSetSelectionOwner
+#define XSetSelectionOwner \
+ (tkIntXlibStubsPtr->xSetSelectionOwner) /* 47 */
+#endif
+#ifndef XSetWindowBackground
+#define XSetWindowBackground \
+ (tkIntXlibStubsPtr->xSetWindowBackground) /* 48 */
+#endif
+#ifndef XSetWindowBackgroundPixmap
+#define XSetWindowBackgroundPixmap \
+ (tkIntXlibStubsPtr->xSetWindowBackgroundPixmap) /* 49 */
+#endif
+#ifndef XSetWindowBorder
+#define XSetWindowBorder \
+ (tkIntXlibStubsPtr->xSetWindowBorder) /* 50 */
+#endif
+#ifndef XSetWindowBorderPixmap
+#define XSetWindowBorderPixmap \
+ (tkIntXlibStubsPtr->xSetWindowBorderPixmap) /* 51 */
+#endif
+#ifndef XSetWindowBorderWidth
+#define XSetWindowBorderWidth \
+ (tkIntXlibStubsPtr->xSetWindowBorderWidth) /* 52 */
+#endif
+#ifndef XSetWindowColormap
+#define XSetWindowColormap \
+ (tkIntXlibStubsPtr->xSetWindowColormap) /* 53 */
+#endif
+#ifndef XUngrabKeyboard
+#define XUngrabKeyboard \
+ (tkIntXlibStubsPtr->xUngrabKeyboard) /* 54 */
+#endif
+#ifndef XUngrabPointer
+#define XUngrabPointer \
+ (tkIntXlibStubsPtr->xUngrabPointer) /* 55 */
+#endif
+#ifndef XUnmapWindow
+#define XUnmapWindow \
+ (tkIntXlibStubsPtr->xUnmapWindow) /* 56 */
+#endif
+#ifndef TkPutImage
+#define TkPutImage \
+ (tkIntXlibStubsPtr->tkPutImage) /* 57 */
+#endif
+#ifndef XParseColor
+#define XParseColor \
+ (tkIntXlibStubsPtr->xParseColor) /* 58 */
+#endif
+#ifndef XCreateGC
+#define XCreateGC \
+ (tkIntXlibStubsPtr->xCreateGC) /* 59 */
+#endif
+#ifndef XFreeGC
+#define XFreeGC \
+ (tkIntXlibStubsPtr->xFreeGC) /* 60 */
+#endif
+#ifndef XInternAtom
+#define XInternAtom \
+ (tkIntXlibStubsPtr->xInternAtom) /* 61 */
+#endif
+#ifndef XSetBackground
+#define XSetBackground \
+ (tkIntXlibStubsPtr->xSetBackground) /* 62 */
+#endif
+#ifndef XSetForeground
+#define XSetForeground \
+ (tkIntXlibStubsPtr->xSetForeground) /* 63 */
+#endif
+#ifndef XSetClipMask
+#define XSetClipMask \
+ (tkIntXlibStubsPtr->xSetClipMask) /* 64 */
+#endif
+#ifndef XSetClipOrigin
+#define XSetClipOrigin \
+ (tkIntXlibStubsPtr->xSetClipOrigin) /* 65 */
+#endif
+#ifndef XSetTSOrigin
+#define XSetTSOrigin \
+ (tkIntXlibStubsPtr->xSetTSOrigin) /* 66 */
+#endif
+#ifndef XChangeGC
+#define XChangeGC \
+ (tkIntXlibStubsPtr->xChangeGC) /* 67 */
+#endif
+#ifndef XSetFont
+#define XSetFont \
+ (tkIntXlibStubsPtr->xSetFont) /* 68 */
+#endif
+#ifndef XSetArcMode
+#define XSetArcMode \
+ (tkIntXlibStubsPtr->xSetArcMode) /* 69 */
+#endif
+#ifndef XSetStipple
+#define XSetStipple \
+ (tkIntXlibStubsPtr->xSetStipple) /* 70 */
+#endif
+#ifndef XSetFillRule
+#define XSetFillRule \
+ (tkIntXlibStubsPtr->xSetFillRule) /* 71 */
+#endif
+#ifndef XSetFillStyle
+#define XSetFillStyle \
+ (tkIntXlibStubsPtr->xSetFillStyle) /* 72 */
+#endif
+#ifndef XSetFunction
+#define XSetFunction \
+ (tkIntXlibStubsPtr->xSetFunction) /* 73 */
+#endif
+#ifndef XSetLineAttributes
+#define XSetLineAttributes \
+ (tkIntXlibStubsPtr->xSetLineAttributes) /* 74 */
+#endif
+#ifndef _XInitImageFuncPtrs
+#define _XInitImageFuncPtrs \
+ (tkIntXlibStubsPtr->_XInitImageFuncPtrs) /* 75 */
+#endif
+#ifndef XCreateIC
+#define XCreateIC \
+ (tkIntXlibStubsPtr->xCreateIC) /* 76 */
+#endif
+#ifndef XGetVisualInfo
+#define XGetVisualInfo \
+ (tkIntXlibStubsPtr->xGetVisualInfo) /* 77 */
+#endif
+#ifndef XSetWMClientMachine
+#define XSetWMClientMachine \
+ (tkIntXlibStubsPtr->xSetWMClientMachine) /* 78 */
+#endif
+#ifndef XStringListToTextProperty
+#define XStringListToTextProperty \
+ (tkIntXlibStubsPtr->xStringListToTextProperty) /* 79 */
+#endif
+#ifndef XDrawSegments
+#define XDrawSegments \
+ (tkIntXlibStubsPtr->xDrawSegments) /* 80 */
+#endif
+#ifndef XForceScreenSaver
+#define XForceScreenSaver \
+ (tkIntXlibStubsPtr->xForceScreenSaver) /* 81 */
+#endif
+#ifndef XDrawLine
+#define XDrawLine \
+ (tkIntXlibStubsPtr->xDrawLine) /* 82 */
+#endif
+#ifndef XFillRectangle
+#define XFillRectangle \
+ (tkIntXlibStubsPtr->xFillRectangle) /* 83 */
+#endif
+#ifndef XClearWindow
+#define XClearWindow \
+ (tkIntXlibStubsPtr->xClearWindow) /* 84 */
+#endif
+#ifndef XDrawPoint
+#define XDrawPoint \
+ (tkIntXlibStubsPtr->xDrawPoint) /* 85 */
+#endif
+#ifndef XDrawPoints
+#define XDrawPoints \
+ (tkIntXlibStubsPtr->xDrawPoints) /* 86 */
+#endif
+#ifndef XWarpPointer
+#define XWarpPointer \
+ (tkIntXlibStubsPtr->xWarpPointer) /* 87 */
+#endif
+#ifndef XQueryColor
+#define XQueryColor \
+ (tkIntXlibStubsPtr->xQueryColor) /* 88 */
+#endif
+#ifndef XQueryColors
+#define XQueryColors \
+ (tkIntXlibStubsPtr->xQueryColors) /* 89 */
+#endif
+#endif /* MAC_OSX_TCL */
#endif /* defined(USE_TK_STUBS) && !defined(USE_TK_STUB_PROCS) */
diff --git a/generic/tkMain.c b/generic/tkMain.c
index 42d31f1..5f581b8 100644
--- a/generic/tkMain.c
+++ b/generic/tkMain.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: tkMain.c,v 1.9 2001/09/24 22:14:38 dgp Exp $
+ * RCS: @(#) $Id: tkMain.c,v 1.9.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include <ctype.h>
@@ -43,7 +43,7 @@ typedef struct ThreadSpecificData {
* terminal-like device. Zero means it's
* a file. */
} ThreadSpecificData;
-Tcl_ThreadDataKey dataKey;
+static Tcl_ThreadDataKey dataKey;
/*
* Declarations for various library procedures and variables (don't want
diff --git a/generic/tkPlatDecls.h b/generic/tkPlatDecls.h
index 61ac7b7..929ed21 100644
--- a/generic/tkPlatDecls.h
+++ b/generic/tkPlatDecls.h
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkPlatDecls.h,v 1.6 2000/09/07 00:28:39 ericm Exp $
+ * RCS: @(#) $Id: tkPlatDecls.h,v 1.6.6.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#ifndef _TKPLATDECLS
@@ -82,6 +82,45 @@ EXTERN int TkMacHaveAppearance _ANSI_ARGS_((void));
/* 10 */
EXTERN GWorldPtr TkMacGetDrawablePort _ANSI_ARGS_((Drawable drawable));
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+/* 0 */
+EXTERN void Tk_MacOSXSetEmbedHandler _ANSI_ARGS_((
+ Tk_MacOSXEmbedRegisterWinProc * registerWinProcPtr,
+ Tk_MacOSXEmbedGetGrafPortProc * getPortProcPtr,
+ Tk_MacOSXEmbedMakeContainerExistProc * containerExistProcPtr,
+ Tk_MacOSXEmbedGetClipProc * getClipProc,
+ Tk_MacOSXEmbedGetOffsetInParentProc * getOffsetProc));
+/* 1 */
+EXTERN void Tk_MacOSXTurnOffMenus _ANSI_ARGS_((void));
+/* 2 */
+EXTERN void Tk_MacOSXTkOwnsCursor _ANSI_ARGS_((int tkOwnsIt));
+/* 3 */
+EXTERN void TkMacOSXInitMenus _ANSI_ARGS_((Tcl_Interp * interp));
+/* 4 */
+EXTERN void TkMacOSXInitAppleEvents _ANSI_ARGS_((
+ Tcl_Interp * interp));
+/* 5 */
+EXTERN void TkGenWMConfigureEvent _ANSI_ARGS_((Tk_Window tkwin,
+ int x, int y, int width, int height,
+ int flags));
+/* 6 */
+EXTERN void TkMacOSXInvalClipRgns _ANSI_ARGS_((TkWindow * winPtr));
+/* 7 */
+EXTERN GWorldPtr TkMacOSXGetDrawablePort _ANSI_ARGS_((
+ Drawable drawable));
+/* 8 */
+EXTERN ControlRef TkMacOSXGetRootControl _ANSI_ARGS_((
+ Drawable drawable));
+/* 9 */
+EXTERN int Tk_MacOSXOpenBundleResources _ANSI_ARGS_((
+ Tcl_Interp * interp, char * bundleName,
+ char * libraryPath, int maxPathLen,
+ int hasResourceFile));
+/* 10 */
+EXTERN void Tk_MacOSXSetupTkNotifier _ANSI_ARGS_((void));
+/* 11 */
+EXTERN int Tk_MacOSXIsAppInFront _ANSI_ARGS_((void));
+#endif /* MAC_OSX_TCL */
typedef struct TkPlatStubs {
int magic;
@@ -108,6 +147,20 @@ typedef struct TkPlatStubs {
int (*tkMacHaveAppearance) _ANSI_ARGS_((void)); /* 9 */
GWorldPtr (*tkMacGetDrawablePort) _ANSI_ARGS_((Drawable drawable)); /* 10 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ void (*tk_MacOSXSetEmbedHandler) _ANSI_ARGS_((Tk_MacOSXEmbedRegisterWinProc * registerWinProcPtr, Tk_MacOSXEmbedGetGrafPortProc * getPortProcPtr, Tk_MacOSXEmbedMakeContainerExistProc * containerExistProcPtr, Tk_MacOSXEmbedGetClipProc * getClipProc, Tk_MacOSXEmbedGetOffsetInParentProc * getOffsetProc)); /* 0 */
+ void (*tk_MacOSXTurnOffMenus) _ANSI_ARGS_((void)); /* 1 */
+ void (*tk_MacOSXTkOwnsCursor) _ANSI_ARGS_((int tkOwnsIt)); /* 2 */
+ void (*tkMacOSXInitMenus) _ANSI_ARGS_((Tcl_Interp * interp)); /* 3 */
+ void (*tkMacOSXInitAppleEvents) _ANSI_ARGS_((Tcl_Interp * interp)); /* 4 */
+ void (*tkGenWMConfigureEvent) _ANSI_ARGS_((Tk_Window tkwin, int x, int y, int width, int height, int flags)); /* 5 */
+ void (*tkMacOSXInvalClipRgns) _ANSI_ARGS_((TkWindow * winPtr)); /* 6 */
+ GWorldPtr (*tkMacOSXGetDrawablePort) _ANSI_ARGS_((Drawable drawable)); /* 7 */
+ ControlRef (*tkMacOSXGetRootControl) _ANSI_ARGS_((Drawable drawable)); /* 8 */
+ int (*tk_MacOSXOpenBundleResources) _ANSI_ARGS_((Tcl_Interp * interp, char * bundleName, char * libraryPath, int maxPathLen, int hasResourceFile)); /* 9 */
+ void (*tk_MacOSXSetupTkNotifier) _ANSI_ARGS_((void)); /* 10 */
+ int (*tk_MacOSXIsAppInFront) _ANSI_ARGS_((void)); /* 11 */
+#endif /* MAC_OSX_TCL */
} TkPlatStubs;
#ifdef __cplusplus
@@ -196,6 +249,56 @@ extern TkPlatStubs *tkPlatStubsPtr;
(tkPlatStubsPtr->tkMacGetDrawablePort) /* 10 */
#endif
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+#ifndef Tk_MacOSXSetEmbedHandler
+#define Tk_MacOSXSetEmbedHandler \
+ (tkPlatStubsPtr->tk_MacOSXSetEmbedHandler) /* 0 */
+#endif
+#ifndef Tk_MacOSXTurnOffMenus
+#define Tk_MacOSXTurnOffMenus \
+ (tkPlatStubsPtr->tk_MacOSXTurnOffMenus) /* 1 */
+#endif
+#ifndef Tk_MacOSXTkOwnsCursor
+#define Tk_MacOSXTkOwnsCursor \
+ (tkPlatStubsPtr->tk_MacOSXTkOwnsCursor) /* 2 */
+#endif
+#ifndef TkMacOSXInitMenus
+#define TkMacOSXInitMenus \
+ (tkPlatStubsPtr->tkMacOSXInitMenus) /* 3 */
+#endif
+#ifndef TkMacOSXInitAppleEvents
+#define TkMacOSXInitAppleEvents \
+ (tkPlatStubsPtr->tkMacOSXInitAppleEvents) /* 4 */
+#endif
+#ifndef TkGenWMConfigureEvent
+#define TkGenWMConfigureEvent \
+ (tkPlatStubsPtr->tkGenWMConfigureEvent) /* 5 */
+#endif
+#ifndef TkMacOSXInvalClipRgns
+#define TkMacOSXInvalClipRgns \
+ (tkPlatStubsPtr->tkMacOSXInvalClipRgns) /* 6 */
+#endif
+#ifndef TkMacOSXGetDrawablePort
+#define TkMacOSXGetDrawablePort \
+ (tkPlatStubsPtr->tkMacOSXGetDrawablePort) /* 7 */
+#endif
+#ifndef TkMacOSXGetRootControl
+#define TkMacOSXGetRootControl \
+ (tkPlatStubsPtr->tkMacOSXGetRootControl) /* 8 */
+#endif
+#ifndef Tk_MacOSXOpenBundleResources
+#define Tk_MacOSXOpenBundleResources \
+ (tkPlatStubsPtr->tk_MacOSXOpenBundleResources) /* 9 */
+#endif
+#ifndef Tk_MacOSXSetupTkNotifier
+#define Tk_MacOSXSetupTkNotifier \
+ (tkPlatStubsPtr->tk_MacOSXSetupTkNotifier) /* 10 */
+#endif
+#ifndef Tk_MacOSXIsAppInFront
+#define Tk_MacOSXIsAppInFront \
+ (tkPlatStubsPtr->tk_MacOSXIsAppInFront) /* 11 */
+#endif
+#endif /* MAC_OSX_TCL */
#endif /* defined(USE_TK_STUBS) && !defined(USE_TK_STUB_PROCS) */
diff --git a/generic/tkPointer.c b/generic/tkPointer.c
index d14074d..a137ec4 100644
--- a/generic/tkPointer.c
+++ b/generic/tkPointer.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkPointer.c,v 1.4 1999/04/16 01:51:21 stanton Exp $
+ * RCS: @(#) $Id: tkPointer.c,v 1.4.18.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "tkInt.h"
@@ -20,7 +20,7 @@
#include "tkWinInt.h"
#endif
-#ifdef MAC_TCL
+#if defined(MAC_TCL) || defined(MAC_OSX_TCL)
#define Cursor XCursor
#endif
diff --git a/generic/tkPort.h b/generic/tkPort.h
index 04e1dab..8ce9ee2 100644
--- a/generic/tkPort.h
+++ b/generic/tkPort.h
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkPort.h,v 1.2 1998/09/14 18:23:16 stanton Exp $
+ * RCS: @(#) $Id: tkPort.h,v 1.2.24.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#ifndef _TKPORT
@@ -28,9 +28,13 @@
#else
# if defined(MAC_TCL)
# include "tkMacPort.h"
+# elif defined(MAC_OSX_TCL)
+# include "../macosx/tkMacOSXPort.h"
# else
# include "../unix/tkUnixPort.h"
# endif
#endif
#endif /* _TKPORT */
+
+
diff --git a/generic/tkSelect.c b/generic/tkSelect.c
index 9d6285d..589fc11 100644
--- a/generic/tkSelect.c
+++ b/generic/tkSelect.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkSelect.c,v 1.7 2001/07/03 01:03:16 hobbs Exp $
+ * RCS: @(#) $Id: tkSelect.c,v 1.7.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "tkInt.h"
@@ -1195,7 +1195,7 @@ TkSelInit(tkwin)
* http://www.cl.cam.ac.uk/~mgk25/unicode.html#x11
*/
-#if !defined(__WIN32__) && !defined(MAC_TCL)
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))
dispPtr->utf8Atom = Tk_InternAtom(tkwin, "UTF8_STRING");
#else
dispPtr->utf8Atom = (Atom) NULL;
diff --git a/generic/tkStubInit.c b/generic/tkStubInit.c
index 9710089..277f0c9 100644
--- a/generic/tkStubInit.c
+++ b/generic/tkStubInit.c
@@ -8,19 +8,32 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkStubInit.c,v 1.28 2001/09/26 20:25:17 pspjuth Exp $
+ * RCS: @(#) $Id: tkStubInit.c,v 1.28.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "tkInt.h"
#include "tkPort.h"
+#if !(defined(__WIN32__) && defined(MAC_TCL) || defined(MAC_OSX_TCL))
+/* UNIX */
+#define UNIX_TK
+#endif
+
#ifdef __WIN32__
#include "tkWinInt.h"
#endif
-#ifdef MAC_TCL
+#if defined(MAC_TCL)
+/* set this locally .. we could have used _TKMACINT */
+#define MAC_TK
#include "tkMacInt.h"
#endif
+#if defined(MAC_OSX_TCL)
+/* set this locally .. we could have used _TKMACINT */
+#define MAC_OSX_TK
+#include "tkMacOSXInt.h"
+#endif
+
#include "tkDecls.h"
#include "tkPlatDecls.h"
#include "tkIntDecls.h"
@@ -160,7 +173,7 @@ TkIntStubs tkIntStubs = {
TkpGetSubFonts, /* 110 */
TkpGetSystemDefault, /* 111 */
TkpMenuThreadInit, /* 112 */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 113 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -169,7 +182,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkClipBox, /* 113 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkClipBox, /* 113 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 114 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -178,7 +194,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkCreateRegion, /* 114 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkCreateRegion, /* 114 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 115 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -187,7 +206,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkDestroyRegion, /* 115 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkDestroyRegion, /* 115 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 116 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -196,7 +218,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkIntersectRegion, /* 116 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkIntersectRegion, /* 116 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 117 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -205,7 +230,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkRectInRegion, /* 117 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkRectInRegion, /* 117 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 118 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -214,7 +242,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkSetRegion, /* 118 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkSetRegion, /* 118 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 119 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -223,7 +254,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkUnionRectWithRegion, /* 119 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkUnionRectWithRegion, /* 119 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 120 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -232,7 +266,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkGenerateActivateEvents, /* 120 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkGenerateActivateEvents, /* 120 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 121 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -241,7 +278,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkpCreateNativeBitmap, /* 121 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkpCreateNativeBitmap, /* 121 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 122 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -250,7 +290,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkpDefineNativeBitmaps, /* 122 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkpDefineNativeBitmaps, /* 122 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 123 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -259,7 +302,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkpGetMS, /* 123 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkpGetMS, /* 123 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 124 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -268,7 +314,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkpGetNativeAppBitmap, /* 124 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkpGetNativeAppBitmap, /* 124 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 125 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -277,7 +326,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkPointerDeadWindow, /* 125 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkPointerDeadWindow, /* 125 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 126 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -286,7 +338,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkpSetCapture, /* 126 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkpSetCapture, /* 126 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 127 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -295,7 +350,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkpSetCursor, /* 127 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkpSetCursor, /* 127 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 128 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -304,8 +362,11 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkpWmSetState, /* 128 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ TkpWmSetState, /* 128 */
+#endif /* MAC_OSX_TCL */
NULL, /* 129 */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 130 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -314,7 +375,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkGetTransientMaster, /* 130 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkGetTransientMaster, /* 130 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 131 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -323,8 +387,11 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkGenerateButtonEvent, /* 131 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ TkGenerateButtonEvent, /* 131 */
+#endif /* MAC_OSX_TCL */
NULL, /* 132 */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 133 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -333,7 +400,10 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkGenWMDestroyEvent, /* 133 */
#endif /* MAC_TCL */
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifdef MAC_OSX_TCL
+ TkGenWMDestroyEvent, /* 133 */
+#endif /* MAC_OSX_TCL */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
NULL, /* 134 */
#endif /* UNIX */
#ifdef __WIN32__
@@ -342,6 +412,9 @@ TkIntStubs tkIntStubs = {
#ifdef MAC_TCL
TkGenWMConfigureEvent, /* 134 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ TkGenWMConfigureEvent, /* 134 */
+#endif /* MAC_OSX_TCL */
TkpDrawHighlightBorder, /* 135 */
TkSetFocusWin, /* 136 */
TkpSetKeycodeAndState, /* 137 */
@@ -353,7 +426,7 @@ TkIntStubs tkIntStubs = {
TkIntPlatStubs tkIntPlatStubs = {
TCL_STUB_MAGIC,
NULL,
-#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))/* UNIX */
TkCreateXEventSource, /* 0 */
TkFreeWindowId, /* 1 */
TkInitXId, /* 2 */
@@ -468,6 +541,56 @@ TkIntPlatStubs tkIntPlatStubs = {
TkMacGetHostToplevel, /* 64 */
TkMacPreprocessMenu, /* 65 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ TkGenerateActivateEvents, /* 0 */
+ TkpCreateNativeBitmap, /* 1 */
+ TkpDefineNativeBitmaps, /* 2 */
+ TkPointerDeadWindow, /* 3 */
+ TkpSetCapture, /* 4 */
+ TkpSetCursor, /* 5 */
+ TkpWmSetState, /* 6 */
+ TkAboutDlg, /* 7 */
+ TkMacOSXButtonKeyState, /* 8 */
+ TkMacOSXClearMenubarActive, /* 9 */
+ TkMacOSXDispatchMenuEvent, /* 10 */
+ TkMacOSXInstallCursor, /* 11 */
+ TkMacOSXHandleTearoffMenu, /* 12 */
+ TkMacOSXInvalClipRgns, /* 13 */
+ TkMacOSXDoHLEvent, /* 14 */
+ TkMacOSXGetDrawablePort, /* 15 */
+ TkMacOSXGetXWindow, /* 16 */
+ TkMacOSXGrowToplevel, /* 17 */
+ TkMacOSXHandleMenuSelect, /* 18 */
+ TkMacOSXInitAppleEvents, /* 19 */
+ TkMacOSXInitMenus, /* 20 */
+ TkMacOSXInvalidateWindow, /* 21 */
+ TkMacOSXIsCharacterMissing, /* 22 */
+ TkMacOSXMakeRealWindowExist, /* 23 */
+ TkMacOSXMakeStippleMap, /* 24 */
+ TkMacOSXMenuClick, /* 25 */
+ TkMacOSXRegisterOffScreenWindow, /* 26 */
+ TkMacOSXResizable, /* 27 */
+ TkMacOSXSetHelpMenuItemCount, /* 28 */
+ TkMacOSXSetScrollbarGrow, /* 29 */
+ TkMacOSXSetUpClippingRgn, /* 30 */
+ TkMacOSXSetUpGraphicsPort, /* 31 */
+ TkMacOSXUpdateClipRgn, /* 32 */
+ TkMacOSXUnregisterMacWindow, /* 33 */
+ TkMacOSXUseMenuID, /* 34 */
+ TkMacOSXVisableClipRgn, /* 35 */
+ TkMacOSXWinBounds, /* 36 */
+ TkMacOSXWindowOffset, /* 37 */
+ TkSetMacColor, /* 38 */
+ TkSetWMName, /* 39 */
+ TkSuspendClipboard, /* 40 */
+ TkMacOSXZoomToplevel, /* 41 */
+ Tk_TopCoordsToWindow, /* 42 */
+ TkMacOSXContainerId, /* 43 */
+ TkMacOSXGetHostToplevel, /* 44 */
+ TkMacOSXPreprocessMenu, /* 45 */
+ TkpIsWindowFloating, /* 46 */
+ TkMacOSXGetCapture, /* 47 */
+#endif /* MAC_OSX_TCL */
};
TkIntXlibStubs tkIntXlibStubs = {
@@ -674,6 +797,98 @@ TkIntXlibStubs tkIntXlibStubs = {
XQueryColor, /* 88 */
XQueryColors, /* 89 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ XSetDashes, /* 0 */
+ XGetModifierMapping, /* 1 */
+ XCreateImage, /* 2 */
+ XGetImage, /* 3 */
+ XGetAtomName, /* 4 */
+ XKeysymToString, /* 5 */
+ XCreateColormap, /* 6 */
+ XGContextFromGC, /* 7 */
+ XKeycodeToKeysym, /* 8 */
+ XStringToKeysym, /* 9 */
+ XRootWindow, /* 10 */
+ XSetErrorHandler, /* 11 */
+ XAllocColor, /* 12 */
+ XBell, /* 13 */
+ XChangeProperty, /* 14 */
+ XChangeWindowAttributes, /* 15 */
+ XConfigureWindow, /* 16 */
+ XCopyArea, /* 17 */
+ XCopyPlane, /* 18 */
+ XCreateBitmapFromData, /* 19 */
+ XDefineCursor, /* 20 */
+ XDestroyWindow, /* 21 */
+ XDrawArc, /* 22 */
+ XDrawLines, /* 23 */
+ XDrawRectangle, /* 24 */
+ XFillArc, /* 25 */
+ XFillPolygon, /* 26 */
+ XFillRectangles, /* 27 */
+ XFreeColormap, /* 28 */
+ XFreeColors, /* 29 */
+ XFreeModifiermap, /* 30 */
+ XGetGeometry, /* 31 */
+ XGetWindowProperty, /* 32 */
+ XGrabKeyboard, /* 33 */
+ XGrabPointer, /* 34 */
+ XKeysymToKeycode, /* 35 */
+ XMapWindow, /* 36 */
+ XMoveResizeWindow, /* 37 */
+ XMoveWindow, /* 38 */
+ XQueryPointer, /* 39 */
+ XRaiseWindow, /* 40 */
+ XRefreshKeyboardMapping, /* 41 */
+ XResizeWindow, /* 42 */
+ XSelectInput, /* 43 */
+ XSendEvent, /* 44 */
+ XSetIconName, /* 45 */
+ XSetInputFocus, /* 46 */
+ XSetSelectionOwner, /* 47 */
+ XSetWindowBackground, /* 48 */
+ XSetWindowBackgroundPixmap, /* 49 */
+ XSetWindowBorder, /* 50 */
+ XSetWindowBorderPixmap, /* 51 */
+ XSetWindowBorderWidth, /* 52 */
+ XSetWindowColormap, /* 53 */
+ XUngrabKeyboard, /* 54 */
+ XUngrabPointer, /* 55 */
+ XUnmapWindow, /* 56 */
+ TkPutImage, /* 57 */
+ XParseColor, /* 58 */
+ XCreateGC, /* 59 */
+ XFreeGC, /* 60 */
+ XInternAtom, /* 61 */
+ XSetBackground, /* 62 */
+ XSetForeground, /* 63 */
+ XSetClipMask, /* 64 */
+ XSetClipOrigin, /* 65 */
+ XSetTSOrigin, /* 66 */
+ XChangeGC, /* 67 */
+ XSetFont, /* 68 */
+ XSetArcMode, /* 69 */
+ XSetStipple, /* 70 */
+ XSetFillRule, /* 71 */
+ XSetFillStyle, /* 72 */
+ XSetFunction, /* 73 */
+ XSetLineAttributes, /* 74 */
+ _XInitImageFuncPtrs, /* 75 */
+ XCreateIC, /* 76 */
+ XGetVisualInfo, /* 77 */
+ XSetWMClientMachine, /* 78 */
+ XStringListToTextProperty, /* 79 */
+ XDrawSegments, /* 80 */
+ XForceScreenSaver, /* 81 */
+ XDrawLine, /* 82 */
+ XFillRectangle, /* 83 */
+ XClearWindow, /* 84 */
+ XDrawPoint, /* 85 */
+ XDrawPoints, /* 86 */
+ XWarpPointer, /* 87 */
+ XQueryColor, /* 88 */
+ XQueryColors, /* 89 */
+#endif /* MAC_OSX_TCL */
};
TkPlatStubs tkPlatStubs = {
@@ -700,6 +915,20 @@ TkPlatStubs tkPlatStubs = {
TkMacHaveAppearance, /* 9 */
TkMacGetDrawablePort, /* 10 */
#endif /* MAC_TCL */
+#ifdef MAC_OSX_TCL
+ Tk_MacOSXSetEmbedHandler, /* 0 */
+ Tk_MacOSXTurnOffMenus, /* 1 */
+ Tk_MacOSXTkOwnsCursor, /* 2 */
+ TkMacOSXInitMenus, /* 3 */
+ TkMacOSXInitAppleEvents, /* 4 */
+ TkGenWMConfigureEvent, /* 5 */
+ TkMacOSXInvalClipRgns, /* 6 */
+ TkMacOSXGetDrawablePort, /* 7 */
+ TkMacOSXGetRootControl, /* 8 */
+ Tk_MacOSXOpenBundleResources, /* 9 */
+ Tk_MacOSXSetupTkNotifier, /* 10 */
+ Tk_MacOSXIsAppInFront, /* 11 */
+#endif /* MAC_OSX_TCL */
};
static TkStubHooks tkStubHooks = {
@@ -960,3 +1189,7 @@ TkStubs tkStubs = {
};
/* !END!: Do not edit above this line. */
+
+#undef UNIX_TK
+#undef MAC_TK
+#undef MAC_OSX_TK
diff --git a/generic/tkStubLib.c b/generic/tkStubLib.c
index 1783e32..328feac 100644
--- a/generic/tkStubLib.c
+++ b/generic/tkStubLib.c
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkStubLib.c,v 1.6 2001/05/22 00:22:41 hobbs Exp $
+ * RCS: @(#) $Id: tkStubLib.c,v 1.6.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
/*
@@ -18,8 +18,13 @@
* do these includes before we add the stubs defines. This a hack.
*/
-#ifdef MAC_TCL
+#if defined(MAC_TCL)
#include "tkMacInt.h"
+#else defined(MAC_OSX_TCL)
+#include "tkMacOSXInt.h"
+#endif
+
+#if defined(MAC_TCL) || defined(MAC_OSX_TCL)
#include "tkInt.h"
#include "tkPort.h"
#endif /* MAC_TCL */
@@ -41,7 +46,7 @@
#endif
#undef USE_TK_STUB_PROCS
-#ifndef MAC_TCL
+#if !defined(MAC_TCL) && !defined(MAC_OSX_TCL)
#include "tkPort.h"
#include "tkInt.h"
diff --git a/generic/tkTest.c b/generic/tkTest.c
index b047b2d..586e9e5 100644
--- a/generic/tkTest.c
+++ b/generic/tkTest.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: tkTest.c,v 1.15 2000/10/30 20:04:16 ericm Exp $
+ * RCS: @(#) $Id: tkTest.c,v 1.15.6.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "tkInt.h"
@@ -24,7 +24,7 @@
#include "tkWinInt.h"
#endif
-#ifdef MAC_TCL
+#if defined(MAC_TCL) || defined(MAC_OSX_TCL)
#include "tkScrollbar.h"
#endif
@@ -181,7 +181,7 @@ static int TestmakeexistCmd _ANSI_ARGS_((ClientData dummy,
Tcl_Interp *interp, int argc, char **argv));
static int TestmenubarCmd _ANSI_ARGS_((ClientData dummy,
Tcl_Interp *interp, int argc, char **argv));
-#if defined(__WIN32__) || defined(MAC_TCL)
+#if defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL)
static int TestmetricsCmd _ANSI_ARGS_((ClientData dummy,
Tcl_Interp *interp, int argc, char **argv));
#endif
@@ -205,7 +205,7 @@ static int TestsendCmd _ANSI_ARGS_((ClientData dummy,
Tcl_Interp *interp, int argc, char **argv));
static int TesttextCmd _ANSI_ARGS_((ClientData dummy,
Tcl_Interp *interp, int argc, char **argv));
-#if !(defined(__WIN32__) || defined(MAC_TCL))
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))
static int TestwrapperCmd _ANSI_ARGS_((ClientData dummy,
Tcl_Interp *interp, int argc, char **argv));
#endif
@@ -224,7 +224,7 @@ static void TrivialEventProc _ANSI_ARGS_((ClientData clientData,
extern int TkplatformtestInit _ANSI_ARGS_((Tcl_Interp *interp));
extern int TclThread_Init _ANSI_ARGS_((Tcl_Interp *interp));
-#if !(defined(__WIN32__) || defined(MAC_TCL))
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))
#define TkplatformtestInit(x) TCL_OK
#endif
@@ -284,7 +284,7 @@ Tktest_Init(interp)
(ClientData) Tk_MainWindow(interp), (Tcl_CmdDeleteProc *) NULL);
Tcl_CreateCommand(interp, "testmenubar", TestmenubarCmd,
(ClientData) Tk_MainWindow(interp), (Tcl_CmdDeleteProc *) NULL);
-#if defined(__WIN32__) || defined(MAC_TCL)
+#if defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL)
Tcl_CreateCommand(interp, "testmetrics", TestmetricsCmd,
(ClientData) Tk_MainWindow(interp), (Tcl_CmdDeleteProc *) NULL);
#endif
@@ -294,7 +294,7 @@ Tktest_Init(interp)
(ClientData) Tk_MainWindow(interp), (Tcl_CmdDeleteProc *) NULL);
Tcl_CreateCommand(interp, "testtext", TesttextCmd,
(ClientData) Tk_MainWindow(interp), (Tcl_CmdDeleteProc *) NULL);
-#if !(defined(__WIN32__) || defined(MAC_TCL))
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))
Tcl_CreateCommand(interp, "testwrapper", TestwrapperCmd,
(ClientData) Tk_MainWindow(interp), (Tcl_CmdDeleteProc *) NULL);
#endif
@@ -2057,7 +2057,7 @@ TestmetricsCmd(clientData, interp, argc, argv)
return TCL_OK;
}
#endif
-#ifdef MAC_TCL
+#if defined(MAC_TCL) || defined(MAC_OSX_TCL)
static int
TestmetricsCmd(clientData, interp, argc, argv)
ClientData clientData; /* Main window for application. */
@@ -2198,7 +2198,7 @@ TestsendCmd(clientData, interp, argc, argv)
int argc; /* Number of arguments. */
char **argv; /* Argument strings. */
{
-#if !(defined(__WIN32__) || defined(MAC_TCL))
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))
TkWindow *winPtr = (TkWindow *) clientData;
#endif
@@ -2208,7 +2208,7 @@ TestsendCmd(clientData, interp, argc, argv)
return TCL_ERROR;
}
-#if !(defined(__WIN32__) || defined(MAC_TCL))
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))
if (strcmp(argv[1], "bogus") == 0) {
XChangeProperty(winPtr->dispPtr->display,
RootWindow(winPtr->dispPtr->display, 0),
@@ -2360,7 +2360,7 @@ TesttextCmd(clientData, interp, argc, argv)
return TCL_OK;
}
-#if !(defined(__WIN32__) || defined(MAC_TCL))
+#if !(defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))
/*
*----------------------------------------------------------------------
*
diff --git a/generic/tkText.c b/generic/tkText.c
index ef1ae4d..cf8b9ae 100644
--- a/generic/tkText.c
+++ b/generic/tkText.c
@@ -14,14 +14,14 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkText.c,v 1.18 2000/11/22 01:49:38 ericm Exp $
+ * RCS: @(#) $Id: tkText.c,v 1.18.4.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "default.h"
#include "tkPort.h"
#include "tkInt.h"
-#ifdef MAC_TCL
+#if defined(MAC_TCL) || defined(MAC_OSX_TCL)
#define Style TkStyle
#define DInfo TkDInfo
#endif
diff --git a/generic/tkWindow.c b/generic/tkWindow.c
index c9481c5..3b51586 100644
--- a/generic/tkWindow.c
+++ b/generic/tkWindow.c
@@ -12,13 +12,13 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkWindow.c,v 1.39 2001/09/26 21:36:19 pspjuth Exp $
+ * RCS: @(#) $Id: tkWindow.c,v 1.39.2.1 2001/10/15 09:22:00 wolfsuit Exp $
*/
#include "tkPort.h"
#include "tkInt.h"
-#if !defined(__WIN32__) && !defined(MAC_TCL)
+#if !( defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL))
#include "tkUnixInt.h"
#endif
@@ -116,7 +116,7 @@ static TkCmd commands[] = {
{"selection", NULL, Tk_SelectionObjCmd, 0, 1},
{"tk", NULL, Tk_TkObjCmd, 0, 1},
{"tkwait", NULL, Tk_TkwaitObjCmd, 1, 1},
-#if defined(__WIN32__) || defined(MAC_TCL)
+#if defined(__WIN32__) || defined(MAC_TCL) || defined(MAC_OSX_TCL)
{"tk_chooseColor", NULL, Tk_ChooseColorObjCmd, 0, 1},
{"tk_chooseDirectory", NULL, Tk_ChooseDirectoryObjCmd, 0, 1},
{"tk_getOpenFile", NULL, Tk_GetOpenFileObjCmd, 0, 1},
@@ -154,7 +154,7 @@ static TkCmd commands[] = {
* Misc.
*/
-#ifdef MAC_TCL
+#if defined(MAC_TCL) || defined(MAC_OSX_TCL)
{"::tk::unsupported::MacWindowStyle",
TkUnsupported1Cmd, NULL, 1, 1},
#endif
@@ -1349,7 +1349,7 @@ Tk_DestroyWindow(tkwin)
TkWmRemoveFromColormapWindows(winPtr);
}
if (winPtr->window != None) {
-#if defined(MAC_TCL) || defined(__WIN32__)
+#if defined(MAC_TCL) || defined(MAC_OSX_TCL) || defined(__WIN32__)
XDestroyWindow(winPtr->display, winPtr->window);
#else
if ((winPtr->flags & TK_TOP_LEVEL)
@@ -1529,7 +1529,7 @@ void
Tk_MapWindow(tkwin)
Tk_Window tkwin; /* Token for window to map. */
{
- register TkWindow *winPtr = (TkWindow *) tkwin;
+ TkWindow *winPtr = (TkWindow *) tkwin;
XEvent event;
if (winPtr->flags & TK_MAPPED) {
@@ -1990,7 +1990,7 @@ Tk_DefineCursor(tkwin, cursor)
{
register TkWindow *winPtr = (TkWindow *) tkwin;
-#ifdef MAC_TCL
+#if defined(MAC_TCL) || defined(MAC_OSX_TCL)
winPtr->atts.cursor = (XCursor) cursor;
#else
winPtr->atts.cursor = (Cursor) cursor;