formatting and de-_ANSI_ARGS_-ification

1 files changed, 75 insertions, 82 deletions

diff --git a/generic/tclFileSystem.h b/generic/tclFileSystem.h
index 459e572..cff0942 100644
--- a/generic/tclFileSystem.h
+++ b/generic/tclFileSystem.h
@@ -1,57 +1,52 @@
-/* 
+/*
  * tclFileSystem.h --
  *
- *	This file contains the common defintions and prototypes for
- *	use by Tcl's filesystem and path handling layers.
+ *	This file contains the common defintions and prototypes for use by
+ *	Tcl's filesystem and path handling layers.
  *
  * Copyright (c) 2003 Vince Darley.
  *
- * See the file "license.terms" for information on usage and redistribution
- * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
+ * See the file "license.terms" for information on usage and redistribution of
+ * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclFileSystem.h,v 1.10 2004/11/03 00:53:05 davygrvy Exp $
+ * RCS: @(#) $Id: tclFileSystem.h,v 1.11 2005/10/13 00:07:17 dkf Exp $
  */
 
 #ifndef _TCLFILESYSTEM
 #define _TCLFILESYSTEM
 
-#ifndef _TCL
 #include "tcl.h"
-#endif
 
-/* 
+/*
  * struct FilesystemRecord --
- * 
- * A filesystem record is used to keep track of each
- * filesystem currently registered with the core,
- * in a linked list.  Pointers to these structures
- * are also kept by each "path" Tcl_Obj, and we must
- * retain a refCount on the number of such references.
+ *
+ * A filesystem record is used to keep track of each filesystem currently
+ * registered with the core, in a linked list. Pointers to these structures
+ * are also kept by each "path" Tcl_Obj, and we must retain a refCount on the
+ * number of such references.
  */
+
 typedef struct FilesystemRecord {
-    ClientData	     clientData;  /* Client specific data for the new
-				   * filesystem (can be NULL) */
-    Tcl_Filesystem *fsPtr;        /* Pointer to filesystem dispatch
-				   * table. */
-    int fileRefCount;             /* How many Tcl_Obj's use this
-				   * filesystem. */
-    struct FilesystemRecord *nextPtr;  
-				  /* The next filesystem registered
-				   * to Tcl, or NULL if no more. */
+    ClientData clientData;	/* Client specific data for the new filesystem
+				 * (can be NULL) */
+    Tcl_Filesystem *fsPtr;	/* Pointer to filesystem dispatch table. */
+    int fileRefCount;		/* How many Tcl_Obj's use this filesystem. */
+    struct FilesystemRecord *nextPtr;
+				/* The next filesystem registered to Tcl, or
+				 * NULL if no more. */
     struct FilesystemRecord *prevPtr;
-				  /* The previous filesystem registered
-				   * to Tcl, or NULL if no more. */
+				/* The previous filesystem registered to Tcl,
+				 * or NULL if no more. */
 } FilesystemRecord;
 
 /*
- * This structure holds per-thread private copy of the
- * current directory maintained by the global cwdPathPtr.
- * This structure holds per-thread private copies of
- * some global data. This way we avoid most of the
- * synchronization calls which boosts performance, at
- * cost of having to update this information each
- * time the corresponding epoch counter changes.
+ * This structure holds per-thread private copy of the current directory
+ * maintained by the global cwdPathPtr. This structure holds per-thread
+ * private copies of some global data. This way we avoid most of the
+ * synchronization calls which boosts performance, at cost of having to update
+ * this information each time the corresponding epoch counter changes.
  */
