diff options
| author | hershey <hershey> | 1999-04-17 00:32:27 (GMT) |
|---|---|---|
| committer | hershey <hershey> | 1999-04-17 00:32:27 (GMT) |
| commit | 099c93d0b49e614cfeffec26211d60d95235e2bf (patch) | |
| tree | d397aeef664656316cd9691f280f0a3560670008 /generic/tclIntDecls.h | |
| parent | 7ef335cb1b504d531a013d66e510b8c2d48945cc (diff) | |
| download | tcl-099c93d0b49e614cfeffec26211d60d95235e2bf.zip tcl-099c93d0b49e614cfeffec26211d60d95235e2bf.tar.gz tcl-099c93d0b49e614cfeffec26211d60d95235e2bf.tar.bz2 | |
changes make Tcl_Access and Tcl_Stat public.
also one minor fix in tests/all.tcl to fix bug 1770.
Diffstat (limited to 'generic/tclIntDecls.h')
| -rw-r--r-- | generic/tclIntDecls.h | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h index 5edf57e..6e49d84 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.5 1999/04/16 22:03:58 surles Exp $ + * RCS: @(#) $Id: tclIntDecls.h,v 1.6 1999/04/17 00:32:30 hershey Exp $ */ #ifndef _TCLINTDECLS @@ -327,7 +327,7 @@ EXTERN int TclSockMinimumBuffers _ANSI_ARGS_((int sock, int size)); /* 105 */ EXTERN int TclStat _ANSI_ARGS_((CONST char * path, - TclStat_ * buf)); + struct stat * buf)); /* 106 */ EXTERN int TclStatDeleteProc _ANSI_ARGS_((TclStatProc_ * proc)); /* 107 */ @@ -554,7 +554,7 @@ typedef struct TclIntStubs { void (*tclSetupEnv) _ANSI_ARGS_((Tcl_Interp * interp)); /* 102 */ int (*tclSockGetPort) _ANSI_ARGS_((Tcl_Interp * interp, char * str, char * proto, int * portPtr)); /* 103 */ int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 104 */ - int (*tclStat) _ANSI_ARGS_((CONST char * path, TclStat_ * buf)); /* 105 */ + int (*tclStat) _ANSI_ARGS_((CONST char * path, struct stat * buf)); /* 105 */ int (*tclStatDeleteProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 106 */ int (*tclStatInsertProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 107 */ void (*tclTeardownNamespace) _ANSI_ARGS_((Namespace * nsPtr)); /* 108 */ @@ -974,7 +974,7 @@ extern TclIntStubs *tclIntStubsPtr; #endif #ifndef TclSetPreInitScript #define TclSetPreInitScript \ - (tclIntStubsPtr->tclSetPreInitScript) /* 101 */ + (tclIntStubsPtr->tclSetPreInitScript) /* 101 */ #endif #ifndef TclSetupEnv #define TclSetupEnv \ |