summaryrefslogtreecommitdiffstats
path: root/generic/tclInt.h
diff options
context:
space:
mode:
authorhershey <hershey>1999-04-17 00:32:27 (GMT)
committerhershey <hershey>1999-04-17 00:32:27 (GMT)
commit099c93d0b49e614cfeffec26211d60d95235e2bf (patch)
treed397aeef664656316cd9691f280f0a3560670008 /generic/tclInt.h
parent7ef335cb1b504d531a013d66e510b8c2d48945cc (diff)
downloadtcl-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/tclInt.h')
-rw-r--r--generic/tclInt.h7
1 files changed, 3 insertions, 4 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h
index 0590bc5..734cdbf 100644
--- a/generic/tclInt.h
+++ b/generic/tclInt.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: tclInt.h,v 1.25 1999/04/16 00:46:48 stanton Exp $
+ * RCS: @(#) $Id: tclInt.h,v 1.26 1999/04/17 00:32:29 hershey Exp $
*/
#ifndef _TCLINT
@@ -1476,8 +1476,7 @@ typedef struct TclFile_ *TclFile;
*----------------------------------------------------------------
*/
-typedef struct stat TclStat_;
-typedef int (TclStatProc_) _ANSI_ARGS_((CONST char *path, TclStat_ *buf));
+typedef int (TclStatProc_) _ANSI_ARGS_((CONST char *path, struct stat *buf));
typedef int (TclAccessProc_) _ANSI_ARGS_((CONST char *path, int mode));
typedef Tcl_Channel (TclOpenFileChannelProc_) _ANSI_ARGS_((Tcl_Interp *interp,
char *fileName, char *modeString,
@@ -1811,7 +1810,7 @@ EXTERN int TclSockGetPort _ANSI_ARGS_((Tcl_Interp *interp,
EXTERN int TclSockMinimumBuffers _ANSI_ARGS_((int sock,
int size));
EXTERN int TclStat _ANSI_ARGS_((CONST char *path,
- TclStat_ *buf));
+ struct stat *buf));
EXTERN int TclStatDeleteProc _ANSI_ARGS_((TclStatProc_ *proc));
EXTERN int TclStatInsertProc _ANSI_ARGS_((TclStatProc_ *proc));
EXTERN void TclTeardownNamespace _ANSI_ARGS_((Namespace *nsPtr));