From 71e708830df2057dd6a939a56bd1cde0beca0676 Mon Sep 17 00:00:00 2001
From: Julien Tesson <julien.tesson@tezcore.com>
Date: Tue, 16 Oct 2018 15:38:12 +0200
Subject: [PATCH] lib_crypto: export neuterize and public_key equality

---
 src/lib_crypto/crypto_box.ml  | 2 ++
 src/lib_crypto/crypto_box.mli | 3 +++
 2 files changed, 5 insertions(+)

diff --git a/src/lib_crypto/crypto_box.ml b/src/lib_crypto/crypto_box.ml
index c38b98183..f3379eee7 100644
--- a/src/lib_crypto/crypto_box.ml
+++ b/src/lib_crypto/crypto_box.ml
@@ -208,3 +208,5 @@ let secret_key_encoding =
 
 let nonce_encoding =
   Data_encoding.Fixed.bytes nonce_size
+let neuterize : secret_key -> public_key = Box.neuterize
+let equal : public_key -> public_key -> bool = Box.equal
diff --git a/src/lib_crypto/crypto_box.mli b/src/lib_crypto/crypto_box.mli
index 409e56548..4dc912df3 100644
--- a/src/lib_crypto/crypto_box.mli
+++ b/src/lib_crypto/crypto_box.mli
@@ -92,3 +92,6 @@ val secret_key_size : int
 val public_key_encoding : public_key Data_encoding.t
 val secret_key_encoding : secret_key Data_encoding.t
 val nonce_encoding : nonce Data_encoding.t
+
+val neuterize : secret_key -> public_key
+val equal : public_key -> public_key -> bool