ligo/src/lib_base/context_hash.ml
2018-02-08 17:23:29 +01:00

19 lines
906 B
OCaml

(**************************************************************************)
(* *)
(* Copyright (c) 2014 - 2018. *)
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
(* *)
(* All rights reserved. No warranty, explicit or implicit, provided. *)
(* *)
(**************************************************************************)
include Blake2B.Make (Tezos_crypto.Base58) (struct
let name = "Context_hash"
let title = "A hash of context"
let b58check_prefix = Tezos_crypto.Base58.Prefix.context_hash
let size = None
end)
let () =
Tezos_crypto.Base58.check_encoded_prefix b58check_encoding "Co" 52