Block device abstraction for OCaml 5 with Eio direct-style I/O and Bytesrw integration
fix(lint): flatten test suites to single tuple (E600) and fix broken renames
Change all test_*.mli to export val suite : string * unit Alcotest.test_case
list (singular tuple). Flatten multi-group test suites into single groups.
Fix incorrect v_* function renames in CLI call sites.
+26
-41
+1
-1
test/test.ml
+1
-1
test/test.ml
+23
-39
test/test_block.ml
+23
-39
test/test_block.ml
···
279
279
(Block.is_zero (String.make 511 '\x00' ^ "x"))
280
280
281
281
let suite =
282
-
[
283
-
( "memory",
284
-
[
285
-
Alcotest.test_case "basic" `Quick test_memory_basic;
286
-
Alcotest.test_case "read_write" `Quick test_memory_read_write;
287
-
Alcotest.test_case "bounds" `Quick test_memory_bounds;
288
-
Alcotest.test_case "negative sector" `Quick test_memory_negative_sector;
289
-
Alcotest.test_case "close" `Quick test_close;
290
-
] );
291
-
( "wrappers",
292
-
[
293
-
Alcotest.test_case "read_only" `Quick test_read_only;
294
-
Alcotest.test_case "sub" `Quick test_sub;
295
-
Alcotest.test_case "of_string" `Quick test_of_string;
296
-
] );
297
-
( "operations",
298
-
[
299
-
Alcotest.test_case "read_many" `Quick test_read_many;
300
-
Alcotest.test_case "fold" `Quick test_fold;
301
-
Alcotest.test_case "is_zero" `Quick test_is_zero;
302
-
Alcotest.test_case "zero" `Quick test_zero;
303
-
] );
304
-
( "compare",
305
-
[
306
-
Alcotest.test_case "equal" `Quick test_compare_equal;
307
-
Alcotest.test_case "different" `Quick test_compare_different;
308
-
] );
309
-
( "copy",
310
-
[
311
-
Alcotest.test_case "copy" `Quick test_copy;
312
-
Alcotest.test_case "sparse_copy" `Quick test_sparse_copy;
313
-
] );
314
-
( "crc32c",
315
-
[
316
-
Alcotest.test_case "roundtrip" `Quick test_crc32c;
317
-
Alcotest.test_case "corruption" `Quick test_crc32c_corruption;
318
-
] );
319
-
("file", [ Alcotest.test_case "roundtrip" `Quick test_file ]);
320
-
]
282
+
( "block",
283
+
[
284
+
Alcotest.test_case "memory basic" `Quick test_memory_basic;
285
+
Alcotest.test_case "memory read_write" `Quick test_memory_read_write;
286
+
Alcotest.test_case "memory bounds" `Quick test_memory_bounds;
287
+
Alcotest.test_case "memory negative sector" `Quick
288
+
test_memory_negative_sector;
289
+
Alcotest.test_case "memory close" `Quick test_close;
290
+
Alcotest.test_case "read_only" `Quick test_read_only;
291
+
Alcotest.test_case "sub" `Quick test_sub;
292
+
Alcotest.test_case "of_string" `Quick test_of_string;
293
+
Alcotest.test_case "read_many" `Quick test_read_many;
294
+
Alcotest.test_case "fold" `Quick test_fold;
295
+
Alcotest.test_case "is_zero" `Quick test_is_zero;
296
+
Alcotest.test_case "zero" `Quick test_zero;
297
+
Alcotest.test_case "compare equal" `Quick test_compare_equal;
298
+
Alcotest.test_case "compare different" `Quick test_compare_different;
299
+
Alcotest.test_case "copy" `Quick test_copy;
300
+
Alcotest.test_case "sparse_copy" `Quick test_sparse_copy;
301
+
Alcotest.test_case "crc32c roundtrip" `Quick test_crc32c;
302
+
Alcotest.test_case "crc32c corruption" `Quick test_crc32c_corruption;
303
+
Alcotest.test_case "file roundtrip" `Quick test_file;
304
+
] )