From 21c2e947a4aaead67f9079159dd29cfbc98c74b3 Mon Sep 17 00:00:00 2001 From: dgp Date: Fri, 19 Mar 2004 18:43:15 +0000 Subject: Added CONST to TclpGetTime declaration and `make genstubs` --- generic/tclInt.decls | 4 ++-- generic/tclIntDecls.h | 7 ++++--- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/generic/tclInt.decls b/generic/tclInt.decls index cebb661..159fbda 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.70 2004/03/18 18:53:41 rmax Exp $ +# RCS: @(#) $Id: tclInt.decls,v 1.71 2004/03/19 18:43:15 dgp Exp $ library tcl @@ -522,7 +522,7 @@ declare 132 generic { int TclpHasSockets(Tcl_Interp *interp) } declare 133 generic { - struct tm *TclpGetDate(time_t *time, int useGMT) + struct tm *TclpGetDate(CONST time_t *time, int useGMT) } declare 134 generic { size_t TclpStrftime(char *s, size_t maxsize, CONST char *format, diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h index c92dfcc..09e193d 100644 --- a/generic/tclIntDecls.h +++ b/generic/tclIntDecls.h @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclIntDecls.h,v 1.60 2004/03/19 18:33:52 kennykb Exp $ + * RCS: @(#) $Id: tclIntDecls.h,v 1.61 2004/03/19 18:43:15 dgp Exp $ */ #ifndef _TCLINTDECLS @@ -698,7 +698,8 @@ EXTERN int TclpHasSockets _ANSI_ARGS_((Tcl_Interp * interp)); #ifndef TclpGetDate_TCL_DECLARED #define TclpGetDate_TCL_DECLARED /* 133 */ -EXTERN struct tm * TclpGetDate _ANSI_ARGS_((CONST time_t *time, int useGMT)); +EXTERN struct tm * TclpGetDate _ANSI_ARGS_((CONST time_t * time, + int useGMT)); #endif #ifndef TclpStrftime_TCL_DECLARED #define TclpStrftime_TCL_DECLARED @@ -1111,7 +1112,7 @@ typedef struct TclIntStubs { int (*tcl_RemoveInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 130 */ void (*tcl_SetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 131 */ int (*tclpHasSockets) _ANSI_ARGS_((Tcl_Interp * interp)); /* 132 */ - struct tm * (*tclpGetDate) _ANSI_ARGS_((CONST time_t *time, int useGMT)); /* 133 */ + struct tm * (*tclpGetDate) _ANSI_ARGS_((CONST time_t * time, int useGMT)); /* 133 */ size_t (*tclpStrftime) _ANSI_ARGS_((char * s, size_t maxsize, CONST char * format, CONST struct tm * t, int useGMT)); /* 134 */ void *reserved135; void *reserved136; -- cgit v0.12