push 1

CryptoLib.Tests/FreePascal.Tests/CryptoLibConsole.lpr

@@ -4,32 +4,7 @@ program CryptoLibConsole;
 
 uses
   consoletestrunner,
-  Asn1SequenceParserTests, // pass x64, pass arm
-  DerApplicationSpecificTests, // pass x64, pass arm
-  EqualsAndHashCodeTests, // pass x64, pass arm
-  OIDTests, // pass x64, pass arm
-  BigIntegerTests, // pass x64, pass arm
- // ECAlgorithmsTests, // pass x64, arm stalling
- // ECPointTests, // pass x64, arm stalling
-  SecP384R1FieldTests, // pass x64, pass arm
- // ECDsa5Tests, // pass x64, arm stalling
- // ECTests, // pass x64, arm stalling
-  NamedCurveTests, // pass x64, pass arm, arm raises exception
-  ECSchnorrTests, // pass x64, pass arm, arm raises exception
-  SignerUtilitiesTests, // pass x64, pass arm, arm raises exception
-  SecureRandomTests, // pass x64, pass arm
-  DigestRandomNumberTests, // pass x64, pass arm
-  FixedPointTests, // pass x64, pass arm, arm raises exception
-  AESTests, // pass x64, pass arm
- BlockCipherVectorTests, // pass x64, pass arm
-  AESTestVectors,
-  IESCipherTests, // pass x64, pass arm, arm raises exception
-  AESSICTests, // pass x64, pass arm
-  MD5HMacTests, // pass x64, pass arm
- // HMacTests, // pass arm, x64 stalling
-  Pkcs5Tests, // pass x64, pass arm
-  ClpFixedSecureRandom,
-  ClpIFixedSecureRandom;
+  IESCipherTests; // pass x64, pass arm, arm raises exception
 
 type
 

CryptoLib/src/Asn1/Sec/ClpSecNamedCurves.pas

@@ -314,6 +314,7 @@ begin
     '79BE667EF9DCBBAC55A06295CE870B07029BFCDB2DCE28D959F2815B16F81798' +
     '483ADA7726A3C4655DA4FBFC0E1108A8FD17B448A68554199C47D08FFB10D4B8'));
 
+   raise Exception.Create(G.Point.ToString);
   result := TX9ECParameters.Create(curve, G, n, h, S);
 end;