diff options
Diffstat (limited to 'generic/tclInt.decls')
| -rw-r--r-- | generic/tclInt.decls | 17 |
1 files changed, 14 insertions, 3 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls index 6a98616..4a7e787 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.72 2004/05/13 20:31:07 dkf Exp $ +# RCS: @(#) $Id: tclInt.decls,v 1.73 2004/05/14 21:43:29 kennykb Exp $ library tcl @@ -736,6 +736,15 @@ declare 181 generic { CONST char *file, int line) } +# TclpGmtime and TclpLocaltime promoted to the generic interface from unix + +declare 182 generic { + struct tm *TclpLocaltime(CONST time_t *clock) +} +declare 183 generic { + struct tm *TclpGmtime(CONST time_t *clock) +} + ############################################################################## # Define the platform specific internal Tcl interface. These functions are @@ -904,11 +913,13 @@ declare 9 unix { declare 10 unix { Tcl_DirEntry *TclpReaddir(DIR *dir) } +# Slots 11 and 12 are forwarders for functions that were promoted to +# generic Stubs declare 11 unix { - struct tm *TclpLocaltime(time_t *clock) + struct tm *TclpLocaltime_unix(CONST time_t *clock) } declare 12 unix { - struct tm *TclpGmtime(time_t *clock) + struct tm *TclpGmtime_unix(CONST time_t *clock) } declare 13 unix { char *TclpInetNtoa(struct in_addr addr) |