+
 typedef struct ThreadSpecificData {
     int initialized;
     int cwdPathEpoch;
@@ -61,70 +56,68 @@ typedef struct ThreadSpecificData {
     FilesystemRecord *filesystemList;
 } ThreadSpecificData;
 
-/* 
- * The internal TclFS API provides routines for handling and
- * manipulating paths efficiently, taking direct advantage of
- * the "path" Tcl_Obj type.
- * 
+/*
+ * The internal TclFS API provides routines for handling and manipulating
+ * paths efficiently, taking direct advantage of the "path" Tcl_Obj type.
+ *
  * These functions are not exported at all at present.
  */
 
-MODULE_SCOPE int	TclFSCwdPointerEquals _ANSI_ARGS_((
-			    Tcl_Obj** pathPtrPtr));
-MODULE_SCOPE int	TclFSMakePathFromNormalized _ANSI_ARGS_((
-			    Tcl_Interp *interp, Tcl_Obj *pathPtr,
-			    ClientData clientData));
-MODULE_SCOPE int	TclFSNormalizeToUniquePath _ANSI_ARGS_((
-			    Tcl_Interp *interp, Tcl_Obj *pathPtr,
-			    int startAt, ClientData *clientDataPtr));
-MODULE_SCOPE Tcl_Obj *	TclFSMakePathRelative _ANSI_ARGS_((
-			    Tcl_Interp *interp, Tcl_Obj *pathPtr,
-			    Tcl_Obj *cwdPtr));
-MODULE_SCOPE Tcl_Obj *	TclFSInternalToNormalized _ANSI_ARGS_((
+MODULE_SCOPE int	TclFSCwdPointerEquals(Tcl_Obj **pathPtrPtr);
+MODULE_SCOPE int	TclFSMakePathFromNormalized(Tcl_Interp *interp,
+			    Tcl_Obj *pathPtr, ClientData clientData);
+MODULE_SCOPE int	TclFSNormalizeToUniquePath(Tcl_Interp *interp,
+			    Tcl_Obj *pathPtr, int startAt,
+			    ClientData *clientDataPtr);
+MODULE_SCOPE Tcl_Obj *	TclFSMakePathRelative(Tcl_Interp *interp,
+			    Tcl_Obj *pathPtr, Tcl_Obj *cwdPtr);
+MODULE_SCOPE Tcl_Obj *	TclFSInternalToNormalized(
 			    Tcl_Filesystem *fromFilesystem,
 			    ClientData clientData,
-			    FilesystemRecord **fsRecPtrPtr));
-MODULE_SCOPE int	TclFSEnsureEpochOk _ANSI_ARGS_((Tcl_Obj* pathPtr,
-			    Tcl_Filesystem **fsPtrPtr));
-MODULE_SCOPE void	TclFSSetPathDetails _ANSI_ARGS_((Tcl_Obj *pathPtr,
+			    FilesystemRecord **fsRecPtrPtr);
+MODULE_SCOPE int	TclFSEnsureEpochOk(Tcl_Obj *pathPtr,
+			    Tcl_Filesystem **fsPtrPtr);
+MODULE_SCOPE void	TclFSSetPathDetails(Tcl_Obj *pathPtr,
 			    FilesystemRecord *fsRecPtr,
-			    ClientData clientData ));
-MODULE_SCOPE Tcl_Obj *	TclFSNormalizeAbsolutePath _ANSI_ARGS_((
-			    Tcl_Interp* interp, Tcl_Obj *pathPtr,
-			    ClientData *clientDataPtr));
+			    ClientData clientData);
+MODULE_SCOPE Tcl_Obj *	TclFSNormalizeAbsolutePath(Tcl_Interp *interp,
+			    Tcl_Obj *pathPtr, ClientData *clientDataPtr);
 
-/* 
+/*
  * Private shared variables for use by tclIOUtil.c and tclPathObj.c
  */
+
 MODULE_SCOPE Tcl_Filesystem tclNativeFilesystem;
 MODULE_SCOPE Tcl_ThreadDataKey tclFsDataKey;
 
-/* 
- * Private shared functions for use by tclIOUtil.c, tclPathObj.c
- * and tclFileName.c, and any platform-specific filesystem code.
+/*
+ * Private shared functions for use by tclIOUtil.c, tclPathObj.c and
+ * tclFileName.c, and any platform-specific filesystem code.
  */
-MODULE_SCOPE Tcl_PathType   TclFSGetPathType  _ANSI_ARGS_((
-				Tcl_Obj *pathPtr,
-				Tcl_Filesystem **filesystemPtrPtr,
-				int *driveNameLengthPtr));
-MODULE_SCOPE Tcl_PathType   TclFSNonnativePathType  _ANSI_ARGS_((
-				CONST char *pathPtr, int pathLen,
-				Tcl_Filesystem **filesystemPtrPtr,
-				int *driveNameLengthPtr,
-				Tcl_Obj **driveNameRef));
-MODULE_SCOPE Tcl_PathType   TclGetPathType  _ANSI_ARGS_((
-				Tcl_Obj *pathPtr,
-				Tcl_Filesystem **filesystemPtrPtr,
-				int *driveNameLengthPtr,
-				Tcl_Obj **driveNameRef));
-MODULE_SCOPE int	    TclFSEpochOk _ANSI_ARGS_((
-				int filesystemEpoch));
-MODULE_SCOPE int	    TclFSCwdIsNative _ANSI_ARGS_((void));
-MODULE_SCOPE Tcl_Obj*	    TclWinVolumeRelativeNormalize _ANSI_ARGS_((
-				Tcl_Interp *interp, CONST char *path,
-				Tcl_Obj **useThisCwdPtr));
+
+MODULE_SCOPE Tcl_PathType TclFSGetPathType(Tcl_Obj *pathPtr,
+			    Tcl_Filesystem **filesystemPtrPtr,
+			    int *driveNameLengthPtr);
+MODULE_SCOPE Tcl_PathType TclFSNonnativePathType(CONST char *pathPtr,
+			    int pathLen, Tcl_Filesystem **filesystemPtrPtr,
+			    int *driveNameLengthPtr, Tcl_Obj **driveNameRef);
+MODULE_SCOPE Tcl_PathType TclGetPathType(Tcl_Obj *pathPtr,
+			    Tcl_Filesystem **filesystemPtrPtr,
+			    int *driveNameLengthPtr, Tcl_Obj **driveNameRef);
+MODULE_SCOPE int	TclFSEpochOk(int filesystemEpoch);
+MODULE_SCOPE int	TclFSCwdIsNative(void);
+MODULE_SCOPE Tcl_Obj *	TclWinVolumeRelativeNormalize(Tcl_Interp *interp,
+			    CONST char *path, Tcl_Obj **useThisCwdPtr);
 
 MODULE_SCOPE Tcl_FSPathInFilesystemProc TclNativePathInFilesystem;
 MODULE_SCOPE Tcl_FSCreateInternalRepProc TclNativeCreateNativeRep;
 
 #endif /* _TCLFILESYSTEM */
+
+/*
+ * Local Variables:
+ * mode: c
+ * c-basic-offset: 4
+ * fill-column: 78
+ * End:
+ */