Home Explore Help
Sign In
pascal
/
CryptoLib4Pascal
mirror of https://github.com/Xor-el/CryptoLib4Pascal
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

minor update

Ugochukwu Mmaduekwe 6 years ago
parent
fc2728f61b
commit
5ae57a7b84
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      CryptoLib/src/Utils/Randoms/ClpOSRandom.pas

+ 1 - 1
CryptoLib/src/Utils/Randoms/ClpOSRandom.pas
View File 

@@ -494,7 +494,7 @@ begin
 
 
 
       got := LStream.Read(data^, MaxChunkSize);
 
       got := LStream.Read(data^, MaxChunkSize);
 
 
 
-      if (got <= 0) then
 
+      if (got = 0) then
 
       begin
 
       begin
 
         if ErrorNo = EINTR then
 
         if ErrorNo = EINTR then
 
         begin
 
         begin