diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2002-05-27 10:14:21 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2002-05-27 10:14:21 (GMT) |
| commit | 35a21d3c687e7f7883d393c30df87820c1879e51 (patch) | |
| tree | 7d7c17d8e654bdce47d465b5cfa89196682af8c5 /win/tclWinPort.h | |
| parent | eff506b0846210f74d3905c974729e4e832f0fe0 (diff) | |
| download | tcl-35a21d3c687e7f7883d393c30df87820c1879e51.zip tcl-35a21d3c687e7f7883d393c30df87820c1879e51.tar.gz tcl-35a21d3c687e7f7883d393c30df87820c1879e51.tar.bz2 | |
Better handling of EOVERFLOW on Win32 systems (as EFBIG or EINVAL.)
Diffstat (limited to 'win/tclWinPort.h')
| -rw-r--r-- | win/tclWinPort.h | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/win/tclWinPort.h b/win/tclWinPort.h index 9f7a7c4..baf38fb 100644 --- a/win/tclWinPort.h +++ b/win/tclWinPort.h @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinPort.h,v 1.28 2002/05/24 21:19:09 dkf Exp $ + * RCS: @(#) $Id: tclWinPort.h,v 1.29 2002/05/27 10:14:21 dkf Exp $ */ #ifndef _TCLWINPORT @@ -199,11 +199,13 @@ #ifndef EREMOTE #define EREMOTE 66 /* The object is remote */ #endif -/* - * Note that EOVERFLOW is really just a specialist ERANGE... - */ #ifndef EOVERFLOW -#define EOVERFLOW ERANGE /* The object couldn't fit in the datatype */ +#ifdef +#define EOVERFLOW EFBIG /* The object couldn't fit in the datatype */ +#else +#define EOVERFLOW EINVAL /* Better than nothing! */ +#endif +#endif #endif /* |