From 59bc2a9528eb0eb53018cc1dc5d13040c74ea040 Mon Sep 17 00:00:00 2001 From: Vincent Hanquez Date: Mon, 1 Jun 2015 13:03:38 +0100 Subject: [PATCH] [tests] remove unnecessary binding in P256 --- tests/KAT_PubKey/P256.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/tests/KAT_PubKey/P256.hs b/tests/KAT_PubKey/P256.hs index e9ed142..9549564 100644 --- a/tests/KAT_PubKey/P256.hs +++ b/tests/KAT_PubKey/P256.hs @@ -132,7 +132,6 @@ tests = testGroup "P256" pe2 = ECC.pointMul curve (unP256 r2) curveGen pR = P256.toPoint (P256.scalarAdd (unP256Scalar r1) (unP256Scalar r2)) peR = ECC.pointAdd curve pe1 pe2 - (x,y) = P256.pointToIntegers (P256.pointAdd p1 p2) -- P256.pointToIntegers pR in propertyHold [ eqTest "p256" pR (P256.pointAdd p1 p2) , eqTest "ecc" peR (pointP256ToECC pR) ]