diff --git a/CryptoLib.Tests/src/Ocsp/OcspTests.pas b/CryptoLib.Tests/src/Ocsp/OcspTests.pas index 6d5dc43e..81af7b4a 100644 --- a/CryptoLib.Tests/src/Ocsp/OcspTests.pas +++ b/CryptoLib.Tests/src/Ocsp/OcspTests.pas @@ -170,6 +170,13 @@ procedure TOcspTest.SetUp; FRandom := TSecureRandom.Create(); FKeyPair := TCertTestUtilities.GenerateRsaKeyPair(1024); FSignerCert := TCertTestUtilities.GenerateRootCert(FKeyPair); + FRootCert := nil; + FInterCert := nil; + FEndCert := nil; + FRootKeyPair := nil; + FInterKeyPair := nil; + FEndKeyPair := nil; + FChainUtcNow := 0; end; function TOcspTest.SignerChain: TCryptoLibGenericArray;