fix s-tcp.c