summaryrefslogtreecommitdiffstats
path: root/generic/tclInt.decls
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclInt.decls')
-rw-r--r--generic/tclInt.decls111
1 files changed, 0 insertions, 111 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls
index 1366fc3..bdae099 100644
--- a/generic/tclInt.decls
+++ b/generic/tclInt.decls
@@ -713,117 +713,6 @@ declare 199 {
interface tclIntPlat
-########################
-# Mac specific internals
-
-declare 0 mac {
- void *TclpSysAlloc(long size, int isBin)
-}
-declare 1 mac {
- void TclpSysFree(void *ptr)
-}
-declare 2 mac {
- void *TclpSysRealloc(void *cp, unsigned int size)
-}
-declare 3 mac {
- void TclpExit(int status)
-}
-
-# Prototypes for functions found in the tclMacUtil.c compatability library.
-
-declare 4 mac {
- int FSpGetDefaultDir(FSSpecPtr theSpec)
-}
-declare 5 mac {
- int FSpSetDefaultDir(FSSpecPtr theSpec)
-}
-declare 6 mac {
- OSErr FSpFindFolder(short vRefNum, OSType folderType,
- Boolean createFolder, FSSpec *spec)
-}
-declare 7 mac {
- void GetGlobalMouseTcl(Point *mouse)
-}
-
-# The following routines are utility functions in Tcl. They are exported
-# here because they are needed in Tk. They are not officially supported,
-# however. The first set are from the MoreFiles package.
-
-declare 8 mac {
- pascal OSErr FSpGetDirectoryIDTcl(const FSSpec *spec, long *theDirID,
- Boolean *isDirectory)
-}
-declare 9 mac {
- pascal short FSpOpenResFileCompatTcl(const FSSpec *spec,
- SignedByte permission)
-}
-declare 10 mac {
- pascal void FSpCreateResFileCompatTcl(const FSSpec *spec, OSType creator,
- OSType fileType, ScriptCode scriptTag)
-}
-
-# Like the MoreFiles routines these fix problems in the standard
-# Mac calls. These routines are from tclMacUtils.h.
-
-declare 11 mac {
- int FSpLocationFromPath(int length, const char *path, FSSpecPtr theSpec)
-}
-declare 12 mac {
- OSErr FSpPathFromLocation(FSSpecPtr theSpec, int *length,
- Handle *fullPath)
-}
-
-# Prototypes of Mac only internal functions.
-
-declare 13 mac {
- void TclMacExitHandler(void)
-}
-declare 14 mac {
- void TclMacInitExitToShell(int usePatch)
-}
-declare 15 mac {
- OSErr TclMacInstallExitToShellPatch(ExitToShellProcPtr newProc)
-}
-declare 16 mac {
- int TclMacOSErrorToPosixError(int error)
-}
-declare 17 mac {
- void TclMacRemoveTimer(void *timerToken)
-}
-declare 18 mac {
- void *TclMacStartTimer(long ms)
-}
-declare 19 mac {
- int TclMacTimerExpired(void *timerToken)
-}
-declare 20 mac {
- int TclMacRegisterResourceFork(short fileRef, Tcl_Obj *tokenPtr,
- int insert)
-}
-declare 21 mac {
- short TclMacUnRegisterResourceFork(char *tokenPtr, Tcl_Obj *resultPtr)
-}
-declare 22 mac {
- int TclMacCreateEnv(void)
-}
-declare 23 mac {
- FILE *TclMacFOpenHack(const char *path, const char *mode)
-}
-# Replaced in 8.1 by TclpReadLink:
-# declare 24 mac {
-# int TclMacReadlink(char *path, char *buf, int size)
-# }
-declare 24 mac {
- char *TclpGetTZName(int isdst)
-}
-declare 25 mac {
- int TclMacChmod(const char *path, int mode)
-}
-# version of FSpLocationFromPath that doesn't resolve the last path component
-declare 26 mac {
- int FSpLLocationFromPath(int length, const char *path, FSSpecPtr theSpec)
-}
-
################################
# Windows specific functions