X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/ffb12fba43635d1d31d7dd073cd4d1ea7d8f4ebd..3bf8ed9f9545a956985b6c3c0658893910e01f75:/dnsasync.pas?ds=inline

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