diff options
| author | stwo <stwo> | 2010-09-06 12:57:31 (GMT) |
|---|---|---|
| committer | stwo <stwo> | 2010-09-06 12:57:31 (GMT) |
| commit | 3c5c0386e0a63f34a79ce78f5d35c48599949508 (patch) | |
| tree | da0b07ffe6eb9d201b76d0c12b6568095681ce58 /generic/tclIOUtil.c | |
| parent | a3ca2c33322a3f277d3affa55344c20ea64c1605 (diff) | |
| download | tcl-3c5c0386e0a63f34a79ce78f5d35c48599949508.zip tcl-3c5c0386e0a63f34a79ce78f5d35c48599949508.tar.gz tcl-3c5c0386e0a63f34a79ce78f5d35c48599949508.tar.bz2 | |
Backport blkcnt_t detection/usage.
Diffstat (limited to 'generic/tclIOUtil.c')
| -rw-r--r-- | generic/tclIOUtil.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index 6c1e64b..abefdc1 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -17,7 +17,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclIOUtil.c,v 1.151.2.2 2009/12/28 13:53:40 dkf Exp $ + * RCS: @(#) $Id: tclIOUtil.c,v 1.151.2.3 2010/09/06 12:57:33 stwo Exp $ */ #include "tclInt.h" @@ -134,7 +134,11 @@ Tcl_Stat( oldStyleBuf->st_blksize = buf.st_blksize; #endif #ifdef HAVE_STRUCT_STAT_ST_BLOCKS +#ifdef HAVE_BLKCNT_T oldStyleBuf->st_blocks = (blkcnt_t) buf.st_blocks; +#else + oldStyleBuf->st_blocks = (unsigned long) buf.st_blocks; +#endif #endif } return ret; |