Contents

open Core.Std
open OUnit2
open All_your_base

let option_printer = function
  | None -> "None"
  | Some xs -> "Some [" ^ String.concat ~sep:";" (List.map xs ~f:Int.to_string) ^ "]"

let ae exp got _test_ctxt =
  assert_equal exp got ~printer:option_printer

let tests = [
(* TEST
  "$description" >::
    ae $expected (convert_bases ~from:$input_base ~digits:$input_digits ~target:$output_base);
END TEST *)
]

let () =
  run_test_tt_main ("all-your-bases tests" >::: tests)

Version data entries

145 entries across 145 versions & 1 rubygems

Version	Path
trackler-2.0.5.0	tracks/ocaml/tools/test-generator/templates/all-your-base/template.ml
trackler-2.0.4.0	tracks/ocaml/tools/test-generator/templates/all-your-base/template.ml
trackler-2.0.3.9	tracks/ocaml/tools/test-generator/templates/all-your-base/template.ml
trackler-2.0.3.8	tracks/ocaml/tools/test-generator/templates/all-your-base/template.ml
trackler-2.0.3.7	tracks/ocaml/tools/test-generator/templates/all-your-base/template.ml