X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/f3321a0eafbeda0e8ebfb420974d391d7904ed44..5ed1983da18c780d8252c2211f10fe58ae11ae93:/dnssync.pas?ds=inline diff --git a/dnssync.pas b/dnssync.pas index d037a68..60af580 100644 --- a/dnssync.pas +++ b/dnssync.pas @@ -71,6 +71,7 @@ implementation {$i unixstuff.inc} +type tdnsstatearr=array[0..numsock-1] of tdnsstate; {$ifdef syncdnscore} @@ -98,9 +99,6 @@ begin {$endif} end; - -type tdnsstatearr=array[0..numsock-1] of tdnsstate; - procedure resolveloop(timeout:integer;var state:tdnsstatearr;numsockused:integer); var selectresult : integer;