diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2009-04-29 14:56:56 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2009-04-29 14:56:56 (GMT) |
| commit | bd059b3e984f4ed7094e35e91d6298cee7f4342f (patch) | |
| tree | a277ffbc4f9ce07501ae1a0091469677e4b6f1a3 /generic | |
| parent | a084e20d7a737e54cee53c89b1ac6e0c0ecd5e8f (diff) | |
| download | tcl-bd059b3e984f4ed7094e35e91d6298cee7f4342f.zip tcl-bd059b3e984f4ed7094e35e91d6298cee7f4342f.tar.gz tcl-bd059b3e984f4ed7094e35e91d6298cee7f4342f.tar.bz2 | |
Fix [Bug 2651823].
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tcl.h | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index b5bced7..dd3dc41 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tcl.h,v 1.289 2009/03/19 23:31:36 msofer Exp $ + * RCS: @(#) $Id: tcl.h,v 1.290 2009/04/29 14:57:01 dkf Exp $ */ #ifndef _TCL @@ -380,12 +380,12 @@ typedef struct stat Tcl_StatBuf; # ifdef __BORLANDC__ typedef struct stati64 Tcl_StatBuf; # define TCL_LL_MODIFIER "L" -# else /* __BORLANDC__ */ -# if _MSC_VER < 1400 || !defined(_M_IX86) +# else /* !__BORLANDC__ */ +# if _MSC_VER < 1400 && defined(_WIN64) typedef struct _stati64 Tcl_StatBuf; # else typedef struct _stat64 Tcl_StatBuf; -# endif /* _MSC_VER < 1400 */ +# endif /* _MSC_VER < 1400 && _WIN64 */ # define TCL_LL_MODIFIER "I64" # endif /* __BORLANDC__ */ # else /* __WIN32__ */ |