From ed1d49cbe548d9fb26a50f1b2381b693c3c01790 Mon Sep 17 00:00:00 2001
From: beware <beware@bircd.org>
Date: Fri, 22 Nov 2013 01:15:05 +0000
Subject: [PATCH] must free tdnswinasync in tdnsasync destructor

git-svn-id: file:///svnroot/lcore/trunk@126 b1de8a11-f9be-4011-bde0-cc7ace90066a
---
 dnsasync.pas | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/dnsasync.pas b/dnsasync.pas
index b6e8941..c13f6ab 100644
--- a/dnsasync.pas
+++ b/dnsasync.pas
@@ -109,6 +109,14 @@ begin
       setstate_request_init('',states[socketno]);
     end;
   end;
+
+  {$ifdef mswindows}
+  if assigned(dwas) then begin
+    dwas.release;
+    dwas := nil;
+  end;
+  {$endif}
+
   inherited destroy;
 end;
 
-- 
2.30.2