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:
parent
bc9b7908cd
commit
721746bd64
@ -621,7 +621,7 @@ p_socket_bind(void)
|
||||
/* get the port number */
|
||||
unsigned int namelen;
|
||||
Term t;
|
||||
if (getsockname(fd, (struct sockaddr *)&saddr, (unsigned int *)&namelen) < 0) {
|
||||
if (getsockname(fd, (struct sockaddr *)&saddr, &namelen) < 0) {
|
||||
#if HAVE_STRERROR
|
||||
Error(SYSTEM_ERROR, TermNil,
|
||||
"socket_bind/2 (getsockname: %s)", strerror(socket_errno));
|
||||
@ -853,7 +853,7 @@ p_socket_accept(void)
|
||||
|
||||
len = sizeof(struct sockaddr_un)+107;
|
||||
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
|
||||
Error(SYSTEM_ERROR, TermNil,
|
||||
"socket_accept/3 (accept: %s)", strerror(socket_errno));
|
||||
@ -874,7 +874,7 @@ p_socket_accept(void)
|
||||
|
||||
len = 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
|
||||
Error(SYSTEM_ERROR, TermNil,
|
||||
"socket_accept/3 (accept: %s)", strerror(socket_errno));
|
||||
|
Reference in New Issue
Block a user