hacl-star-raw 0.7.1 · OCaml Package

module CI = Cstubs_internals

val _1_Hacl_Bignum_Base_mul_wide_add2_u32 : 
  Unsigned.uint32 ->
  Unsigned.uint32 ->
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  Unsigned.uint32

val _2_Hacl_Bignum_Base_mul_wide_add2_u64 : 
  Unsigned.uint64 ->
  Unsigned.uint64 ->
  Unsigned.uint64 ->
  ('a, 'b) CI.fatptr ->
  Unsigned.uint64

val _3_Hacl_Bignum_Convert_bn_from_bytes_be_uint64 : 
  Unsigned.uint32 ->
  bytes CI.ocaml ->
  ('a, 'b) CI.fatptr ->
  unit

val _4_Hacl_Bignum_Convert_bn_to_bytes_be_uint64 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  bytes CI.ocaml ->
  unit

val _5_Hacl_Bignum_Lib_bn_get_top_index_u32 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  Unsigned.uint32

val _6_Hacl_Bignum_Lib_bn_get_top_index_u64 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  Unsigned.uint64

val _7_Hacl_Bignum_Lib_bn_get_bits_u32 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  Unsigned.uint32 ->
  Unsigned.uint32 ->
  Unsigned.uint32

val _8_Hacl_Bignum_Lib_bn_get_bits_u64 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  Unsigned.uint32 ->
  Unsigned.uint32 ->
  Unsigned.uint64

val _9_Hacl_Bignum_Addition_bn_sub_eq_len_u32 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  Unsigned.uint32

val _10_Hacl_Bignum_Addition_bn_sub_eq_len_u64 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  Unsigned.uint64

val _11_Hacl_Bignum_Addition_bn_add_eq_len_u32 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  Unsigned.uint32

val _12_Hacl_Bignum_Addition_bn_add_eq_len_u64 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  Unsigned.uint64

val _13_Hacl_Bignum_Multiplication_bn_mul_u32 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  Unsigned.uint32 ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  unit

val _14_Hacl_Bignum_Multiplication_bn_mul_u64 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  Unsigned.uint32 ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  unit

val _15_Hacl_Bignum_Multiplication_bn_sqr_u32 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  unit

val _16_Hacl_Bignum_Multiplication_bn_sqr_u64 : 
  Unsigned.uint32 ->
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  unit

type !'a result = 'a

type !'a return = 'a

type !'a1 fn =

| Returns : 'a CI.typ -> 'a return fn
| Function : 'a0 CI.typ * 'b fn -> ('a0 -> 'b) fn

val map_result : ('a -> 'b) -> 'a -> 'b

val returning : 'a CI.typ -> 'a return fn

val (@->) : 'a CI.typ -> 'b fn -> ('a -> 'b) fn

val foreign : string -> ('a -> 'b) fn -> 'a -> 'b

val foreign_value : string -> 'a Ctypes.typ -> 'a Ctypes.ptr

package hacl-star-raw