tracks/ocaml/tools/test-generator/templates/ocaml/etl/test.ml in trackler-2.2.1.116 vs tracks/ocaml/tools/test-generator/templates/ocaml/etl/test.ml in trackler-2.2.1.117

@@ -1,11 +1,9 @@
-open Core
 open OUnit2
 open Etl
 
 let ae exp got _test_ctxt =
-  let sexpr_of l = List.sexp_of_t (Tuple2.sexp_of_t Char.sexp_of_t Int.sexp_of_t) l in
-  let printer l = Sexp.to_string (sexpr_of l) in
+  let printer xs = String.concat ";" (List.map (fun (ch, n) -> Printf.sprintf "(%c,%d)" ch n) xs) in
   assert_equal exp got ~printer
 
 let tests = [
 (* TEST
    "$description" >::