Selaa lähdekoodia

Add {$MODE Delphi} for FPC

PascalCoin 6 vuotta sitten
vanhempi
commit
5c43137347

+ 5 - 0
src/core/UPCOperationsBlockValidator.pas

@@ -30,6 +30,11 @@ interface
 
 {$I config.inc}
 
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
+
+
 Uses UThread, UAccounts, UPCOrderedLists, UBlockChain,
   {$IFNDEF FPC}System.Generics.Collections{$ELSE}Generics.Collections{$ENDIF};
 

+ 5 - 1
src/core/UPCOperationsSignatureValidator.pas

@@ -30,7 +30,11 @@ interface
 
 {$I config.inc}
 
-Uses UThread, UAccounts, UPCOrderedLists, UBlockChain,
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
+
+Uses Classes, UThread, UAccounts, UBlockChain,
   {$IFNDEF FPC}System.Generics.Collections{$ELSE}Generics.Collections{$ENDIF};
 
 type