#ifdef out label when not needed

svn: r1387
This commit is contained in:
Matthew Flatt 2005-11-23 20:49:35 +00:00
parent 08b681655c
commit 763f164580

View File

@ -1794,7 +1794,9 @@ tcp_listen(int argc, Scheme_Object *argv[])
id = origid;
#endif
#ifdef MZ_TCP_LISTEN_IPV6_ONLY_SOCKOPT
retry:
#endif
{
GC_CAN_IGNORE struct addrinfo *tcp_listen_addr, *addr;