Free Pascal Improvements

viniciussanchez · Sep 8, 2021 · 30e856e · 30e856e
1 parent 870c9e2
commit 30e856e
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/src/BCrypt.Consts.pas b/src/BCrypt.Consts.pas
@@ -2,7 +2,7 @@
 
 interface
 
-uses System.Types;
+uses {$IFDEF FPC}Types{$ELSE}System.Types{$ENDIF};
 
 const
   BCRYPT_SALT_LEN = 16;

diff --git a/src/BCrypt.Core.pas b/src/BCrypt.Core.pas
@@ -2,7 +2,7 @@
 
 interface
 
-uses System.SysUtils, System.Classes, System.Types, System.StrUtils, System.Math, BCrypt.Types, BCrypt.Intf, BCrypt.Consts;
+uses {$IFDEF FPC}SysUtils, Classes, Types, StrUtils, Math{$ELSE}System.SysUtils, System.Classes, System.Types, System.StrUtils, System.Math{$ENDIF}, BCrypt.Types, BCrypt.Intf, BCrypt.Consts;
 
 type
   TBCryptImpl = class(TInterfacedObject, IBCrypt)

diff --git a/src/BCrypt.Types.pas b/src/BCrypt.Types.pas
@@ -2,7 +2,7 @@
 
 interface
 
-uses System.SysUtils;
+uses {$IFDEF FPC}SysUtils{$ELSE}System.SysUtils{$ENDIF};
 
 type
 {$SCOPEDENUMS ON}