getmem(output.ai_addr,sizeof(tlinetsockaddr4));\r
if servname <> nil then output.ai_addr.InAddr.port := htons(strtoint(servname)) else output.ai_addr.InAddr.port := 0;\r
output.ai_addr.InAddr.addr := longint(addrlist^^);\r
- inc(integer(addrlist),4);\r
+ inc(taddrint(addrlist),4);\r
output.ai_flags := 0;\r
output.ai_family := af_inet;\r
output.ai_socktype := 0;\r