Add crowbar as a dependency for tests and run the ocamlformat linter

digestif.opam

@@ -50,6 +50,7 @@ depends: [
   "fpath"           {with-test}
   "rresult"         {with-test}
   "ocamlfind"       {with-test}
+  "crowbar"         {with-test}
 ]
 
 conflicts: [

fuzz/dune

@@ -0,0 +1,15 @@
+(rule
+ (copy# fuzz.ml fuzz_c.ml))
+
+(rule
+ (copy# fuzz.ml fuzz_ocaml.ml))
+
+(executable
+ (name fuzz_c)
+ (modules fuzz_c)
+ (libraries digestif.c crowbar))
+
+(executable
+ (name fuzz_ocaml)
+ (modules fuzz_ocaml)
+ (libraries digestif.ocaml crowbar))

src-ocaml/digestif.ml

@@ -125,7 +125,8 @@ module Unsafe (Hash : Hash) (D : Desc) = struct
   let unsafe_get = unsafe_get
 
   let get_into_bytes ctx ?(off = 0) buf =
-    if off < 0 || off >= Bytes.length buf then invalid_arg "offset out of bounds" ;
+    if off < 0 || off >= Bytes.length buf
+    then invalid_arg "offset out of bounds" ;
     if Bytes.length buf - off < digest_size
     then invalid_arg "destination too small" ;
     let raw = unsafe_get (Hash.dup ctx) in