341 |
if (hostEntPtr != (struct hostent *) NULL) |
if (hostEntPtr != (struct hostent *) NULL) |
342 |
host = make_simple_string(hostEntPtr->h_name); |
host = make_simple_string(hostEntPtr->h_name); |
343 |
else host = address; |
else host = address; |
344 |
return list(3,address,host,small_fixnum(ntohs(peername.sin_port))); |
return list(3,address,host,make_fixnum(ntohs(peername.sin_port))); |
345 |
} else { |
} else { |
346 |
return Cnil; |
return Cnil; |
347 |
} |
} |
364 |
if (hostEntPtr != (struct hostent *) NULL) |
if (hostEntPtr != (struct hostent *) NULL) |
365 |
host = make_simple_string(hostEntPtr->h_name); |
host = make_simple_string(hostEntPtr->h_name); |
366 |
else host=address; |
else host=address; |
367 |
return list(3,address,host,small_fixnum(ntohs(sockname.sin_port))); |
return list(3,address,host,make_fixnum(ntohs(sockname.sin_port))); |
368 |
} else { |
} else { |
369 |
return Cnil; |
return Cnil; |
370 |
} |
} |