anchor.diff:      if Result then
         RSA_Free(LRsa);
     finally
  -    BIO_free(LPubKeyBIO);
  -  end;
  -end;
  -
  -class function TRSA.VerifyPublicKey(const AKey: TBytes): Boolean;
  -var
  -  LPubKeyBIO: pBIO;
  +    BIO_free(LPubKeyBIO);
  +  end;
  +end;
  +
  +class function TRSA.VerifyPublicKey(const AKey: TBytes): Boolean;
  +var
  +  LPubKeyBIO: pBIO;
     LRsa: pRSA;
   begin
     LoadOpenSSL;
  
positive.code:   end;
  end;
  
  class function TRSA.Verify(const AInput, ASignature, AKey: TBytes;
    AAlg: TRSAAlgorithm): Boolean;
  var
    LPubKeyBIO: pBIO;
    LPubKey: pEVP_PKEY;
    LRsa: pRSA;
    LByte: string;
    LCtx: PEVP_MD_CTX;
    LSha: PEVP_MD;
  begin
  
negative.code: 
  initialization
    TRSA.FOpenSSLHandle := 0;
    TRSA._PEM_read_bio_RSA_PUBKEY := nil;
    TRSA._EVP_MD_CTX_create := nil;
    TRSA._EVP_MD_CTX_destroy := nil;
  
  end.
  