# tkInt.decls -- # # This file contains the declarations for all unsupported functions that # are exported by the Tk library. This file is used to generate the # tkIntDecls.h, tkIntPlatDecls.h, tkIntStub.c, and tkPlatStub.c files. # # Copyright (c) 1998-1999 by Scriptics Corporation. # Copyright (c) 2007 Daniel A. Steffen # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. library tk ############################################################################## # Define the unsupported generic interfaces. interface tkInt # Declare each of the functions in the unsupported internal Tcl interface. # These interfaces are allowed to changed between versions. Use at your own # risk. Note that the position of functions should not be changed between # versions to avoid gratuitous incompatibilities. declare 0 { TkWindow *TkAllocWindow(TkDisplay *dispPtr, int screenNum, TkWindow *parentPtr) } declare 1 { void TkBezierPoints(double control[], int numSteps, double *coordPtr) } declare 2 { void TkBezierScreenPoints(Tk_Canvas canvas, double control[], int numSteps, XPoint *xPointPtr) } declare 3 { void TkBindDeadWindow(TkWindow *winPtr) } declare 4 { void TkBindEventProc(TkWindow *winPtr, XEvent *eventPtr) } declare 5 { void TkBindFree(TkMainInfo *mainPtr) } declare 6 { void TkBindInit(TkMainInfo *mainPtr) } declare 7 { void TkChangeEventWindow(XEvent *eventPtr, TkWindow *winPtr) } declare 8 { int TkClipInit(Tcl_Interp *interp, TkDisplay *dispPtr) } declare 9 { void TkComputeAnchor(Tk_Anchor anchor, Tk_Window tkwin, int padX, int padY, int innerWidth, int innerHeight, int *xPtr, int *yPtr) } declare 10 { int TkCopyAndGlobalEval(Tcl_Interp *interp, char *script) } declare 11 { unsigned long TkCreateBindingProcedure(Tcl_Interp *interp, Tk_BindingTable bindingTable, ClientData object, const char *eventString, TkBindEvalProc *evalProc, TkBindFreeProc *freeProc, ClientData clientData) } declare 12 { TkCursor *TkCreateCursorFromData(Tk_Window tkwin, const char *source, const char *mask, int width, int height, int xHot, int yHot, XColor fg, XColor bg) } declare 13 { int TkCreateFrame(ClientData clientData, Tcl_Interp *interp, int argc, char **argv, int toplevel, char *appName) } declare 14 { Tk_Window TkCreateMainWindow(Tcl_Interp *interp, const char *screenName, char *baseName) } declare 15 { Time TkCurrentTime(TkDisplay *dispPtr) } declare 16 { void TkDeleteAllImages(TkMainInfo *mainPtr) } declare 17 { void TkDoConfigureNotify(TkWindow *winPtr) } declare 18 { void TkDrawInsetFocusHighlight(Tk_Window tkwin, GC gc, int width, Drawable drawable, int padding) } declare 19 { void TkEventDeadWindow(TkWindow *winPtr) } declare 20 { void TkFillPolygon(Tk_Canvas canvas, double *coordPtr, int numPoints, Display *display, Drawable drawable, GC gc, GC outlineGC) } declare 21 { int TkFindStateNum(Tcl_Interp *interp, const char *option, const TkStateMap *mapPtr, const char *strKey) } declare 22 { char *TkFindStateString(const TkStateMap *mapPtr, int numKey) } declare 23 { void TkFocusDeadWindow(TkWindow *winPtr) } declare 24 { int TkFocusFilterEvent(TkWindow *winPtr, XEvent *eventPtr) } declare 25 { TkWindow *TkFocusKeyEvent(TkWindow *winPtr, XEvent *eventPtr) } declare 26 { void TkFontPkgInit(TkMainInfo *mainPtr) } declare 27 { void TkFontPkgFree(TkMainInfo *mainPtr) } declare 28 { void TkFreeBindingTags(TkWindow *winPtr) } # Name change only, TkFreeCursor in Tcl 8.0.x now TkpFreeCursor declare 29 { void TkpFreeCursor(TkCursor *cursorPtr) } declare 30 { char *TkGetBitmapData(Tcl_Interp *interp, char *string, char *fileName, int *widthPtr, int *heightPtr, int *hotXPtr, int *hotYPtr) } declare 31 { void TkGetButtPoints(double p1[], double p2[], double width, int project, double m1[], double m2[]) } declare 32 { TkCursor *TkGetCursorByName(Tcl_Interp *interp, Tk_Window tkwin, Tk_Uid string) } declare 33 { CONST84_RETURN char *TkGetDefaultScreenName(Tcl_Interp *interp, const char *screenName) } declare 34 { TkDisplay *TkGetDisplay(Display *display) } declare 35 { int TkGetDisplayOf(Tcl_Interp *interp, int objc, Tcl_Obj *const objv[], Tk_Window *tkwinPtr) } declare 36 { TkWindow *TkGetFocusWin(TkWindow *winPtr) } declare 37 { int TkGetInterpNames(Tcl_Interp *interp, Tk_Window tkwin) } declare 38 { int TkGetMiterPoints(double p1[], double p2[], double p3[], double width, double m1[], double m2[]) } declare 39 { void TkGetPointerCoords(Tk_Window tkwin, int *xPtr, int *yPtr) } declare 40 { void TkGetServerInfo(Tcl_Interp *interp, Tk_Window tkwin) } declare 41 { void TkGrabDeadWindow(TkWindow *winPtr) } declare 42 { int TkGrabState(TkWindow *winPtr) } declare 43 { void TkIncludePoint(Tk_Item *itemPtr, double *pointPtr) } declare 44 { void TkInOutEvents(XEvent *eventPtr, TkWindow *sourcePtr, TkWindow *destPtr, int leaveType, int enterType, Tcl_QueuePosition position) } declare 45 { void TkInstallFrameMenu(Tk_Window tkwin) } declare 46 { char *TkKeysymToString(KeySym keysym) } declare 47 { int TkLineToArea(double end1Ptr[], double end2Ptr[], double rectPtr[]) } declare 48 { double TkLineToPoint(double end1Ptr[], double end2Ptr[], double pointPtr[]) } declare 49 { int TkMakeBezierCurve(Tk_Canvas canvas, double *pointPtr, int numPoints, int numSteps, XPoint xPoints[], double dblPoints[]) } declare 50 { void TkMakeBezierPostscript(Tcl_Interp *interp, Tk_Canvas canvas, double *pointPtr, int numPoints) } declare 51 { void TkOptionClassChanged(TkWindow *winPtr) } declare 52 { void TkOptionDeadWindow(TkWindow *winPtr) } declare 53 { int TkOvalToArea(double *ovalPtr, double *rectPtr) } declare 54 { double TkOvalToPoint(double ovalPtr[], double width, int filled, double pointPtr[]) } declare 55 { int TkpChangeFocus(TkWindow *winPtr, int force) } declare 56 { void TkpCloseDisplay(TkDisplay *dispPtr) } declare 57 { void TkpClaimFocus(TkWindow *topLevelPtr, int force) } declare 58 { void TkpDisplayWarning(const char *msg, const char *title) } declare 59 { void TkpGetAppName(Tcl_Interp *interp, Tcl_DString *name) } declare 60 { TkWindow *TkpGetOtherWindow(TkWindow *winPtr) } declare 61 { TkWindow *TkpGetWrapperWindow(TkWindow *winPtr) } declare 62 { int TkpInit(Tcl_Interp *interp) } declare 63 { void TkpInitializeMenuBindings(Tcl_Interp *interp, Tk_BindingTable bindingTable) } declare 64 { void TkpMakeContainer(Tk_Window tkwin) } declare 65 { void TkpMakeMenuWindow(Tk_Window tkwin, int transient) } declare 66 { Window TkpMakeWindow(TkWindow *winPtr, Window parent) } declare 67 { void TkpMenuNotifyToplevelCreate(Tcl_Interp *interp, char *menuName) } declare 68 { TkDisplay *TkpOpenDisplay(const char *display_name) } declare 69 { int TkPointerEvent(XEvent *eventPtr, TkWindow *winPtr) } declare 70 { int TkPolygonToArea(double *polyPtr, int numPoints, double *rectPtr) } declare 71 { double TkPolygonToPoint(double *polyPtr, int numPoints, double *pointPtr) } declare 72 { int TkPositionInTree(TkWindow *winPtr, TkWindow *treePtr) } declare 73 { void TkpRedirectKeyEvent(TkWindow *winPtr, XEvent *eventPtr) } declare 74 { void TkpSetMainMenubar(Tcl_Interp *interp, Tk_Window tkwin, char *menuName) } declare 75 { int TkpUseWindow(Tcl_Interp *interp, Tk_Window tkwin, const char *string) } declare 76 { int TkpWindowWasRecentlyDeleted(Window win, TkDisplay *dispPtr) } declare 77 { void TkQueueEventForAllChildren(TkWindow *winPtr, XEvent *eventPtr) } declare 78 { int TkReadBitmapFile(Display *display, Drawable d, const char *filename, unsigned int *width_return, unsigned int *height_return, Pixmap *bitmap_return, int *x_hot_return, int *y_hot_return) } declare 79 { int TkScrollWindow(Tk_Window tkwin, GC gc, int x, int y, int width, int height, int dx, int dy, TkRegion damageRgn) } declare 80 { void TkSelDeadWindow(TkWindow *winPtr) } declare 81 { void TkSelEventProc(Tk_Window tkwin, XEvent *eventPtr) } declare 82 { void TkSelInit(Tk_Window tkwin) } declare 83 { void TkSelPropProc(XEvent *eventPtr) } # Exported publically as Tk_SetClassProcs in 8.4a2 #declare 84 { # void TkSetClassProcs(Tk_Window tkwin, # TkClassProcs *procs, ClientData instanceData) #} declare 85 { void TkSetWindowMenuBar(Tcl_Interp *interp, Tk_Window tkwin, char *oldMenuName, char *menuName) } declare 86 { KeySym TkStringToKeysym(char *name) } declare 87 { int TkThickPolyLineToArea(double *coordPtr, int numPoints, double width, int capStyle, int joinStyle, double *rectPtr) } declare 88 { void TkWmAddToColormapWindows(TkWindow *winPtr) } declare 89 { void TkWmDeadWindow(TkWindow *winPtr) } declare 90 { TkWindow *TkWmFocusToplevel(TkWindow *winPtr) } declare 91 { void TkWmMapWindow(TkWindow *winPtr) } declare 92 { void TkWmNewWindow(TkWindow *winPtr) } declare 93 { void TkWmProtocolEventProc(TkWindow *winPtr, XEvent *evenvPtr) } declare 94 { void TkWmRemoveFromColormapWindows(TkWindow *winPtr) } declare 95 { void TkWmRestackToplevel(TkWindow *winPtr, int aboveBelow, TkWindow *otherPtr) } declare 96 { void TkWmSetClass(TkWindow *winPtr) } declare 97 { void TkWmUnmapWindow(TkWindow *winPtr) } # new for 8.1 declare 98 { Tcl_Obj *TkDebugBitmap(Tk_Window tkwin, char *name) } declare 99 { Tcl_Obj *TkDebugBorder(Tk_Window tkwin, char *name) } declare 100 { Tcl_Obj *TkDebugCursor(Tk_Window tkwin, char *name) } declare 101 { Tcl_Obj *TkDebugColor(Tk_Window tkwin, char *name) } declare 102 { Tcl_Obj *TkDebugConfig(Tcl_Interp *interp, Tk_OptionTable table) } declare 103 { Tcl_Obj *TkDebugFont(Tk_Window tkwin, char *name) } declare 104 { int TkFindStateNumObj(Tcl_Interp *interp, Tcl_Obj *optionPtr, const TkStateMap *mapPtr, Tcl_Obj *keyPtr) } declare 105 { Tcl_HashTable *TkGetBitmapPredefTable(void) } declare 106 { TkDisplay *TkGetDisplayList(void) } declare 107 { TkMainInfo *TkGetMainInfoList(void) } declare 108 { int TkGetWindowFromObj(Tcl_Interp *interp, Tk_Window tkwin, Tcl_Obj *objPtr, Tk_Window *windowPtr) } declare 109 { char *TkpGetString(TkWindow *winPtr, XEvent *eventPtr, Tcl_DString *dsPtr) } declare 110 { void TkpGetSubFonts(Tcl_Interp *interp, Tk_Font tkfont) } declare 111 { Tcl_Obj *TkpGetSystemDefault(Tk_Window tkwin, const char *dbName, const char *className) } declare 112 { void TkpMenuThreadInit(void) } declare 113 { void TkClipBox(TkRegion rgn, XRectangle *rect_return) } declare 114 { TkRegion TkCreateRegion(void) } declare 115 { void TkDestroyRegion(TkRegion rgn) } declare 116 { void TkIntersectRegion(TkRegion sra, TkRegion srcb, TkRegion dr_return) } declare 117 { int TkRectInRegion(TkRegion rgn, int x, int y, unsigned int width, unsigned int height) } declare 118 { void TkSetRegion(Display *display, GC gc, TkRegion rgn) } declare 119 { void TkUnionRectWithRegion(XRectangle *rect, TkRegion src, TkRegion dr_return) } declare 121 aqua { Pixmap TkpCreateNativeBitmap(Display *display, const char *source) } declare 122 aqua { void TkpDefineNativeBitmaps(void) } declare 124 aqua { Pixmap TkpGetNativeAppBitmap(Display *display, const char *name, int *width, int *height) } declare 135 { void TkpDrawHighlightBorder(Tk_Window tkwin, GC fgGC, GC bgGC, int highlightWidth, Drawable drawable) } declare 136 { void TkSetFocusWin(TkWindow *winPtr, int force) } declare 137 { void TkpSetKeycodeAndState(Tk_Window tkwin, KeySym keySym, XEvent *eventPtr) } declare 138 { KeySym TkpGetKeySym(TkDisplay *dispPtr, XEvent *eventPtr) } declare 139 { void TkpInitKeymapInfo(TkDisplay *dispPtr) } declare 140 { TkRegion TkPhotoGetValidRegion(Tk_PhotoHandle handle) } declare 141 { TkWindow **TkWmStackorderToplevel(TkWindow *parentPtr) } declare 142 { void TkFocusFree(TkMainInfo *mainPtr) } declare 143 { void TkClipCleanup(TkDisplay *dispPtr) } declare 144 { void TkGCCleanup(TkDisplay *dispPtr) } declare 145 { void TkSubtractRegion(TkRegion sra, TkRegion srcb, TkRegion dr_return) } declare 146 { void TkStylePkgInit(TkMainInfo *mainPtr) } declare 147 { void TkStylePkgFree(TkMainInfo *mainPtr) } declare 148 { Tk_Window TkToplevelWindowForCommand(Tcl_Interp *interp, const char *cmdName) } declare 149 { const Tk_OptionSpec *TkGetOptionSpec(const char *name, Tk_OptionTable optionTable) } # TIP#168 declare 150 { int TkMakeRawCurve(Tk_Canvas canvas, double *pointPtr, int numPoints, int numSteps, XPoint xPoints[], double dblPoints[]) } declare 151 { void TkMakeRawCurvePostscript(Tcl_Interp *interp, Tk_Canvas canvas, double *pointPtr, int numPoints) } declare 152 { void TkpDrawFrame(Tk_Window tkwin, Tk_3DBorder border, int highlightWidth, int borderWidth, int relief) } declare 153 { void TkCreateThreadExitHandler(Tcl_ExitProc *proc, ClientData clientData) } declare 154 { void TkDeleteThreadExitHandler(Tcl_ExitProc *proc, ClientData clientData) } # entries needed only by tktest: declare 156 { int TkpTestembedCmd(ClientData clientData, Tcl_Interp *interp, int argc, const char **argv) } declare 157 { int TkpTesttextCmd(ClientData dummy, Tcl_Interp *interp, int argc, const char **argv) } # Next group of functions exposed due to [Bug 2768945]. Numbers are chosen so # as to match 8.6 branch/HEAD. declare 169 { int TkStateParseProc(ClientData clientData, Tcl_Interp *interp, Tk_Window tkwin, const char *value, char *widgRec, int offset) } declare 170 { char *TkStatePrintProc(ClientData clientData, Tk_Window tkwin, char *widgRec, int offset, Tcl_FreeProc **freeProcPtr) } declare 171 { int TkCanvasDashParseProc(ClientData clientData, Tcl_Interp *interp, Tk_Window tkwin, const char *value, char *widgRec, int offset) } declare 172 { char *TkCanvasDashPrintProc(ClientData clientData, Tk_Window tkwin, char *widgRec, int offset, Tcl_FreeProc **freeProcPtr) } declare 173 { int TkOffsetParseProc(ClientData clientData, Tcl_Interp *interp, Tk_Window tkwin, const char *value, char *widgRec, int offset) } declare 174 { char *TkOffsetPrintProc(ClientData clientData, Tk_Window tkwin, char *widgRec, int offset, Tcl_FreeProc **freeProcPtr) } declare 175 { int TkPixelParseProc(ClientData clientData, Tcl_Interp *interp, Tk_Window tkwin, const char *value, char *widgRec, int offset) } declare 176 { char *TkPixelPrintProc(ClientData clientData, Tk_Window tkwin, char *widgRec, int offset, Tcl_FreeProc **freeProcPtr) } declare 177 { int TkOrientParseProc(ClientData clientData, Tcl_Interp *interp, Tk_Window tkwin, const char *value, char *widgRec, int offset) } declare 178 { char *TkOrientPrintProc(ClientData clientData, Tk_Window tkwin, char *widgRec, int offset, Tcl_FreeProc **freeProcPtr) } declare 179 { int TkSmoothParseProc(ClientData clientData, Tcl_Interp *interp, Tk_Window tkwin, const char *value, char *widgRec, int offset) } declare 180 { char *TkSmoothPrintProc(ClientData clientData, Tk_Window tkwin, char *widgRec, int offset, Tcl_FreeProc **freeProcPtr) } ############################################################################## # Define the platform specific internal Tcl interface. These functions are # only available on the designated platform. interface tkIntPlat ################################ # Unix specific functions declare 0 x11 { void TkCreateXEventSource(void) } declare 1 x11 { void TkFreeWindowId(TkDisplay *dispPtr, Window w) } declare 2 x11 { void TkInitXId(TkDisplay *dispPtr) } declare 3 x11 { int TkpCmapStressed(Tk_Window tkwin, Colormap colormap) } declare 4 x11 { void TkpSync(Display *display) } declare 5 x11 { Window TkUnixContainerId(TkWindow *winPtr) } declare 6 x11 { int TkUnixDoOneXEvent(Tcl_Time *timePtr) } declare 7 x11 { void TkUnixSetMenubar(Tk_Window tkwin, Tk_Window menubar) } declare 8 x11 { int TkpScanWindowId(Tcl_Interp *interp, const char *string, Window *idPtr) } declare 9 x11 { void TkWmCleanup(TkDisplay *dispPtr) } declare 10 x11 { void TkSendCleanup(TkDisplay *dispPtr) } declare 11 x11 { void TkFreeXId(TkDisplay *dispPtr) } declare 12 x11 { int TkpWmSetState(TkWindow *winPtr, int state) } # only needed by tktest: declare 13 x11 { int TkpTestsendCmd(ClientData clientData, Tcl_Interp *interp, int argc, const char **argv) } ################################ # Windows specific functions declare 0 win { char *TkAlignImageData(XImage *image, int alignment, int bitOrder) } declare 2 win { void TkGenerateActivateEvents(TkWindow *winPtr, int active) } declare 3 win { unsigned long TkpGetMS(void) } declare 4 win { void TkPointerDeadWindow(TkWindow *winPtr) } declare 5 win { void TkpPrintWindowId(char *buf, Window window) } declare 6 win { int TkpScanWindowId(Tcl_Interp *interp, const char *string, Window *idPtr) } declare 7 win { void TkpSetCapture(TkWindow *winPtr) } declare 8 win { void TkpSetCursor(TkpCursor cursor) } declare 9 win { int TkpWmSetState(TkWindow *winPtr, int state) } declare 10 win { void TkSetPixmapColormap(Pixmap pixmap, Colormap colormap) } declare 11 win { void TkWinCancelMouseTimer(void) } declare 12 win { void TkWinClipboardRender(TkDisplay *dispPtr, UINT format) } declare 13 win { LRESULT TkWinEmbeddedEventProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) } declare 14 win { void TkWinFillRect(HDC dc, int x, int y, int width, int height, int pixel) } declare 15 win { COLORREF TkWinGetBorderPixels(Tk_Window tkwin, Tk_3DBorder border, int which) } declare 16 win { HDC TkWinGetDrawableDC(Display *display, Drawable d, TkWinDCState *state) } declare 17 win { int TkWinGetModifierState(void) } declare 18 win { HPALETTE TkWinGetSystemPalette(void) } declare 19 win { HWND TkWinGetWrapperWindow(Tk_Window tkwin) } declare 20 win { int TkWinHandleMenuEvent(HWND *phwnd, UINT *pMessage, WPARAM *pwParam, LPARAM *plParam, LRESULT *plResult) } declare 21 win { int TkWinIndexOfColor(XColor *colorPtr) } declare 22 win { void TkWinReleaseDrawableDC(Drawable d, HDC hdc, TkWinDCState *state) } declare 23 win { LRESULT TkWinResendEvent(WNDPROC wndproc, HWND hwnd, XEvent *eventPtr) } declare 24 win { HPALETTE TkWinSelectPalette(HDC dc, Colormap colormap) } declare 25 win { void TkWinSetMenu(Tk_Window tkwin, HMENU hMenu) } declare 26 win { void TkWinSetWindowPos(HWND hwnd, HWND siblingHwnd, int pos) } declare 27 win { void TkWinWmCleanup(HINSTANCE hInstance) } declare 28 win { void TkWinXCleanup(ClientData clientData) } declare 29 win { void TkWinXInit(HINSTANCE hInstance) } # new for 8.1 declare 30 win { void TkWinSetForegroundWindow(TkWindow *winPtr) } declare 31 win { void TkWinDialogDebug(int debug) } declare 32 win { Tcl_Obj *TkWinGetMenuSystemDefault(Tk_Window tkwin, const char *dbName, const char *className) } declare 33 win { int TkWinGetPlatformId(void) } # new for 8.4.1 declare 34 win { void TkWinSetHINSTANCE(HINSTANCE hInstance) } declare 35 win { int TkWinGetPlatformTheme(void) } # Exported through stub table since Tk 8.5.9 declare 36 win { LRESULT CALLBACK TkWinChildProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) } ################################ # Aqua specific functions declare 0 aqua { void TkGenerateActivateEvents(TkWindow *winPtr, int active) } # removed duplicates from tkInt table #declare 1 aqua { # Pixmap TkpCreateNativeBitmap(Display *display, const char *source) #} # #declare 2 aqua { # void TkpDefineNativeBitmaps(void) #} declare 3 aqua { void TkPointerDeadWindow(TkWindow *winPtr) } declare 4 aqua { void TkpSetCapture(TkWindow *winPtr) } declare 5 aqua { void TkpSetCursor(TkpCursor cursor) } declare 6 aqua { void TkpWmSetState(TkWindow *winPtr, int state) } declare 7 aqua { void TkAboutDlg(void) } declare 8 aqua { unsigned int TkMacOSXButtonKeyState(void) } declare 9 aqua { void TkMacOSXClearMenubarActive(void) } declare 10 aqua { int TkMacOSXDispatchMenuEvent(int menuID, int index) } declare 11 aqua { void TkMacOSXInstallCursor(int resizeOverride) } declare 12 aqua { void TkMacOSXHandleTearoffMenu(void) } # removed duplicate from tkPlat table(tk.decls) #declare 13 aqua { # void TkMacOSXInvalClipRgns(TkWindow *winPtr) #} declare 14 aqua { int TkMacOSXDoHLEvent(EventRecord *theEvent) } # removed duplicate from tkPlat table(tk.decls) #declare 15 aqua { # GWorldPtr TkMacOSXGetDrawablePort(Drawable drawable) #} declare 16 aqua { Window TkMacOSXGetXWindow(WindowRef macWinPtr) } declare 17 aqua { int TkMacOSXGrowToplevel(WindowRef whichWindow, Point start) } declare 18 aqua { void TkMacOSXHandleMenuSelect(MenuID theMenu, MenuItemIndex theItem, int optionKeyPressed) } # removed duplicates from tkPlat table(tk.decls) #declare 19 aqua { # void TkMacOSXInitAppleEvents(Tcl_Interp *interp) #} # #declare 20 aqua { # void TkMacOSXInitMenus(Tcl_Interp *interp) #} declare 21 aqua { void TkMacOSXInvalidateWindow(MacDrawable *macWin, int flag) } declare 22 aqua { int TkMacOSXIsCharacterMissing(Tk_Font tkfont, unsigned int searchChar) } declare 23 aqua { void TkMacOSXMakeRealWindowExist(TkWindow *winPtr) } declare 24 aqua { BitMapPtr TkMacOSXMakeStippleMap(Drawable d1, Drawable d2) } declare 25 aqua { void TkMacOSXMenuClick(void) } declare 26 aqua { void TkMacOSXRegisterOffScreenWindow(Window window, GWorldPtr portPtr) } declare 27 aqua { int TkMacOSXResizable(TkWindow *winPtr) } declare 28 aqua { void TkMacOSXSetHelpMenuItemCount(void) } declare 29 aqua { void TkMacOSXSetScrollbarGrow(TkWindow *winPtr, int flag) } declare 30 aqua { void TkMacOSXSetUpClippingRgn(Drawable drawable) } declare 31 aqua { void TkMacOSXSetUpGraphicsPort(GC gc, GWorldPtr destPort) } declare 32 aqua { void TkMacOSXUpdateClipRgn(TkWindow *winPtr) } declare 33 aqua { void TkMacOSXUnregisterMacWindow(WindowRef portPtr) } declare 34 aqua { int TkMacOSXUseMenuID(short macID) } declare 35 aqua { RgnHandle TkMacOSXVisableClipRgn(TkWindow *winPtr) } declare 36 aqua { void TkMacOSXWinBounds(TkWindow *winPtr, Rect *geometry) } declare 37 aqua { void TkMacOSXWindowOffset(WindowRef wRef, int *xOffset, int *yOffset) } declare 38 aqua { int TkSetMacColor(unsigned long pixel, RGBColor *macColor) } declare 39 aqua { void TkSetWMName(TkWindow *winPtr, Tk_Uid titleUid) } declare 40 aqua { void TkSuspendClipboard(void) } declare 41 aqua { int TkMacOSXZoomToplevel(WindowPtr whichWindow, short zoomPart) } declare 42 aqua { Tk_Window Tk_TopCoordsToWindow(Tk_Window tkwin, int rootX, int rootY, int *newX, int *newY) } declare 43 aqua { MacDrawable *TkMacOSXContainerId(TkWindow *winPtr) } declare 44 aqua { MacDrawable *TkMacOSXGetHostToplevel(TkWindow *winPtr) } declare 45 aqua { void TkMacOSXPreprocessMenu(void) } declare 46 aqua { int TkpIsWindowFloating(WindowRef window) } declare 47 aqua { Tk_Window TkMacOSXGetCapture(void) } declare 49 aqua { Window TkGetTransientMaster(TkWindow *winPtr) } declare 50 aqua { int TkGenerateButtonEvent(int x, int y, Window window, unsigned int state) } declare 51 aqua { void TkGenWMDestroyEvent(Tk_Window tkwin) } # removed duplicate from tkPlat table (tk.decls) #declare 52 aqua { # void TkGenWMConfigureEvent(Tk_Window tkwin, int x, int y, # int width, int height, int flags) #} declare 53 aqua { unsigned long TkpGetMS(void) } ############################################################################## # Define the platform specific internal Xlib interfaces. These functions are # only available on the designated platform. interface tkIntXlib ################################ # X functions for Windows declare 0 win { void XSetDashes(Display *display, GC gc, int dash_offset, _Xconst char *dash_list, int n) } declare 1 win { XModifierKeymap *XGetModifierMapping(Display *d) } declare 2 win { 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 win { XImage *XGetImage(Display *d, Drawable dr, int i1, int i2, unsigned int ui1, unsigned int ui2, unsigned long ul, int i3) } declare 4 win { char *XGetAtomName(Display *d, Atom a) } declare 5 win { char *XKeysymToString(KeySym k) } declare 6 win { Colormap XCreateColormap(Display *d, Window w, Visual *v, int i) } declare 7 win { Cursor XCreatePixmapCursor(Display *d, Pixmap p1, Pixmap p2, XColor *x1, XColor *x2, unsigned int ui1, unsigned int ui2) } declare 8 win { Cursor XCreateGlyphCursor(Display *d, Font f1, Font f2, unsigned int ui1, unsigned int ui2, XColor *x1, XColor *x2) } declare 9 win { GContext XGContextFromGC(GC g) } declare 10 win { XHostAddress *XListHosts(Display *d, int *i, Bool *b) } # second parameter was of type KeyCode declare 11 win { KeySym XKeycodeToKeysym(Display *d, unsigned int k, int i) } declare 12 win { KeySym XStringToKeysym(_Xconst char *c) } declare 13 win { Window XRootWindow(Display *d, int i) } declare 14 win { XErrorHandler XSetErrorHandler(XErrorHandler x) } declare 15 win { Status XIconifyWindow(Display *d, Window w, int i) } declare 16 win { Status XWithdrawWindow(Display *d, Window w, int i) } declare 17 win { Status XGetWMColormapWindows(Display *d, Window w, Window **wpp, int *ip) } declare 18 win { Status XAllocColor(Display *d, Colormap c, XColor *xp) } declare 19 win { void XBell(Display *d, int i) } declare 20 win { void XChangeProperty(Display *d, Window w, Atom a1, Atom a2, int i1, int i2, _Xconst unsigned char *c, int i3) } declare 21 win { void XChangeWindowAttributes(Display *d, Window w, unsigned long ul, XSetWindowAttributes *x) } declare 22 win { void XClearWindow(Display *d, Window w) } declare 23 win { void XConfigureWindow(Display *d, Window w, unsigned int i, XWindowChanges *x) } declare 24 win { 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 25 win { 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 26 win { Pixmap XCreateBitmapFromData(Display *display, Drawable d, _Xconst char *data, unsigned int width, unsigned int height) } declare 27 win { void XDefineCursor(Display *d, Window w, Cursor c) } declare 28 win { void XDeleteProperty(Display *d, Window w, Atom a) } declare 29 win { void XDestroyWindow(Display *d, Window w) } declare 30 win { void XDrawArc(Display *d, Drawable dr, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2, int i3, int i4) } declare 31 win { void XDrawLines(Display *d, Drawable dr, GC g, XPoint *x, int i1, int i2) } declare 32 win { void XDrawRectangle(Display *d, Drawable dr, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2) } declare 33 win { void XFillArc(Display *d, Drawable dr, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2, int i3, int i4) } declare 34 win { void XFillPolygon(Display *d, Drawable dr, GC g, XPoint *x, int i1, int i2, int i3) } declare 35 win { void XFillRectangles(Display *d, Drawable dr, GC g, XRectangle *x, int i) } declare 36 win { void XForceScreenSaver(Display *d, int i) } declare 37 win { void XFreeColormap(Display *d, Colormap c) } declare 38 win { void XFreeColors(Display *d, Colormap c, unsigned long *ulp, int i, unsigned long ul) } declare 39 win { void XFreeCursor(Display *d, Cursor c) } declare 40 win { void XFreeModifiermap(XModifierKeymap *x) } declare 41 win { 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 42 win { void XGetInputFocus(Display *d, Window *w, int *i) } declare 43 win { 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 44 win { Status XGetWindowAttributes(Display *d, Window w, XWindowAttributes *x) } declare 45 win { int XGrabKeyboard(Display *d, Window w, Bool b, int i1, int i2, Time t) } declare 46 win { int XGrabPointer(Display *d, Window w1, Bool b, unsigned int ui, int i1, int i2, Window w2, Cursor c, Time t) } declare 47 win { KeyCode XKeysymToKeycode(Display *d, KeySym k) } declare 48 win { Status XLookupColor(Display *d, Colormap c1, _Xconst char *c2, XColor *x1, XColor *x2) } declare 49 win { void XMapWindow(Display *d, Window w) } declare 50 win { void XMoveResizeWindow(Display *d, Window w, int i1, int i2, unsigned int ui1, unsigned int ui2) } declare 51 win { void XMoveWindow(Display *d, Window w, int i1, int i2) } declare 52 win { void XNextEvent(Display *d, XEvent *x) } declare 53 win { void XPutBackEvent(Display *d, XEvent *x) } declare 54 win { void XQueryColors(Display *d, Colormap c, XColor *x, int i) } declare 55 win { Bool XQueryPointer(Display *d, Window w1, Window *w2, Window *w3, int *i1, int *i2, int *i3, int *i4, unsigned int *ui) } declare 56 win { Status XQueryTree(Display *d, Window w1, Window *w2, Window *w3, Window **w4, unsigned int *ui) } declare 57 win { void XRaiseWindow(Display *d, Window w) } declare 58 win { void XRefreshKeyboardMapping(XMappingEvent *x) } declare 59 win { void XResizeWindow(Display *d, Window w, unsigned int ui1, unsigned int ui2) } declare 60 win { void XSelectInput(Display *d, Window w, long l) } declare 61 win { Status XSendEvent(Display *d, Window w, Bool b, long l, XEvent *x) } declare 62 win { void XSetCommand(Display *d, Window w, const char **c, int i) } declare 63 win { void XSetIconName(Display *d, Window w, _Xconst char *c) } declare 64 win { void XSetInputFocus(Display *d, Window w, int i, Time t) } declare 65 win { void XSetSelectionOwner(Display *d, Atom a, Window w, Time t) } declare 66 win { void XSetWindowBackground(Display *d, Window w, unsigned long ul) } declare 67 win { void XSetWindowBackgroundPixmap(Display *d, Window w, Pixmap p) } declare 68 win { void XSetWindowBorder(Display *d, Window w, unsigned long ul) } declare 69 win { void XSetWindowBorderPixmap(Display *d, Window w, Pixmap p) } declare 70 win { void XSetWindowBorderWidth(Display *d, Window w, unsigned int ui) } declare 71 win { void XSetWindowColormap(Display *d, Window w, Colormap c) } declare 72 win { Bool XTranslateCoordinates(Display *d, Window w1, Window w2, int i1, int i2, int *i3, int *i4, Window *w3) } declare 73 win { void XUngrabKeyboard(Display *d, Time t) } declare 74 win { void XUngrabPointer(Display *d, Time t) } declare 75 win { void XUnmapWindow(Display *d, Window w) } declare 76 win { void XWindowEvent(Display *d, Window w, long l, XEvent *x) } declare 77 win { void XDestroyIC(XIC x) } declare 78 win { Bool XFilterEvent(XEvent *x, Window w) } declare 79 win { int XmbLookupString(XIC xi, XKeyPressedEvent *xk, char *c, int i, KeySym *k, Status *s) } declare 80 win { 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) } # This slot is reserved for use by the clipping rectangle patch: # declare 81 win { # XSetClipRectangles(Display *display, GC gc, int clip_x_origin, # int clip_y_origin, XRectangle rectangles[], int n, int ordering) # } declare 82 win { Status XParseColor(Display *display, Colormap map, _Xconst char *spec, XColor *colorPtr) } declare 83 win { GC XCreateGC(Display *display, Drawable d, unsigned long valuemask, XGCValues *values) } declare 84 win { void XFreeGC(Display *display, GC gc) } declare 85 win { Atom XInternAtom(Display *display, _Xconst char *atom_name, Bool only_if_exists) } declare 86 win { void XSetBackground(Display *display, GC gc, unsigned long foreground) } declare 87 win { void XSetForeground(Display *display, GC gc, unsigned long foreground) } declare 88 win { void XSetClipMask(Display *display, GC gc, Pixmap pixmap) } declare 89 win { void XSetClipOrigin(Display *display, GC gc, int clip_x_origin, int clip_y_origin) } declare 90 win { void XSetTSOrigin(Display *display, GC gc, int ts_x_origin, int ts_y_origin) } declare 91 win { void XChangeGC(Display *d, GC gc, unsigned long mask, XGCValues *values) } declare 92 win { void XSetFont(Display *display, GC gc, Font font) } declare 93 win { void XSetArcMode(Display *display, GC gc, int arc_mode) } declare 94 win { void XSetStipple(Display *display, GC gc, Pixmap stipple) } declare 95 win { void XSetFillRule(Display *display, GC gc, int fill_rule) } declare 96 win { void XSetFillStyle(Display *display, GC gc, int fill_style) } declare 97 win { void XSetFunction(Display *display, GC gc, int function) } declare 98 win { void XSetLineAttributes(Display *display, GC gc, unsigned int line_width, int line_style, int cap_style, int join_style) } declare 99 win { int _XInitImageFuncPtrs(XImage *image) } declare 100 win { XIC XCreateIC(void) } declare 101 win { XVisualInfo *XGetVisualInfo(Display *display, long vinfo_mask, XVisualInfo *vinfo_template, int *nitems_return) } declare 102 win { void XSetWMClientMachine(Display *display, Window w, XTextProperty *text_prop) } declare 103 win { Status XStringListToTextProperty(char **list, int count, XTextProperty *text_prop_return) } declare 104 win { void XDrawLine(Display *d, Drawable dr, GC g, int x1, int y1, int x2, int y2) } declare 106 win { void XFillRectangle(Display *display, Drawable d, GC gc, int x, int y, unsigned int width, unsigned int height) } declare 105 win { void XWarpPointer(Display *d, Window s, Window dw, int sx, int sy, unsigned int sw, unsigned int sh, int dx, int dy) } ################################ # X functions for Aqua declare 0 aqua { void XSetDashes(Display *display, GC gc, int dash_offset, _Xconst char *dash_list, int n) } declare 1 aqua { XModifierKeymap *XGetModifierMapping(Display *d) } declare 2 aqua { 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 aqua { XImage *XGetImage(Display *d, Drawable dr, int i1, int i2, unsigned int ui1, unsigned int ui2, unsigned long ul, int i3) } declare 4 aqua { char *XGetAtomName(Display *d, Atom a) } declare 5 aqua { char *XKeysymToString(KeySym k) } declare 6 aqua { Colormap XCreateColormap(Display *d, Window w, Visual *v, int i) } declare 7 aqua { GContext XGContextFromGC(GC g) } declare 8 aqua { KeySym XKeycodeToKeysym(Display *d, KeyCode k, int i) } declare 9 aqua { KeySym XStringToKeysym(_Xconst char *c) } declare 10 aqua { Window XRootWindow(Display *d, int i) } declare 11 aqua { XErrorHandler XSetErrorHandler(XErrorHandler x) } declare 12 aqua { Status XAllocColor(Display *d, Colormap c, XColor *xp) } declare 13 aqua { void XBell(Display *d, int i) } declare 14 aqua { void XChangeProperty(Display *d, Window w, Atom a1, Atom a2, int i1, int i2, _Xconst unsigned char *c, int i3) } declare 15 aqua { void XChangeWindowAttributes(Display *d, Window w, unsigned long ul, XSetWindowAttributes *x) } declare 16 aqua { void XConfigureWindow(Display *d, Window w, unsigned int i, XWindowChanges *x) } declare 17 aqua { 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 aqua { 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 aqua { Pixmap XCreateBitmapFromData(Display *display, Drawable d, _Xconst char *data, unsigned int width, unsigned int height) } declare 20 aqua { void XDefineCursor(Display *d, Window w, Cursor c) } declare 21 aqua { void XDestroyWindow(Display *d, Window w) } declare 22 aqua { void XDrawArc(Display *d, Drawable dr, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2, int i3, int i4) } declare 23 aqua { void XDrawLines(Display *d, Drawable dr, GC g, XPoint *x, int i1, int i2) } declare 24 aqua { void XDrawRectangle(Display *d, Drawable dr, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2) } declare 25 aqua { void XFillArc(Display *d, Drawable dr, GC g, int i1, int i2, unsigned int ui1, unsigned int ui2, int i3, int i4) } declare 26 aqua { void XFillPolygon(Display *d, Drawable dr, GC g, XPoint *x, int i1, int i2, int i3) } declare 27 aqua { void XFillRectangles(Display *d, Drawable dr, GC g, XRectangle *x, int i) } declare 28 aqua { void XFreeColormap(Display *d, Colormap c) } declare 29 aqua { void XFreeColors(Display *d, Colormap c, unsigned long *ulp, int i, unsigned long ul) } declare 30 aqua { void XFreeModifiermap(XModifierKeymap *x) } declare 31 aqua { 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 aqua { 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 aqua { int XGrabKeyboard(Display *d, Window w, Bool b, int i1, int i2, Time t) } declare 34 aqua { int XGrabPointer(Display *d, Window w1, Bool b, unsigned int ui, int i1, int i2, Window w2, Cursor c, Time t) } declare 35 aqua { KeyCode XKeysymToKeycode(Display *d, KeySym k) } declare 36 aqua { void XMapWindow(Display *d, Window w) } declare 37 aqua { void XMoveResizeWindow(Display *d, Window w, int i1, int i2, unsigned int ui1, unsigned int ui2) } declare 38 aqua { void XMoveWindow(Display *d, Window w, int i1, int i2) } declare 39 aqua { Bool XQueryPointer(Display *d, Window w1, Window *w2, Window *w3, int *i1, int *i2, int *i3, int *i4, unsigned int *ui) } declare 40 aqua { void XRaiseWindow(Display *d, Window w) } declare 41 aqua { void XRefreshKeyboardMapping(XMappingEvent *x) } declare 42 aqua { void XResizeWindow(Display *d, Window w, unsigned int ui1, unsigned int ui2) } declare 43 aqua { void XSelectInput(Display *d, Window w, long l) } declare 44 aqua { Status XSendEvent(Display *d, Window w, Bool b, long l, XEvent *x) } declare 45 aqua { void XSetIconName(Display *d, Window w, _Xconst char *c) } declare 46 aqua { void XSetInputFocus(Display *d, Window w, int i, Time t) } declare 47 aqua { void XSetSelectionOwner(Display *d, Atom a, Window w, Time t) } declare 48 aqua { void XSetWindowBackground(Display *d, Window w, unsigned long ul) } declare 49 aqua { void XSetWindowBackgroundPixmap(Display *d, Window w, Pixmap p) } declare 50 aqua { void XSetWindowBorder(Display *d, Window w, unsigned long ul) } declare 51 aqua { void XSetWindowBorderPixmap(Display *d, Window w, Pixmap p) } declare 52 aqua { void XSetWindowBorderWidth(Display *d, Window w, unsigned int ui) } declare 53 aqua { void XSetWindowColormap(Display *d, Window w, Colormap c) } declare 54 aqua { void XUngrabKeyboard(Display *d, Time t) } declare 55 aqua { void XUngrabPointer(Display *d, Time t) } declare 56 aqua { void XUnmapWindow(Display *d, Window w) } declare 57 aqua { 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 aqua { Status XParseColor(Display *display, Colormap map, _Xconst char *spec, XColor *colorPtr) } declare 59 aqua { GC XCreateGC(Display *display, Drawable d, unsigned long valuemask, XGCValues *values) } declare 60 aqua { void XFreeGC(Display *display, GC gc) } declare 61 aqua { Atom XInternAtom(Display *display, _Xconst char *atom_name, Bool only_if_exists) } declare 62 aqua { void XSetBackground(Display *display, GC gc, unsigned long foreground) } declare 63 aqua { void XSetForeground(Display *display, GC gc, unsigned long foreground) } declare 64 aqua { void XSetClipMask(Display *display, GC gc, Pixmap pixmap) } declare 65 aqua { void XSetClipOrigin(Display *display, GC gc, int clip_x_origin, int clip_y_origin) } declare 66 aqua { void XSetTSOrigin(Display *display, GC gc, int ts_x_origin, int ts_y_origin) } declare 67 aqua { void XChangeGC(Display *d, GC gc, unsigned long mask, XGCValues *values) } declare 68 aqua { void XSetFont(Display *display, GC gc, Font font) } declare 69 aqua { void XSetArcMode(Display *display, GC gc, int arc_mode) } declare 70 aqua { void XSetStipple(Display *display, GC gc, Pixmap stipple) } declare 71 aqua { void XSetFillRule(Display *display, GC gc, int fill_rule) } declare 72 aqua { void XSetFillStyle(Display *display, GC gc, int fill_style) } declare 73 aqua { void XSetFunction(Display *display, GC gc, int function) } declare 74 aqua { void XSetLineAttributes(Display *display, GC gc, unsigned int line_width, int line_style, int cap_style, int join_style) } declare 75 aqua { int _XInitImageFuncPtrs(XImage *image) } declare 76 aqua { XIC XCreateIC(void) } declare 77 aqua { XVisualInfo *XGetVisualInfo(Display *display, long vinfo_mask, XVisualInfo *vinfo_template, int *nitems_return) } declare 78 aqua { void XSetWMClientMachine(Display *display, Window w, XTextProperty *text_prop) } declare 79 aqua { Status XStringListToTextProperty(char **list, int count, XTextProperty *text_prop_return) } declare 80 aqua { void XDrawSegments(Display *display, Drawable d, GC gc, XSegment *segments, int nsegments) } declare 81 aqua { void XForceScreenSaver(Display *display, int mode) } declare 82 aqua { void XDrawLine(Display *d, Drawable dr, GC g, int x1, int y1, int x2, int y2) } declare 83 aqua { void XFillRectangle(Display *display, Drawable d, GC gc, int x, int y, unsigned int width, unsigned int height) } declare 84 aqua { void XClearWindow(Display *d, Window w) } declare 85 aqua { void XDrawPoint(Display *display, Drawable d, GC gc, int x, int y) } declare 86 aqua { void XDrawPoints(Display *display, Drawable d, GC gc, XPoint *points, int npoints, int mode) } declare 87 aqua { 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 aqua { void XQueryColor(Display *display, Colormap colormap, XColor *def_in_out) } declare 89 aqua { void XQueryColors(Display *display, Colormap colormap, XColor *defs_in_out, int ncolors) } declare 90 aqua { Status XQueryTree(Display *d, Window w1, Window *w2, Window *w3, Window **w4, unsigned int *ui) } declare 91 aqua { int XSync(Display *display, Bool flag) } # Local Variables: # mode: tcl # End: