source: git/external/tcl/tclUnixPort.h@ a1b19ea

/*
 * tclUnixPort.h --
 *
 *      This header file handles porting issues that occur because
 *      of differences between systems.  It reads in UNIX-related
 *      header files and sets up UNIX-related macros for Tcl's UNIX
 *      core.  It should be the only file that contains #ifdefs to
 *      handle different flavors of UNIX.  This file sets up the
 *      union of all UNIX-related things needed by any of the Tcl
 *      core files.  This file depends on configuration #defines such
 *      as NO_DIRENT_H that are set up by the "configure" script.
 *
 *      Much of the material in this file was originally contributed
 *      by Karl Lehenbauer, Mark Diekhans and Peter da Silva.
 *
 * Copyright (c) 1991-1994 The Regents of the University of California.
 * Copyright (c) 1994-1995 Sun Microsystems, Inc.
 *
 * See the file "license.terms" for information on usage and redistribution
 * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 *
 * RCS: @(#) $Id: tclUnixPort.h,v 1.1 2008-06-04 13:58:11 demin Exp $
 */

#ifndef _TCLUNIXPORT
#define _TCLUNIXPORT

#include <errno.h>
#include <fcntl.h>
#include <sys/stat.h>

/*
 * Define access mode constants if they aren't already defined.
 */

#ifndef F_OK
#    define F_OK 00
#endif
#ifndef X_OK
#    define X_OK 01
#endif
#ifndef W_OK
#    define W_OK 02
#endif
#ifndef R_OK
#    define R_OK 04
#endif

#endif /* _TCLUNIXPORT */