From 51ddb708d3126bfa50746eb65083a6a61fb188d5 Mon Sep 17 00:00:00 2001 From: Pierre Boutillier Date: Tue, 5 Jun 2018 16:19:44 +0200 Subject: [PATCH] Fix ocaml-secp256k1 Scalar.const It happened to work by chance on 64bits but it was clearly wrong --- vendors/ocaml-secp256k1/src/internal.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/vendors/ocaml-secp256k1/src/internal.ml b/vendors/ocaml-secp256k1/src/internal.ml index 2a6756c90..ea52c48ea 100644 --- a/vendors/ocaml-secp256k1/src/internal.ml +++ b/vendors/ocaml-secp256k1/src/internal.ml @@ -75,7 +75,7 @@ module Scalar = struct external const : t -> int64 -> int64 -> int64 -> int64 -> int64 -> int64 -> int64 -> int64 -> unit = - "ml_secp256k1_fe_const_bytecode" "ml_secp256k1_fe_const" [@@noalloc] + "ml_secp256k1_scalar_const_bytecode" "ml_secp256k1_scalar_const" [@@noalloc] let const ?(d7=0L) ?(d6=0L) ?(d5=0L) ?(d4=0L) ?(d3=0L) ?(d2=0L) ?(d1=0L) ?(d0=0L) () = let buf = Cstruct.create size in