Browse Source

more refactoring.

Ugochukwu Mmaduekwe 8 years ago
parent
commit
202d8ca732
1 changed files with 6 additions and 6 deletions
  1. 6 6
      CryptoLib/src/Utils/Randoms/ClpOSRandom.pas

+ 6 - 6
CryptoLib/src/Utils/Randoms/ClpOSRandom.pas

@@ -66,11 +66,11 @@ type
     class function NoZeroes(data: TCryptoLibByteArray): Boolean; static; inline;
     class function NoZeroes(data: TCryptoLibByteArray): Boolean; static; inline;
 
 
   type
   type
-    WCCryptAcquireContextA = function(phProv: Pointer; pszContainer: LPCSTR;
+    TWCCryptAcquireContextA = function(phProv: Pointer; pszContainer: LPCSTR;
       pszProvider: LPCSTR; dwProvType: DWORD; dwFlags: DWORD): BOOL; stdcall;
       pszProvider: LPCSTR; dwProvType: DWORD; dwFlags: DWORD): BOOL; stdcall;
-    WCCryptReleaseContext = function(hProv: Pointer; dwFlags: DWORD)
+    TWCCryptReleaseContext = function(hProv: Pointer; dwFlags: DWORD)
       : BOOL; stdcall;
       : BOOL; stdcall;
-    WCCryptGenRandom = function(hProv: ULONG; dwLen: DWORD; pbBuffer: PBYTE)
+    TWCCryptGenRandom = function(hProv: ULONG; dwLen: DWORD; pbBuffer: PBYTE)
       : BOOL; stdcall;
       : BOOL; stdcall;
 
 
   class var
   class var
@@ -78,9 +78,9 @@ type
     FwinCryptOk: Int32; // Windows Random function available
     FwinCryptOk: Int32; // Windows Random function available
     FhProvider: ULONG; // Windows HCryptProvider Handle
     FhProvider: ULONG; // Windows HCryptProvider Handle
     FWinCryptHndl: THandle;
     FWinCryptHndl: THandle;
-    FWCCryptAcquireContextA: WCCryptAcquireContextA;
-    FWCCryptReleaseContext: WCCryptReleaseContext;
-    FWCCryptGenRandom: WCCryptGenRandom;
+    FWCCryptAcquireContextA: TWCCryptAcquireContextA;
+    FWCCryptReleaseContext: TWCCryptReleaseContext;
+    FWCCryptGenRandom: TWCCryptGenRandom;
 {$ELSE}
 {$ELSE}
     FunixCryptOk: Int32; // Unix Random /dev/urandom or /dev/random available
     FunixCryptOk: Int32; // Unix Random /dev/urandom or /dev/random available
     FStream: TFileStream;
     FStream: TFileStream;