tcl-glibc21.patch

   1 --- tcl8.0.3/generic/tclPosixStr.c.glibc21      Fri Dec 18 17:30:53 1998
   2 +++ tcl8.0.3/generic/tclPosixStr.c      Fri Dec 18 17:34:05 1998
   3 @@ -324,7 +324,7 @@
   4  #ifdef ENOTSOCK
   5         case ENOTSOCK: return "ENOTSOCK";
   6  #endif
   7 -#ifdef ENOTSUP
   8 +#if defined(ENOTSUP) && (ENOTSUP != EOPNOTSUPP)
   9         case ENOTSUP: return "ENOTSUP";
  10  #endif
  11  #ifdef ENOTTY
  12 @@ -771,7 +771,7 @@
  13  #ifdef ENOTSOCK
  14         case ENOTSOCK: return "socket operation on non-socket";
  15  #endif
  16 -#ifdef ENOTSUP
  17 +#if defined(ENOTSUP) && (ENOTSUP != EOPNOTSUPP)
  18         case ENOTSUP: return "operation not supported";
  19  #endif
  20  #ifdef ENOTTY