summaryrefslogtreecommitdiff
path: root/ghc/lib/misc/cbits/getSockName.c
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/lib/misc/cbits/getSockName.c')
-rw-r--r--ghc/lib/misc/cbits/getSockName.c22
1 files changed, 1 insertions, 21 deletions
diff --git a/ghc/lib/misc/cbits/getSockName.c b/ghc/lib/misc/cbits/getSockName.c
index 987296b581..feafb7d669 100644
--- a/ghc/lib/misc/cbits/getSockName.c
+++ b/ghc/lib/misc/cbits/getSockName.c
@@ -19,27 +19,7 @@ getSockName(I_ sockfd, A_ peer, A_ namelen)
while ((name = getsockname((int) sockfd, (struct sockaddr *) peer, (int *) namelen)) < 0) {
if (errno != EINTR) {
cvtErrno();
- switch (ghc_errno) {
- default:
- stdErrno();
- break;
- case GHC_EBADF:
- ghc_errtype = ERR_INVALIDARGUMENT;
- ghc_errstr = "Not a valid write descriptor";
- break;
- case GHC_EFAULT:
- ghc_errtype = ERR_INVALIDARGUMENT;
- ghc_errstr = "Data not in writeable part of user address space";
- break;
- case GHC_ENOBUFS:
- ghc_errtype = ERR_RESOURCEEXHAUSTED;
- ghc_errstr = "Insuffcient resources";
- break;
- case GHC_ENOTSOCK:
- ghc_errtype = ERR_INVALIDARGUMENT;
- ghc_errstr = "Descriptor is not a socket";
- break;
- }
+ stdErrno();
return -1;
}
}