summaryrefslogtreecommitdiffstats
path: root/generic/tclInt.decls
diff options
context:
space:
mode:
authordas <das>2001-11-23 01:25:35 (GMT)
committerdas <das>2001-11-23 01:25:35 (GMT)
commitbf3f2b462290dda8accb57bda76e8e98d45a8a12 (patch)
tree22e1756e8fb4d5f339d6ac1dfdf679782e33f6e5 /generic/tclInt.decls
parent59ae2a6c2b08e679a8f5aa457d4a09fcf5442e35 (diff)
downloadtcl-bf3f2b462290dda8accb57bda76e8e98d45a8a12.zip
tcl-bf3f2b462290dda8accb57bda76e8e98d45a8a12.tar.gz
tcl-bf3f2b462290dda8accb57bda76e8e98d45a8a12.tar.bz2
** upport to 8.4 of mac code changes for 8.3.3 & various new
** changes for 8.4, some already backported to 8.3.4 (patch #435658) see ChangeLog for details
Diffstat (limited to 'generic/tclInt.decls')
-rw-r--r--generic/tclInt.decls13
1 files changed, 8 insertions, 5 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls
index 5ae28d9..23dfdd0 100644
--- a/generic/tclInt.decls
+++ b/generic/tclInt.decls
@@ -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: tclInt.decls,v 1.37 2001/11/21 02:36:20 hobbs Exp $
+# RCS: @(#) $Id: tclInt.decls,v 1.38 2001/11/23 01:26:47 das Exp $
library tcl
@@ -696,7 +696,7 @@ declare 6 mac {
Boolean createFolder, FSSpec *spec)
}
declare 7 mac {
- void GetGlobalMouse(Point *mouse)
+ void GetGlobalMouseTcl(Point *mouse)
}
# The following routines are utility functions in Tcl. They are exported
@@ -704,15 +704,15 @@ declare 7 mac {
# however. The first set are from the MoreFiles package.
declare 8 mac {
- pascal OSErr FSpGetDirectoryID(CONST FSSpec *spec, long *theDirID, \
+ pascal OSErr FSpGetDirectoryIDTcl(CONST FSSpec *spec, long *theDirID, \
Boolean *isDirectory)
}
declare 9 mac {
- pascal short FSpOpenResFileCompat(CONST FSSpec *spec, \
+ pascal short FSpOpenResFileCompatTcl(CONST FSSpec *spec, \
SignedByte permission)
}
declare 10 mac {
- pascal void FSpCreateResFileCompat(CONST FSSpec *spec, OSType creator, \
+ pascal void FSpCreateResFileCompatTcl(CONST FSSpec *spec, OSType creator, \
OSType fileType, ScriptCode scriptTag)
}
@@ -767,6 +767,9 @@ declare 23 mac {
# declare 24 mac {
# int TclMacReadlink(char *path, char *buf, int size)
# }
+declare 24 mac {
+ char * TclpGetTZName(int isdst)
+}
declare 25 mac {
int TclMacChmod(char *path, int mode)
}