2016-09-08 21:13:10 +04:00
|
|
|
(**************************************************************************)
|
|
|
|
(* *)
|
2018-02-06 00:17:03 +04:00
|
|
|
(* Copyright (c) 2014 - 2018. *)
|
2016-09-08 21:13:10 +04:00
|
|
|
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
|
|
|
|
(* *)
|
|
|
|
(* All rights reserved. No warranty, explicit or implicit, provided. *)
|
|
|
|
(* *)
|
|
|
|
(**************************************************************************)
|
|
|
|
|
2017-08-20 08:07:07 +04:00
|
|
|
(** Low-level byte array querying and manipulation.
|
|
|
|
|
|
|
|
Default layout for numeric operations is big-endian.
|
|
|
|
Little-endian operations in the LE submodule. **)
|
|
|
|
|
2018-05-10 13:12:19 +04:00
|
|
|
include module type of Bigstring
|
2018-02-13 20:30:25 +04:00
|
|
|
include Compare.S with type t := t
|
2016-09-08 21:13:10 +04:00
|
|
|
|
2018-05-10 13:12:19 +04:00
|
|
|
include EndianBigstring.EndianBigstringSig
|
|
|
|
module LE : EndianBigstring.EndianBigstringSig
|
2018-02-12 01:36:49 +04:00
|
|
|
|
2018-05-10 13:12:19 +04:00
|
|
|
val make : int -> char -> t
|
|
|
|
val of_hex : Hex.t -> t
|
|
|
|
val to_hex : t -> Hex.t
|