X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/21410d99e1361e5474a47bb0bd0bc6e939f91b7d..7b8a26e75924ecff47d3e347eb4e2685656c728e:/btime.pas

diff --git a/btime.pas b/btime.pas
index ff77de9..8218e64 100644
--- a/btime.pas
+++ b/btime.pas
@@ -9,7 +9,9 @@ works on windows/delphi, and on freepascal on unix.
 
 
 unit btime;
-
+{$ifdef fpc}
+  {$mode delphi}
+{$endif}
 interface
 
 {$ifdef mswindows}
@@ -105,9 +107,7 @@ var
 
 implementation
 
-{$ifdef fpc}
-  {$mode delphi}
-{$endif}
+
 
 uses
   {$ifdef UNIX}