Back to home page

EIC code displayed by LXR

 
 

    


File indexing completed on 2024-05-18 08:30:22

0001 /*
0002  * tclPort.h --
0003  *
0004  *  This header file handles porting issues that occur because
0005  *  of differences between systems.  It reads in platform specific
0006  *  portability files.
0007  *
0008  * Copyright (c) 1994-1995 Sun Microsystems, Inc.
0009  *
0010  * See the file "license.terms" for information on usage and redistribution
0011  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
0012  */
0013 
0014 #ifndef _TCLPORT
0015 #define _TCLPORT
0016 
0017 #ifdef HAVE_TCL_CONFIG_H
0018 #include "tclConfig.h"
0019 #endif
0020 #if defined(_WIN32)
0021 #   include "tclWinPort.h"
0022 #else
0023 #   include "tclUnixPort.h"
0024 #endif
0025 #include "tcl.h"
0026 
0027 #if !defined(LLONG_MIN)
0028 #   ifdef TCL_WIDE_INT_IS_LONG
0029 #      define LLONG_MIN LONG_MIN
0030 #   else
0031 #      ifdef LLONG_BIT
0032 #         define LLONG_MIN ((Tcl_WideInt)(Tcl_LongAsWide(1)<<(LLONG_BIT-1)))
0033 #      else
0034 /* Assume we're on a system with a 64-bit 'long long' type */
0035 #         define LLONG_MIN ((Tcl_WideInt)(Tcl_LongAsWide(1)<<63))
0036 #      endif
0037 #   endif
0038 /* Assume that if LLONG_MIN is undefined, then so is LLONG_MAX */
0039 #   define LLONG_MAX (~LLONG_MIN)
0040 #endif
0041 
0042 #define UWIDE_MAX ((Tcl_WideUInt)-1)
0043 #define WIDE_MAX ((Tcl_WideInt)(UWIDE_MAX >> 1))
0044 #define WIDE_MIN ((Tcl_WideInt)((Tcl_WideUInt)WIDE_MAX+1))
0045 
0046 #endif /* _TCLPORT */