tracks/ocaml/tools/test-generator/templates/hamming/template.ml in trackler-2.0.3.2 vs tracks/ocaml/tools/test-generator/templates/hamming/template.ml in trackler-2.0.3.3
- old
+ new
@@ -18,13 +18,13 @@
String.to_list s |> List.map ~f
let hamdist a b = Hamming.hamming_distance (dna_of_string a) (dna_of_string b)
let tests = [
-(* GENERATED-CODE
+(* TEST
"$description" >::
ae $expected (hamdist "$strand1" "$strand2");
- END GENERATED-CODE *)
+ END TEST *)
]
let () =
run_test_tt_main ("hamming tests" >::: tests)