X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/52411bfabda0c0700608f9a1b057eacdb9535781..2f03297fba2a10dbc860018fac7ad07c83b08ce8:/dnswin.pas?ds=inline diff --git a/dnswin.pas b/dnswin.pas index 9f66cda..e9c2a16 100755 --- a/dnswin.pas +++ b/dnswin.pas @@ -233,7 +233,7 @@ var getnameinforesult : integer; begin - makeinaddrv(ip,'1',sa); + makeinaddrv(ip,'1',sa); populateprocvars; setlength(result,1025); getnameinforesult := getnameinfo(@sa,sizeof(tinetsockaddrv),pchar(result),length(result),nil,0,0);