summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-03-23 14:15:29 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-03-23 14:15:29 (GMT)
commitaf8da26b34bd282986b54a9da8618c6c3f617c7a (patch)
tree0c4ebae9865c8fef52dcb8c18bab8e3eeee078a3 /generic
parent6efd3e5fb18780e9e765151e807ed04c34293aa6 (diff)
downloadtcl-af8da26b34bd282986b54a9da8618c6c3f617c7a.zip
tcl-af8da26b34bd282986b54a9da8618c6c3f617c7a.tar.gz
tcl-af8da26b34bd282986b54a9da8618c6c3f617c7a.tar.bz2
add TclGetAndDetachPids and TclpCloseFile to cygwin port
Diffstat (limited to 'generic')
-rw-r--r--generic/tclInt.decls2
-rw-r--r--generic/tclStubInit.c8
2 files changed, 7 insertions, 3 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls
index 0595050..36198a4 100644
--- a/generic/tclInt.decls
+++ b/generic/tclInt.decls
@@ -992,9 +992,11 @@ declare 10 unix {
}
# Slots 11 and 12 are forwarders for functions that were promoted to
# generic Stubs
+# On cygwin, this is actually a reference to TclGetAndDetachPids
declare 11 unix {
struct tm *TclpLocaltime_unix(TclpTime_t_CONST clock)
}
+# On cygwin, this is actually a reference to TclpCloseFile
declare 12 unix {
struct tm *TclpGmtime_unix(TclpTime_t_CONST clock)
}
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c
index b363f24..347bdcb 100644
--- a/generic/tclStubInit.c
+++ b/generic/tclStubInit.c
@@ -31,8 +31,6 @@
#undef Tcl_ValidateAllMemory
#undef Tcl_FindHashEntry
#undef Tcl_CreateHashEntry
-#define TclpLocaltime_unix TclpLocaltime
-#define TclpGmtime_unix TclpGmtime
/*
* Keep a record of the original Notifier procedures, created in the
@@ -165,11 +163,13 @@ Tcl_WinTCharToUtf(
Tcl_Interp *, CONST char *, int, int, char *))) Tcl_WinUtfToTChar
#define Tcl_MacOSXOpenVersionedBundleResources (int (*) _ANSI_ARGS_(( \
Tcl_Interp *, CONST char *, CONST char *, int, int, char *))) Tcl_WinTCharToUtf
-#define TclMacOSXGetFileAttribute (int(*) _ANSI_ARGS_((Tcl_Interp *, \
+#define TclMacOSXGetFileAttribute (int (*) _ANSI_ARGS_((Tcl_Interp *, \
int, Tcl_Obj *, Tcl_Obj **))) TclpCreateProcess
#define TclMacOSXMatchType (int (*) _ANSI_ARGS_((Tcl_Interp *, CONST char *, \
CONST char *, Tcl_StatBuf *, Tcl_GlobTypeData *))) TclpMakeFile
#define TclMacOSXNotifierAddRunLoopMode (void (*) _ANSI_ARGS_((CONST void *))) TclpOpenFile
+#define TclpLocaltime_unix (struct tm *(*) _ANSI_ARGS_((TclpTime_t_CONST))) TclGetAndDetachPids
+#define TclpGmtime_unix (struct tm *(*) _ANSI_ARGS_((TclpTime_t_CONST))) TclpCloseFile
#elif !defined(__WIN32__) /* UNIX and MAC */
# define TclWinConvertError (void (*) _ANSI_ARGS_((unsigned int))) TclGetAndDetachPids
@@ -191,6 +191,8 @@ Tcl_WinTCharToUtf(
# define Tcl_MacOSXOpenBundleResources 0
# define Tcl_MacOSXOpenVersionedBundleResources 0
# endif
+# define TclpLocaltime_unix TclpLocaltime
+# define TclpGmtime_unix TclpGmtime
#endif
/*