Browse Source

name fixes

Ugochukwu Mmaduekwe 6 years ago
parent
commit
6c46333c42

+ 0 - 43
CryptoLib/src/Interfaces/ClpIValidityPrecompInfo.pas

@@ -1,43 +0,0 @@
-{ *********************************************************************************** }
-{ *                              CryptoLib Library                                  * }
-{ *                Copyright (c) 2018 - 20XX Ugochukwu Mmaduekwe                    * }
-{ *                 Github Repository <https://github.com/Xor-el>                   * }
-
-{ *  Distributed under the MIT software license, see the accompanying file LICENSE  * }
-{ *          or visit http://www.opensource.org/licenses/mit-license.php.           * }
-
-{ *                              Acknowledgements:                                  * }
-{ *                                                                                 * }
-{ *      Thanks to Sphere 10 Software (http://www.sphere10.com/) for sponsoring     * }
-{ *                           development of this library                           * }
-
-{ * ******************************************************************************* * }
-
-(* &&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& *)
-
-unit ClpIValidityPreCompInfo;
-
-{$I ..\Include\CryptoLib.inc}
-
-interface
-
-uses
-  ClpIPreCompInfo;
-
-type
-  IValidityPreCompInfo = interface(IPreCompInfo)
-
-    ['{2339F5CA-A4B3-4E95-B358-4D4F4CA97EB3}']
-
-    function HasFailed(): Boolean;
-    procedure ReportFailed();
-    function HasCurveEquationPassed(): Boolean;
-    procedure ReportCurveEquationPassed();
-    function HasOrderPassed(): Boolean;
-    procedure ReportOrderPassed();
-
-  end;
-
-implementation
-
-end.

+ 0 - 95
CryptoLib/src/Math/EC/Multiplier/ClpValidityPrecompInfo.pas

@@ -1,95 +0,0 @@
-{ *********************************************************************************** }
-{ *                              CryptoLib Library                                  * }
-{ *                Copyright (c) 2018 - 20XX Ugochukwu Mmaduekwe                    * }
-{ *                 Github Repository <https://github.com/Xor-el>                   * }
-
-{ *  Distributed under the MIT software license, see the accompanying file LICENSE  * }
-{ *          or visit http://www.opensource.org/licenses/mit-license.php.           * }
-
-{ *                              Acknowledgements:                                  * }
-{ *                                                                                 * }
-{ *      Thanks to Sphere 10 Software (http://www.sphere10.com/) for sponsoring     * }
-{ *                           development of this library                           * }
-
-{ * ******************************************************************************* * }
-
-(* &&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& *)
-
-unit ClpValidityPreCompInfo;
-
-{$I ..\..\..\Include\CryptoLib.inc}
-
-interface
-
-uses
-  ClpIPreCompInfo,
-  ClpIValidityPreCompInfo;
-
-type
-  TValidityPreCompInfo = class(TInterfacedObject, IPreCompInfo,
-    IValidityPreCompInfo)
-
-  strict private
-
-  var
-    Ffailed, FcurveEquationPassed, ForderPassed: Boolean;
-
-  public
-
-    const
-    PRECOMP_NAME = 'bc_validity';
-
-    function HasFailed(): Boolean; inline;
-    procedure ReportFailed(); inline;
-    function HasCurveEquationPassed(): Boolean; inline;
-    procedure ReportCurveEquationPassed(); inline;
-    function HasOrderPassed(): Boolean; inline;
-    procedure ReportOrderPassed(); inline;
-
-    constructor Create();
-
-  end;
-
-implementation
-
-{ TValidityPreCompInfo }
-
-constructor TValidityPreCompInfo.Create;
-begin
-  Inherited Create();
-  Ffailed := False;
-  FcurveEquationPassed := False;
-  ForderPassed := False;
-end;
-
-function TValidityPreCompInfo.HasCurveEquationPassed: Boolean;
-begin
-  result := FcurveEquationPassed;
-end;
-
-function TValidityPreCompInfo.HasFailed: Boolean;
-begin
-  result := Ffailed;
-end;
-
-function TValidityPreCompInfo.HasOrderPassed: Boolean;
-begin
-  result := ForderPassed;
-end;
-
-procedure TValidityPreCompInfo.ReportCurveEquationPassed;
-begin
-  FcurveEquationPassed := True;
-end;
-
-procedure TValidityPreCompInfo.ReportFailed;
-begin
-  Ffailed := True;
-end;
-
-procedure TValidityPreCompInfo.ReportOrderPassed;
-begin
-  ForderPassed := True;
-end;
-
-end.