fix lcc fixes

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@323 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2002-01-23 05:03:36 +00:00
parent bc9b7908cd
commit 721746bd64

View File

@ -621,7 +621,7 @@ p_socket_bind(void)
/* get the port number */ /* get the port number */
unsigned int namelen; unsigned int namelen;
Term t; Term t;
if (getsockname(fd, (struct sockaddr *)&saddr, (unsigned int *)&namelen) < 0) { if (getsockname(fd, (struct sockaddr *)&saddr, &namelen) < 0) {
#if HAVE_STRERROR #if HAVE_STRERROR
Error(SYSTEM_ERROR, TermNil, Error(SYSTEM_ERROR, TermNil,
"socket_bind/2 (getsockname: %s)", strerror(socket_errno)); "socket_bind/2 (getsockname: %s)", strerror(socket_errno));
@ -853,7 +853,7 @@ p_socket_accept(void)
len = sizeof(struct sockaddr_un)+107; len = sizeof(struct sockaddr_un)+107;
memset((void *)&caddr,(int) 0, len); memset((void *)&caddr,(int) 0, len);
if ((fd=accept(ofd, (struct sockaddr *)tmp, (unsigned int *)&len)) < 0) { if ((fd=accept(ofd, (struct sockaddr *)tmp, &len)) < 0) {
#if HAVE_STRERROR #if HAVE_STRERROR
Error(SYSTEM_ERROR, TermNil, Error(SYSTEM_ERROR, TermNil,
"socket_accept/3 (accept: %s)", strerror(socket_errno)); "socket_accept/3 (accept: %s)", strerror(socket_errno));
@ -874,7 +874,7 @@ p_socket_accept(void)
len = sizeof(caddr); len = sizeof(caddr);
memset((void *)&caddr,(int) 0, sizeof(caddr)); memset((void *)&caddr,(int) 0, sizeof(caddr));
if (invalid_socket_fd(fd=accept(ofd, (struct sockaddr *)&caddr, (unsigned int *)&len))) { if (invalid_socket_fd(fd=accept(ofd, (struct sockaddr *)&caddr, &len))) {
#if HAVE_STRERROR #if HAVE_STRERROR
Error(SYSTEM_ERROR, TermNil, Error(SYSTEM_ERROR, TermNil,
"socket_accept/3 (accept: %s)", strerror(socket_errno)); "socket_accept/3 (accept: %s)", strerror(socket_errno));