From 650e24f8fcb8f1ae4346ffe2110c471bb7637b01 Mon Sep 17 00:00:00 2001
From: patthoyts <patthoyts@users.sourceforge.net>
Date: Fri, 2 May 2008 20:02:35 +0000
Subject: Reverted dkf's accidental commit of the TIP 316 APIs as part of a
 code cleanup

---
 ChangeLog             |   4 ++
 generic/tclFileName.c | 109 +-------------------------------------------------
 2 files changed, 5 insertions(+), 108 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index d662043..71cea17 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2008-05-02  Pat Thoyts  <patthoyts@users.sourceforge.net>
+
+	* generic/tclFileName.c: Reverted accidental commit of TIP 316 APIs.
+
 2008-04-27  Donal K. Fellows  <dkf@users.sf.net>
 
 	* */*.c: A large tranche of getting rid of pre-C89-isms; if your
diff --git a/generic/tclFileName.c b/generic/tclFileName.c
index 5c58052..723b993 100644
--- a/generic/tclFileName.c
+++ b/generic/tclFileName.c
@@ -10,7 +10,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclFileName.c,v 1.87 2008/05/02 10:27:05 dkf Exp $
+ * RCS: @(#) $Id: tclFileName.c,v 1.88 2008/05/02 20:02:39 patthoyts Exp $
  */
 
 #include "tclInt.h"
@@ -2523,113 +2523,6 @@ Tcl_AllocStatBuf(void)
 }
 
 /*
- *---------------------------------------------------------------------------
- *
- * Tcl_Get*FromStat --
- *
- *	These functions provide portable read-only access to a Tcl_StatBuf.
- *
- * Results:
- *	The contents of the relevant field.
- *
- * Side effects:
- *	None.
- *
- *---------------------------------------------------------------------------
- */
-
-unsigned
-Tcl_GetFSDeviceFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_dev;
-}
-
-unsigned
-Tcl_GetFSInodeFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_ino;
-}
-
-unsigned
-Tcl_GetModeFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_mode;
-}
-
-int
-Tcl_GetLinkCountFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_nlink;
-}
-
-int
-Tcl_GetUserIdFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_uid;
-}
-
-int
-Tcl_GetGroupIdFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_gid;
-}
-
-int
-Tcl_GetDeviceTypeFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_rdev;
-}
-
-Tcl_WideInt
-Tcl_GetAccessTimeFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_atime;
-}
-
-Tcl_WideInt
-Tcl_GetModificationTimeFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_mtime;
-}
-
-Tcl_WideInt
-Tcl_GetChangeTimeFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_ctime;
-}
-
-Tcl_WideUInt
-Tcl_GetSizeFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return (Tcl_WideUInt) statBufPtr->st_size;
-}
-
-Tcl_WideUInt
-Tcl_GetBlocksFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_blocks;
-}
-
-unsigned
-Tcl_GetBlockSizeFromStat(
-    Tcl_StatBuf *statBufPtr)
-{
-    return statBufPtr->st_blksize;
-}
-
-/*
  * Local Variables:
  * mode: c
  * c-basic-offset: 4
-- 
cgit v0.12