diff options
author | wolfsuit <wolfsuit> | 2001-10-15 09:21:59 (GMT) |
---|---|---|
committer | wolfsuit <wolfsuit> | 2001-10-15 09:21:59 (GMT) |
commit | a3014412e50718ef8e18906598145caab4b898f0 (patch) | |
tree | 7105a93a860c8f55a94974a10b6fdfe6c6dd8a2f /generic | |
parent | 343a12a735abd601b4cd5c087be337a51851adb6 (diff) | |
download | tk-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.h | 8 | ||||
-rw-r--r-- | generic/tk.decls | 61 | ||||
-rw-r--r-- | generic/tk.h | 15 | ||||
-rw-r--r-- | generic/tkBind.c | 4 | ||||
-rw-r--r-- | generic/tkCmds.c | 7 | ||||
-rw-r--r-- | generic/tkFileFilter.h | 5 | ||||
-rw-r--r-- | generic/tkFont.c | 30 | ||||
-rw-r--r-- | generic/tkGrab.c | 7 | ||||
-rw-r--r-- | generic/tkInt.decls | 418 | ||||
-rw-r--r-- | generic/tkIntDecls.h | 315 | ||||
-rw-r--r-- | generic/tkIntPlatDecls.h | 378 | ||||
-rw-r--r-- | generic/tkIntXlibDecls.h | 742 | ||||
-rw-r--r-- | generic/tkMain.c | 4 | ||||
-rw-r--r-- | generic/tkPlatDecls.h | 105 | ||||
-rw-r--r-- | generic/tkPointer.c | 4 | ||||
-rw-r--r-- | generic/tkPort.h | 6 | ||||
-rw-r--r-- | generic/tkSelect.c | 4 | ||||
-rw-r--r-- | generic/tkStubInit.c | 279 | ||||
-rw-r--r-- | generic/tkStubLib.c | 11 | ||||
-rw-r--r-- | generic/tkTest.c | 22 | ||||
-rw-r--r-- | generic/tkText.c | 4 | ||||
-rw-r--r-- | generic/tkWindow.c | 14 |
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; |