Skip to content

Commit

Permalink
use right method in test
Browse files Browse the repository at this point in the history
  • Loading branch information
forki committed Jul 29, 2015
1 parent 68198d2 commit 0f7e06b
Showing 1 changed file with 3 additions and 3 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -64,9 +64,9 @@ let choose<'a when 'a : equality> (xs : 'a []) f =

[<Test>]
let ``choose is consistent`` () =
Check.QuickThrowOnFailure contains<int>
Check.QuickThrowOnFailure contains<string>
Check.QuickThrowOnFailure contains<float>
Check.QuickThrowOnFailure choose<int>
Check.QuickThrowOnFailure choose<string>
Check.QuickThrowOnFailure choose<float>

let chunkBySize<'a when 'a : equality> (xs : 'a []) size =
let s = run (fun () -> xs |> Seq.chunkBySize size |> Seq.map Seq.toArray |> Seq.toArray)
Expand Down

0 comments on commit 0f7e06b

Please sign in to comment.