tracks/ocaml/exercises/change/test.ml in trackler-2.2.1.110 vs tracks/ocaml/exercises/change/test.ml in trackler-2.2.1.111

@@ -1,11 +1,11 @@
 (* Test/exercise version: "1.1.0" *)
 
-open Core
+open Base
 open OUnit2
 open Change
 
-let printer = Option.value_map ~default:"None" ~f:(List.to_string ~f:Int.to_string)
+let printer = Option.value_map ~default:"None" ~f:(fun xs -> String.concat ~sep:";" (List.map ~f:Int.to_string xs))
 let ae exp got _test_ctxt = assert_equal ~printer exp got
 
 let tests = [
    "single coin change" >::
      ae (Some [25]) 
\ No newline at end of file