Sha256: 552991ce6ef62cc28d609d58e877289e7997e050d5fbbf92ff2e3afa9fdeab50
Contents?: true
Size: 1.98 KB
Versions: 57
Compression:
Stored size: 1.98 KB
Contents
// This file was auto-generated based on version 1.0.0 of the canonical data.
module RunLengthEncodingTest
open FsUnit.Xunit
open Xunit
open RunLengthEncoding
[<Fact>]
let ``Encode empty string`` () =
encode "" |> should equal ""
[<Fact(Skip = "Remove to run test")>]
let ``Encode single characters only are encoded without count`` () =
encode "XYZ" |> should equal "XYZ"
[<Fact(Skip = "Remove to run test")>]
let ``Encode string with no single characters`` () =
encode "AABBBCCCC" |> should equal "2A3B4C"
[<Fact(Skip = "Remove to run test")>]
let ``Encode single characters mixed with repeated characters`` () =
encode "WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWB" |> should equal "12WB12W3B24WB"
[<Fact(Skip = "Remove to run test")>]
let ``Encode multiple whitespace mixed in string`` () =
encode " hsqq qww " |> should equal "2 hs2q q2w2 "
[<Fact(Skip = "Remove to run test")>]
let ``Encode lowercase characters`` () =
encode "aabbbcccc" |> should equal "2a3b4c"
[<Fact(Skip = "Remove to run test")>]
let ``Decode empty string`` () =
decode "" |> should equal ""
[<Fact(Skip = "Remove to run test")>]
let ``Decode single characters only`` () =
decode "XYZ" |> should equal "XYZ"
[<Fact(Skip = "Remove to run test")>]
let ``Decode string with no single characters`` () =
decode "2A3B4C" |> should equal "AABBBCCCC"
[<Fact(Skip = "Remove to run test")>]
let ``Decode single characters with repeated characters`` () =
decode "12WB12W3B24WB" |> should equal "WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWB"
[<Fact(Skip = "Remove to run test")>]
let ``Decode multiple whitespace mixed in string`` () =
decode "2 hs2q q2w2 " |> should equal " hsqq qww "
[<Fact(Skip = "Remove to run test")>]
let ``Decode lower case string`` () =
decode "2a3b4c" |> should equal "aabbbcccc"
[<Fact(Skip = "Remove to run test")>]
let ``Encode followed by decode gives original string`` () =
"zzz ZZ zZ" |> encode |> decode |> should equal "zzz ZZ zZ"
Version data entries
57 entries across 57 versions & 1 rubygems