Sha256: bfb14570e9058be2961ec1a41473ebe407c5bfe4aa16d27f6c256973a27b8429
Contents?: true
Size: 477 Bytes
Versions: 154
Compression:
Stored size: 477 Bytes
Contents
(* version 1.1.0 *)
use "testlib.sml";
use "two-fer.sml";
infixr |>
fun x |> f = f x
val testsuite =
describe "two-fer" [
test "no name given"
(fn _ => name (NONE) |> Expect.equalTo "One for you, one for me."),
test "a name given"
(fn _ => name (SOME "Alice") |> Expect.equalTo "One for Alice, one for me."),
test "another name given"
(fn _ => name (SOME "Bob") |> Expect.equalTo "One for Bob, one for me.")
]
val _ = Test.run testsuite
Version data entries
154 entries across 154 versions & 1 rubygems