diff --git a/lib_test/test_angstrom.ml b/lib_test/test_angstrom.ml index aaadfd1..7ce5ac5 100644 --- a/lib_test/test_angstrom.ml +++ b/lib_test/test_angstrom.ml @@ -33,7 +33,6 @@ let check_lc ?size ~msg p is r = check_ok ?size ~msg Alcotest.(list char) p let check_co ?size ~msg p is r = check_ok ?size ~msg Alcotest.(option char) p is r let check_s ?size ~msg p is r = check_ok ?size ~msg Alcotest.string p is r let check_bs ?size ~msg p is r = check_ok ?size ~msg Alcotest.bigstring p is r -let check_ls ?size ~msg p is r = check_ok ?size ~msg Alcotest.(list string) p is r let check_int ?size ~msg p is r = check_ok ?size ~msg Alcotest.int p is r let bigstring_of_string s = Bigstringaf.of_string s ~off:0 ~len:(String.length s) @@ -189,7 +188,6 @@ module Endian(Es : EndianBigstring) = struct } let uint16 = { int16 with name = "uint16"; min = 0; max = 65535 } - let uint32 = { int32 with name = "uint32" } let dump actual size value = let buf = Bigstringaf.of_string ~off:0 ~len:size (String.make size '\xff') in