X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/968c333d05db5d5ecf3599f8e304c67e64f21159..309429a3acfa50bd4e928b8a5728dc863e9c767b:/lcorelocalips.pas

diff --git a/lcorelocalips.pas b/lcorelocalips.pas
index d275012..8698a8c 100644
--- a/lcorelocalips.pas
+++ b/lcorelocalips.pas
@@ -36,7 +36,9 @@ notes:
 }
 
 unit lcorelocalips;
-
+{$ifdef fpc}
+  {$mode delphi}
+{$endif}
 interface
 
 uses binipstuff,pgtypes;
@@ -416,4 +418,4 @@ begin
 end;
 {$endif}
 
-end.
+end.
\ No newline at end of file