diff options
| author | sof <unknown> | 1999-05-05 10:34:55 +0000 |
|---|---|---|
| committer | sof <unknown> | 1999-05-05 10:34:55 +0000 |
| commit | ba6cc3283b363c5aa2839a217e5162e272814174 (patch) | |
| tree | 7ae5960e6e26793b44ca4f1e85c95b669d366eb4 /ghc/lib/misc/cbits/socketOpt.c | |
| parent | e548e8aa01501daa9ac475af7e8318ff888dc2da (diff) | |
| download | haskell-ba6cc3283b363c5aa2839a217e5162e272814174.tar.gz | |
[project @ 1999-05-05 10:34:53 by sof]
stubs for starting & stopping Winsock
Diffstat (limited to 'ghc/lib/misc/cbits/socketOpt.c')
| -rw-r--r-- | ghc/lib/misc/cbits/socketOpt.c | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/ghc/lib/misc/cbits/socketOpt.c b/ghc/lib/misc/cbits/socketOpt.c index ddda6c18b9..69e1fa1214 100644 --- a/ghc/lib/misc/cbits/socketOpt.c +++ b/ghc/lib/misc/cbits/socketOpt.c @@ -19,7 +19,11 @@ StgInt opt; { int level,optval, sz_optval,rc; - if ( opt == TCP_MAXSEG || opt == TCP_NODELAY ) { + if ( +#ifndef _WIN32 + opt == TCP_MAXSEG || +#endif + opt == TCP_NODELAY ) { level = IPPROTO_TCP; } else { level = SOL_SOCKET; @@ -45,7 +49,11 @@ StgInt val; { int level, optval,rc; - if ( opt == TCP_MAXSEG || opt == TCP_NODELAY ) { + if ( +#ifndef _WIN32 + opt == TCP_MAXSEG || +#endif + opt == TCP_NODELAY ) { level = IPPROTO_TCP; } else { level = SOL_SOCKET; |