diff options
Diffstat (limited to 'generic/tkIntPlatStubs.c')
-rw-r--r-- | generic/tkIntPlatStubs.c | 1050 |
1 files changed, 0 insertions, 1050 deletions
diff --git a/generic/tkIntPlatStubs.c b/generic/tkIntPlatStubs.c deleted file mode 100644 index 6650915..0000000 --- a/generic/tkIntPlatStubs.c +++ /dev/null @@ -1,1050 +0,0 @@ -/* - * tkIntPlatStubs.c -- - * - * This file contains the wrapper functions for the platform dependent - * unsupported Tk API. - * - * Copyright (c) 1998-1999 by Scriptics Corporation. - * All rights reserved. - * - * RCS: @(#) $Id: tkIntPlatStubs.c,v 1.2 1999/03/10 07:04:41 stanton Exp $ - */ - -#include "tkInt.h" -#include "tkPort.h" - -#ifdef __WIN32__ -#include "tkWinInt.h" -#endif - -#include "tkIntPlatDecls.h" - -/* - * WARNING: This file is automatically generated by the tools/genStubs.tcl - * script. Any modifications to the function declarations below should be made - * in the generic/tkInt.decls script. - */ - -/* !BEGIN!: Do not edit below this line. */ - -/* - * Exported stub functions: - */ - -#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ -/* Slot 0 */ -void -TkCreateXEventSource() -{ - (tkIntPlatStubsPtr->tkCreateXEventSource)(); -} - -/* Slot 1 */ -void -TkFreeWindowId(dispPtr, w) - TkDisplay * dispPtr; - Window w; -{ - (tkIntPlatStubsPtr->tkFreeWindowId)(dispPtr, w); -} - -/* Slot 2 */ -void -TkInitXId(dispPtr) - TkDisplay * dispPtr; -{ - (tkIntPlatStubsPtr->tkInitXId)(dispPtr); -} - -/* Slot 3 */ -int -TkpCmapStressed(tkwin, colormap) - Tk_Window tkwin; - Colormap colormap; -{ - return (tkIntPlatStubsPtr->tkpCmapStressed)(tkwin, colormap); -} - -/* Slot 4 */ -void -TkpSync(display) - Display * display; -{ - (tkIntPlatStubsPtr->tkpSync)(display); -} - -/* Slot 5 */ -Window -TkUnixContainerId(winPtr) - TkWindow * winPtr; -{ - return (tkIntPlatStubsPtr->tkUnixContainerId)(winPtr); -} - -/* Slot 6 */ -int -TkUnixDoOneXEvent(timePtr) - Tcl_Time * timePtr; -{ - return (tkIntPlatStubsPtr->tkUnixDoOneXEvent)(timePtr); -} - -/* Slot 7 */ -void -TkUnixSetMenubar(tkwin, menubar) - Tk_Window tkwin; - Tk_Window menubar; -{ - (tkIntPlatStubsPtr->tkUnixSetMenubar)(tkwin, menubar); -} - -#endif /* UNIX */ -#ifdef __WIN32__ -/* Slot 0 */ -char * -TkAlignImageData(image, alignment, bitOrder) - XImage * image; - int alignment; - int bitOrder; -{ - return (tkIntPlatStubsPtr->tkAlignImageData)(image, alignment, bitOrder); -} - -/* Slot 1 */ -void -TkClipBox(rgn, rect_return) - TkRegion rgn; - XRectangle* rect_return; -{ - (tkIntPlatStubsPtr->tkClipBox)(rgn, rect_return); -} - -/* Slot 2 */ -TkRegion -TkCreateRegion() -{ - return (tkIntPlatStubsPtr->tkCreateRegion)(); -} - -/* Slot 3 */ -void -TkDestroyRegion(rgn) - TkRegion rgn; -{ - (tkIntPlatStubsPtr->tkDestroyRegion)(rgn); -} - -/* Slot 4 */ -void -TkGenerateActivateEvents(winPtr, active) - TkWindow * winPtr; - int active; -{ - (tkIntPlatStubsPtr->tkGenerateActivateEvents)(winPtr, active); -} - -/* Slot 5 */ -void -TkIntersectRegion(sra, srcb, dr_return) - TkRegion sra; - TkRegion srcb; - TkRegion dr_return; -{ - (tkIntPlatStubsPtr->tkIntersectRegion)(sra, srcb, dr_return); -} - -/* Slot 6 */ -unsigned long -TkpGetMS() -{ - return (tkIntPlatStubsPtr->tkpGetMS)(); -} - -/* Slot 7 */ -void -TkPointerDeadWindow(winPtr) - TkWindow * winPtr; -{ - (tkIntPlatStubsPtr->tkPointerDeadWindow)(winPtr); -} - -/* Slot 8 */ -void -TkpPrintWindowId(buf, window) - char * buf; - Window window; -{ - (tkIntPlatStubsPtr->tkpPrintWindowId)(buf, window); -} - -/* Slot 9 */ -int -TkpScanWindowId(interp, string, idPtr) - Tcl_Interp * interp; - char * string; - int * idPtr; -{ - return (tkIntPlatStubsPtr->tkpScanWindowId)(interp, string, idPtr); -} - -/* Slot 10 */ -void -TkpSetCapture(winPtr) - TkWindow * winPtr; -{ - (tkIntPlatStubsPtr->tkpSetCapture)(winPtr); -} - -/* Slot 11 */ -void -TkpSetCursor(cursor) - TkpCursor cursor; -{ - (tkIntPlatStubsPtr->tkpSetCursor)(cursor); -} - -/* Slot 12 */ -void -TkpWmSetState(winPtr, state) - TkWindow * winPtr; - int state; -{ - (tkIntPlatStubsPtr->tkpWmSetState)(winPtr, state); -} - -/* Slot 13 */ -int -TkRectInRegion(rgn, x, y, width, height) - TkRegion rgn; - int x; - int y; - unsigned int width; - unsigned int height; -{ - return (tkIntPlatStubsPtr->tkRectInRegion)(rgn, x, y, width, height); -} - -/* Slot 14 */ -void -TkSetPixmapColormap(pixmap, colormap) - Pixmap pixmap; - Colormap colormap; -{ - (tkIntPlatStubsPtr->tkSetPixmapColormap)(pixmap, colormap); -} - -/* Slot 15 */ -void -TkSetRegion(display, gc, rgn) - Display* display; - GC gc; - TkRegion rgn; -{ - (tkIntPlatStubsPtr->tkSetRegion)(display, gc, rgn); -} - -/* Slot 16 */ -void -TkUnionRectWithRegion(rect, src, dr_return) - XRectangle* rect; - TkRegion src; - TkRegion dr_return; -{ - (tkIntPlatStubsPtr->tkUnionRectWithRegion)(rect, src, dr_return); -} - -/* Slot 17 */ -void -TkWinCancelMouseTimer() -{ - (tkIntPlatStubsPtr->tkWinCancelMouseTimer)(); -} - -/* Slot 18 */ -void -TkWinClipboardRender(dispPtr, format) - TkDisplay * dispPtr; - UINT format; -{ - (tkIntPlatStubsPtr->tkWinClipboardRender)(dispPtr, format); -} - -/* Slot 19 */ -LRESULT -TkWinEmbeddedEventProc(hwnd, message, wParam, lParam) - HWND hwnd; - UINT message; - WPARAM wParam; - LPARAM lParam; -{ - return (tkIntPlatStubsPtr->tkWinEmbeddedEventProc)(hwnd, message, wParam, lParam); -} - -/* Slot 20 */ -void -TkWinFillRect(dc, x, y, width, height, pixel) - HDC dc; - int x; - int y; - int width; - int height; - int pixel; -{ - (tkIntPlatStubsPtr->tkWinFillRect)(dc, x, y, width, height, pixel); -} - -/* Slot 21 */ -COLORREF -TkWinGetBorderPixels(tkwin, border, which) - Tk_Window tkwin; - Tk_3DBorder border; - int which; -{ - return (tkIntPlatStubsPtr->tkWinGetBorderPixels)(tkwin, border, which); -} - -/* Slot 22 */ -HDC -TkWinGetDrawableDC(display, d, state) - Display * display; - Drawable d; - TkWinDCState* state; -{ - return (tkIntPlatStubsPtr->tkWinGetDrawableDC)(display, d, state); -} - -/* Slot 23 */ -int -TkWinGetModifierState() -{ - return (tkIntPlatStubsPtr->tkWinGetModifierState)(); -} - -/* Slot 24 */ -HPALETTE -TkWinGetSystemPalette() -{ - return (tkIntPlatStubsPtr->tkWinGetSystemPalette)(); -} - -/* Slot 25 */ -HWND -TkWinGetWrapperWindow(tkwin) - Tk_Window tkwin; -{ - return (tkIntPlatStubsPtr->tkWinGetWrapperWindow)(tkwin); -} - -/* Slot 26 */ -int -TkWinHandleMenuEvent(phwnd, pMessage, pwParam, plParam, plResult) - HWND * phwnd; - UINT * pMessage; - WPARAM * pwParam; - LPARAM * plParam; - LRESULT * plResult; -{ - return (tkIntPlatStubsPtr->tkWinHandleMenuEvent)(phwnd, pMessage, pwParam, plParam, plResult); -} - -/* Slot 27 */ -int -TkWinIndexOfColor(colorPtr) - XColor * colorPtr; -{ - return (tkIntPlatStubsPtr->tkWinIndexOfColor)(colorPtr); -} - -/* Slot 28 */ -void -TkWinReleaseDrawableDC(d, hdc, state) - Drawable d; - HDC hdc; - TkWinDCState* state; -{ - (tkIntPlatStubsPtr->tkWinReleaseDrawableDC)(d, hdc, state); -} - -/* Slot 29 */ -LRESULT -TkWinResendEvent(wndproc, hwnd, eventPtr) - WNDPROC wndproc; - HWND hwnd; - XEvent * eventPtr; -{ - return (tkIntPlatStubsPtr->tkWinResendEvent)(wndproc, hwnd, eventPtr); -} - -/* Slot 30 */ -HPALETTE -TkWinSelectPalette(dc, colormap) - HDC dc; - Colormap colormap; -{ - return (tkIntPlatStubsPtr->tkWinSelectPalette)(dc, colormap); -} - -/* Slot 31 */ -void -TkWinSetMenu(tkwin, hMenu) - Tk_Window tkwin; - HMENU hMenu; -{ - (tkIntPlatStubsPtr->tkWinSetMenu)(tkwin, hMenu); -} - -/* Slot 32 */ -void -TkWinSetWindowPos(hwnd, siblingHwnd, pos) - HWND hwnd; - HWND siblingHwnd; - int pos; -{ - (tkIntPlatStubsPtr->tkWinSetWindowPos)(hwnd, siblingHwnd, pos); -} - -/* Slot 33 */ -void -TkWinWmCleanup(hInstance) - HINSTANCE hInstance; -{ - (tkIntPlatStubsPtr->tkWinWmCleanup)(hInstance); -} - -/* Slot 34 */ -void -TkWinXCleanup(hInstance) - HINSTANCE hInstance; -{ - (tkIntPlatStubsPtr->tkWinXCleanup)(hInstance); -} - -/* Slot 35 */ -void -TkWinXInit(hInstance) - HINSTANCE hInstance; -{ - (tkIntPlatStubsPtr->tkWinXInit)(hInstance); -} - -#endif /* __WIN32__ */ -#ifdef MAC_TCL -/* Slot 0 */ -void -TkClipBox(rgn, rect_return) - TkRegion rgn; - XRectangle* rect_return; -{ - (tkIntPlatStubsPtr->tkClipBox)(rgn, rect_return); -} - -/* Slot 1 */ -TkRegion -TkCreateRegion() -{ - return (tkIntPlatStubsPtr->tkCreateRegion)(); -} - -/* Slot 2 */ -void -TkDestroyRegion(rgn) - TkRegion rgn; -{ - (tkIntPlatStubsPtr->tkDestroyRegion)(rgn); -} - -/* Slot 3 */ -void -TkGenerateActivateEvents(winPtr, active) - TkWindow * winPtr; - int active; -{ - (tkIntPlatStubsPtr->tkGenerateActivateEvents)(winPtr, active); -} - -/* Slot 4 */ -void -TkIntersectRegion(sra, srcb, dr_return) - TkRegion sra; - TkRegion srcb; - TkRegion dr_return; -{ - (tkIntPlatStubsPtr->tkIntersectRegion)(sra, srcb, dr_return); -} - -/* Slot 5 */ -Pixmap -TkpCreateNativeBitmap(display, source) - Display * display; - char * source; -{ - return (tkIntPlatStubsPtr->tkpCreateNativeBitmap)(display, source); -} - -/* Slot 6 */ -void -TkpDefineNativeBitmaps() -{ - (tkIntPlatStubsPtr->tkpDefineNativeBitmaps)(); -} - -/* Slot 7 */ -unsigned long -TkpGetMS() -{ - return (tkIntPlatStubsPtr->tkpGetMS)(); -} - -/* Slot 8 */ -Pixmap -TkpGetNativeAppBitmap(display, name, width, height) - Display * display; - char * name; - int * width; - int * height; -{ - return (tkIntPlatStubsPtr->tkpGetNativeAppBitmap)(display, name, width, height); -} - -/* Slot 9 */ -void -TkPointerDeadWindow(winPtr) - TkWindow * winPtr; -{ - (tkIntPlatStubsPtr->tkPointerDeadWindow)(winPtr); -} - -/* Slot 10 */ -void -TkpSetCapture(winPtr) - TkWindow * winPtr; -{ - (tkIntPlatStubsPtr->tkpSetCapture)(winPtr); -} - -/* Slot 11 */ -void -TkpSetCursor(cursor) - TkpCursor cursor; -{ - (tkIntPlatStubsPtr->tkpSetCursor)(cursor); -} - -/* Slot 12 */ -void -TkpWmSetState(winPtr, state) - TkWindow * winPtr; - int state; -{ - (tkIntPlatStubsPtr->tkpWmSetState)(winPtr, state); -} - -/* Slot 13 */ -int -TkRectInRegion(rgn, x, y, width, height) - TkRegion rgn; - int x; - int y; - unsigned int width; - unsigned int height; -{ - return (tkIntPlatStubsPtr->tkRectInRegion)(rgn, x, y, width, height); -} - -/* Slot 14 */ -void -TkSetRegion(display, gc, rgn) - Display* display; - GC gc; - TkRegion rgn; -{ - (tkIntPlatStubsPtr->tkSetRegion)(display, gc, rgn); -} - -/* Slot 15 */ -void -TkUnionRectWithRegion(rect, src, dr_return) - XRectangle* rect; - TkRegion src; - TkRegion dr_return; -{ - (tkIntPlatStubsPtr->tkUnionRectWithRegion)(rect, src, dr_return); -} - -/* Slot 16 */ -int -HandleWMEvent(theEvent) - EventRecord * theEvent; -{ - return (tkIntPlatStubsPtr->handleWMEvent)(theEvent); -} - -/* Slot 17 */ -void -TkAboutDlg() -{ - (tkIntPlatStubsPtr->tkAboutDlg)(); -} - -/* Slot 18 */ -void -TkCreateMacEventSource() -{ - (tkIntPlatStubsPtr->tkCreateMacEventSource)(); -} - -/* Slot 19 */ -void -TkFontList(interp, display) - Tcl_Interp * interp; - Display * display; -{ - (tkIntPlatStubsPtr->tkFontList)(interp, display); -} - -/* Slot 20 */ -Window -TkGetTransientMaster(winPtr) - TkWindow * winPtr; -{ - return (tkIntPlatStubsPtr->tkGetTransientMaster)(winPtr); -} - -/* Slot 21 */ -int -TkGenerateButtonEvent(x, y, window, state) - int x; - int y; - Window window; - unsigned int state; -{ - return (tkIntPlatStubsPtr->tkGenerateButtonEvent)(x, y, window, state); -} - -/* Slot 22 */ -int -TkGetCharPositions(font_struct, string, count, buffer) - XFontStruct * font_struct; - char * string; - int count; - short * buffer; -{ - return (tkIntPlatStubsPtr->tkGetCharPositions)(font_struct, string, count, buffer); -} - -/* Slot 23 */ -void -TkGenWMDestroyEvent(tkwin) - Tk_Window tkwin; -{ - (tkIntPlatStubsPtr->tkGenWMDestroyEvent)(tkwin); -} - -/* Slot 24 */ -void -TkGenWMConfigureEvent(tkwin, x, y, width, height, flags) - Tk_Window tkwin; - int x; - int y; - int width; - int height; - int flags; -{ - (tkIntPlatStubsPtr->tkGenWMConfigureEvent)(tkwin, x, y, width, height, flags); -} - -/* Slot 25 */ -unsigned int -TkMacButtonKeyState() -{ - return (tkIntPlatStubsPtr->tkMacButtonKeyState)(); -} - -/* Slot 26 */ -void -TkMacClearMenubarActive() -{ - (tkIntPlatStubsPtr->tkMacClearMenubarActive)(); -} - -/* Slot 27 */ -int -TkMacConvertEvent(eventPtr) - EventRecord * eventPtr; -{ - return (tkIntPlatStubsPtr->tkMacConvertEvent)(eventPtr); -} - -/* Slot 28 */ -int -TkMacDispatchMenuEvent(menuID, index) - int menuID; - int index; -{ - return (tkIntPlatStubsPtr->tkMacDispatchMenuEvent)(menuID, index); -} - -/* Slot 29 */ -void -TkMacInstallCursor(resizeOverride) - int resizeOverride; -{ - (tkIntPlatStubsPtr->tkMacInstallCursor)(resizeOverride); -} - -/* Slot 30 */ -int -TkMacConvertTkEvent(eventPtr, window) - EventRecord * eventPtr; - Window window; -{ - return (tkIntPlatStubsPtr->tkMacConvertTkEvent)(eventPtr, window); -} - -/* Slot 31 */ -void -TkMacHandleTearoffMenu() -{ - (tkIntPlatStubsPtr->tkMacHandleTearoffMenu)(); -} - -/* Slot 32 */ -void -tkMacInstallMWConsole(interp) - Tcl_Interp * interp; -{ - (tkIntPlatStubsPtr->tkMacInstallMWConsole)(interp); -} - -/* Slot 33 */ -void -TkMacInvalClipRgns(winPtr) - TkWindow * winPtr; -{ - (tkIntPlatStubsPtr->tkMacInvalClipRgns)(winPtr); -} - -/* Slot 34 */ -void -TkMacDoHLEvent(theEvent) - EventRecord * theEvent; -{ - (tkIntPlatStubsPtr->tkMacDoHLEvent)(theEvent); -} - -/* Slot 35 */ -void -TkMacFontInfo(fontId, family, style, size) - Font fontId; - short * family; - short * style; - short * size; -{ - (tkIntPlatStubsPtr->tkMacFontInfo)(fontId, family, style, size); -} - -/* Slot 36 */ -Time -TkMacGenerateTime() -{ - return (tkIntPlatStubsPtr->tkMacGenerateTime)(); -} - -/* Slot 37 */ -GWorldPtr -TkMacGetDrawablePort(drawable) - Drawable drawable; -{ - return (tkIntPlatStubsPtr->tkMacGetDrawablePort)(drawable); -} - -/* Slot 38 */ -TkWindow * -TkMacGetScrollbarGrowWindow(winPtr) - TkWindow * winPtr; -{ - return (tkIntPlatStubsPtr->tkMacGetScrollbarGrowWindow)(winPtr); -} - -/* Slot 39 */ -Window -TkMacGetXWindow(macWinPtr) - WindowRef macWinPtr; -{ - return (tkIntPlatStubsPtr->tkMacGetXWindow)(macWinPtr); -} - -/* Slot 40 */ -int -TkMacGrowToplevel(whichWindow, start) - WindowRef whichWindow; - Point start; -{ - return (tkIntPlatStubsPtr->tkMacGrowToplevel)(whichWindow, start); -} - -/* Slot 41 */ -void -TkMacHandleMenuSelect(mResult, optionKeyPressed) - long mResult; - int optionKeyPressed; -{ - (tkIntPlatStubsPtr->tkMacHandleMenuSelect)(mResult, optionKeyPressed); -} - -/* Slot 42 */ -int -TkMacHaveAppearance() -{ - return (tkIntPlatStubsPtr->tkMacHaveAppearance)(); -} - -/* Slot 43 */ -void -TkMacInitAppleEvents(interp) - Tcl_Interp * interp; -{ - (tkIntPlatStubsPtr->tkMacInitAppleEvents)(interp); -} - -/* Slot 44 */ -void -TkMacInitMenus(interp) - Tcl_Interp * interp; -{ - (tkIntPlatStubsPtr->tkMacInitMenus)(interp); -} - -/* Slot 45 */ -void -TkMacInvalidateWindow(macWin, flag) - MacDrawable * macWin; - int flag; -{ - (tkIntPlatStubsPtr->tkMacInvalidateWindow)(macWin, flag); -} - -/* Slot 46 */ -int -TkMacIsCharacterMissing(tkfont, searchChar) - Tk_Font tkfont; - unsigned int searchChar; -{ - return (tkIntPlatStubsPtr->tkMacIsCharacterMissing)(tkfont, searchChar); -} - -/* Slot 47 */ -void -TkMacMakeRealWindowExist(winPtr) - TkWindow * winPtr; -{ - (tkIntPlatStubsPtr->tkMacMakeRealWindowExist)(winPtr); -} - -/* Slot 48 */ -BitMapPtr -TkMacMakeStippleMap(d1, d2) - Drawable d1; - Drawable d2; -{ - return (tkIntPlatStubsPtr->tkMacMakeStippleMap)(d1, d2); -} - -/* Slot 49 */ -void -TkMacMenuClick() -{ - (tkIntPlatStubsPtr->tkMacMenuClick)(); -} - -/* Slot 50 */ -void -TkMacRegisterOffScreenWindow(window, portPtr) - Window window; - GWorldPtr portPtr; -{ - (tkIntPlatStubsPtr->tkMacRegisterOffScreenWindow)(window, portPtr); -} - -/* Slot 51 */ -int -TkMacResizable(winPtr) - TkWindow * winPtr; -{ - return (tkIntPlatStubsPtr->tkMacResizable)(winPtr); -} - -/* Slot 52 */ -void -TkMacSetEmbedRgn(winPtr, rgn) - TkWindow * winPtr; - RgnHandle rgn; -{ - (tkIntPlatStubsPtr->tkMacSetEmbedRgn)(winPtr, rgn); -} - -/* Slot 53 */ -void -TkMacSetHelpMenuItemCount() -{ - (tkIntPlatStubsPtr->tkMacSetHelpMenuItemCount)(); -} - -/* Slot 54 */ -void -TkMacSetScrollbarGrow(winPtr, flag) - TkWindow * winPtr; - int flag; -{ - (tkIntPlatStubsPtr->tkMacSetScrollbarGrow)(winPtr, flag); -} - -/* Slot 55 */ -void -TkMacSetUpClippingRgn(drawable) - Drawable drawable; -{ - (tkIntPlatStubsPtr->tkMacSetUpClippingRgn)(drawable); -} - -/* Slot 56 */ -void -TkMacSetUpGraphicsPort(gc) - GC gc; -{ - (tkIntPlatStubsPtr->tkMacSetUpGraphicsPort)(gc); -} - -/* Slot 57 */ -void -TkMacUpdateClipRgn(winPtr) - TkWindow * winPtr; -{ - (tkIntPlatStubsPtr->tkMacUpdateClipRgn)(winPtr); -} - -/* Slot 58 */ -void -TkMacUnregisterMacWindow(portPtr) - GWorldPtr portPtr; -{ - (tkIntPlatStubsPtr->tkMacUnregisterMacWindow)(portPtr); -} - -/* Slot 59 */ -int -TkMacUseMenuID(macID) - short macID; -{ - return (tkIntPlatStubsPtr->tkMacUseMenuID)(macID); -} - -/* Slot 60 */ -RgnHandle -TkMacVisableClipRgn(winPtr) - TkWindow * winPtr; -{ - return (tkIntPlatStubsPtr->tkMacVisableClipRgn)(winPtr); -} - -/* Slot 61 */ -void -TkMacWinBounds(winPtr, geometry) - TkWindow * winPtr; - Rect * geometry; -{ - (tkIntPlatStubsPtr->tkMacWinBounds)(winPtr, geometry); -} - -/* Slot 62 */ -void -TkMacWindowOffset(wRef, xOffset, yOffset) - WindowRef wRef; - int * xOffset; - int * yOffset; -{ - (tkIntPlatStubsPtr->tkMacWindowOffset)(wRef, xOffset, yOffset); -} - -/* Slot 63 */ -void -TkResumeClipboard() -{ - (tkIntPlatStubsPtr->tkResumeClipboard)(); -} - -/* Slot 64 */ -int -TkSetMacColor(pixel, macColor) - unsigned long pixel; - RGBColor * macColor; -{ - return (tkIntPlatStubsPtr->tkSetMacColor)(pixel, macColor); -} - -/* Slot 65 */ -void -TkSetWMName(winPtr, titleUid) - TkWindow * winPtr; - Tk_Uid titleUid; -{ - (tkIntPlatStubsPtr->tkSetWMName)(winPtr, titleUid); -} - -/* Slot 66 */ -void -TkSuspendClipboard() -{ - (tkIntPlatStubsPtr->tkSuspendClipboard)(); -} - -/* Slot 67 */ -int -TkWMGrowToplevel(whichWindow, start) - WindowRef whichWindow; - Point start; -{ - return (tkIntPlatStubsPtr->tkWMGrowToplevel)(whichWindow, start); -} - -/* Slot 68 */ -int -TkMacZoomToplevel(whichWindow, where, zoomPart) - WindowPtr whichWindow; - Point where; - short zoomPart; -{ - return (tkIntPlatStubsPtr->tkMacZoomToplevel)(whichWindow, where, zoomPart); -} - -/* Slot 69 */ -Tk_Window -Tk_TopCoordsToWindow(tkwin, rootX, rootY, newX, newY) - Tk_Window tkwin; - int rootX; - int rootY; - int * newX; - int * newY; -{ - return (tkIntPlatStubsPtr->tk_TopCoordsToWindow)(tkwin, rootX, rootY, newX, newY); -} - -/* Slot 70 */ -MacDrawable * -TkMacContainerId(winPtr) - TkWindow * winPtr; -{ - return (tkIntPlatStubsPtr->tkMacContainerId)(winPtr); -} - -/* Slot 71 */ -MacDrawable * -TkMacGetHostToplevel(winPtr) - TkWindow * winPtr; -{ - return (tkIntPlatStubsPtr->tkMacGetHostToplevel)(winPtr); -} - -#endif /* MAC_TCL */ - -/* !END!: Do not edit above this line. */ |