gazagnaire.org / ocaml-bloom
Bloom filter for probabilistic membership testing
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

fix(lint): resolve E700 inline fuzz tests and E710 missing library module

Extract aos fuzz tests from fuzz.ml into fuzz_aos.ml with run()
convention. Remove unused fuzz_common.ml from bloom (no corresponding
library module).

Thomas Gazagnaire 8851c9b2 7800fd4c

+2 -16
+1 -1
fuzz/dune
··· 1 1 (executable 2 2 (name fuzz) 3 - (modules fuzz fuzz_common fuzz_bloom) 3 + (modules fuzz fuzz_bloom) 4 4 (libraries bloom crowbar)) 5 5 6 6 ; Quick check with Crowbar (no AFL instrumentation)
+1 -3
fuzz/fuzz.ml
··· 1 1 (** Main fuzz test entry point. *) 2 2 3 - let () = 4 - Fuzz_common.run (); 5 - Fuzz_bloom.run () 3 + let () = Fuzz_bloom.run ()
-12
fuzz/fuzz_common.ml
··· 1 - (** Common utilities for fuzz tests. *) 2 - 3 - let to_bytes buf = 4 - let len = String.length buf in 5 - let b = Bytes.create len in 6 - Bytes.blit_string buf 0 b 0 len; 7 - b 8 - 9 - let truncate ?(max_len = 4096) buf = 10 - if String.length buf > max_len then String.sub buf 0 max_len else buf 11 - 12 - let run () = ()