Explorar o código

Update UAccounts.pas

Add status checker while multithread validator is working
PascalCoin %!s(int64=6) %!d(string=hai) anos
pai
achega
71c868aa57
Modificáronse 1 ficheiros con 5 adicións e 0 borrados
  1. 5 0
      src/core/UAccounts.pas

+ 5 - 0
src/core/UAccounts.pas

@@ -2823,6 +2823,11 @@ begin
               end;
               if (LAddToMultiThreadOperationsBlockValidator) then begin
                 LPCOperationsBlockValidator.AddToValidate(block.blockchainInfo);
+                LPCOperationsBlockValidator.GetStatus(LValidatedOPOk, LValidatedOPError, LValidatedOPPending);
+                if LValidatedOPError>0 then begin
+                  LPCOperationsBlockValidator.FillErrors(errors);
+                  Exit;
+                end;
               end;
             {$IFDEF TESTNET}
             end;