Sha256: b7748a4700afa71312ab4d93511cd2914a1150b226b138abd324fced7dd83028

Contents?: true

Size: 998 Bytes

Versions: 20

Compression:

Stored size: 998 Bytes

Contents

open Core.Std
open OUnit2
open Word_count

module SMap = String.Map

let ae exp got _test_ctxt =
  let printer m = SMap.sexp_of_t Int.sexp_of_t m |> Sexp.to_string_hum ~indent:1 in
  assert_equal (SMap.of_alist_exn exp) got ~cmp:(SMap.equal (=)) ~printer

let tests =
  ["one word">::
     ae [("word", 1)] (word_count "word");
   "one of each">::
     ae [("one", 1); ("of", 1); ("each", 1)] (word_count "one of each");
   "multiple occurences">::
     ae [("one", 1); ("fish", 4); ("two", 1); ("red", 1); ("blue", 1)]
       (word_count "one fish two fish red fish blue fish");
   "ignore punctuation">::
     ae [("car", 1); ("carpet", 1); ("as", 1); ("java", 1); ("javascript", 1)]
       (word_count "car : carpet@as'java : javascript!!&@$%^&");
   "include numbers">::
     ae [("testing", 2); ("1", 1); ("2", 1)]
       (word_count "testing, 1, 2 testing");
   "normalize case">::
     ae [("go", 3)] (word_count "go Go GO");
  ]

let () =
  run_test_tt_main ("word_count tests" >::: tests)

Version data entries

20 entries across 20 versions & 1 rubygems

Version Path
trackler-2.0.0.9 tracks/ocaml/exercises/word-count/test.ml
trackler-2.0.0.8 tracks/ocaml/exercises/word-count/test.ml
trackler-2.0.0.7 tracks/ocaml/exercises/word-count/test.ml
trackler-2.0.0.6 tracks/ocaml/exercises/word-count/test.ml
trackler-2.0.0.5 tracks/ocaml/exercises/word-count/test.ml
trackler-2.0.0.4 tracks/ocaml/exercises/word-count/test.ml
trackler-2.0.0.3 tracks/ocaml/exercises/word-count/test.ml
trackler-2.0.0.2 tracks/ocaml/exercises/word-count/test.ml
trackler-2.0.0.1 tracks/ocaml/exercises/word-count/test.ml
trackler-2.0.0.0 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.4.1 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.4.0 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.3.0 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.2.1 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.2.0 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.1.2 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.1.1 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.1.0 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.0.1 tracks/ocaml/exercises/word-count/test.ml
trackler-1.0.0 tracks/ocaml/exercises/word-count/test.ml