X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/ffb12fba43635d1d31d7dd073cd4d1ea7d8f4ebd..71f094bad8c68b2a3d096b436dc74cf4d9e2895a:/dnsasync.pas

diff --git a/dnsasync.pas b/dnsasync.pas
index 68b5c1f..f9fa50e 100644
--- a/dnsasync.pas
+++ b/dnsasync.pas
@@ -7,7 +7,9 @@
 //not seem to have any form of retry code.
 
 unit dnsasync;
-
+{$ifdef fpc}
+  {$mode delphi}
+{$endif}
 interface
 
 uses