Skip to content

Commit 3eb1db7

Browse files
committed
Add empty and isEmpty to IReadOnlyCollection
1 parent 884638a commit 3eb1db7

File tree

1 file changed

+4
-1
lines changed

1 file changed

+4
-1
lines changed

src/FSharpPlus/Extensions/IReadOnlyCollection.fs

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -5,8 +5,11 @@ namespace FSharpPlus
55
module IReadOnlyCollection =
66
open System.Collections.Generic
77

8+
[<GeneralizableValue>]
9+
let empty<'T> = [||] :> IReadOnlyCollection<'T>
810
let ofArray (source: 'T[] ) = source :> IReadOnlyCollection<'T>
911
let ofList (source: 'T list) = source :> IReadOnlyCollection<'T>
1012
let ofSeq (source: seq<'T>) = source |> Array.ofSeq :> IReadOnlyCollection<'T>
1113
let map mapping (source: IReadOnlyCollection<'T>) = Seq.map mapping source |> Seq.toArray :> IReadOnlyCollection<'U>
12-
let iter mapping (source: IReadOnlyCollection<'T>) = Seq.iter mapping source
14+
let iter mapping (source: IReadOnlyCollection<'T>) = Seq.iter mapping source
15+
let isEmpty (source: IReadOnlyCollection<'T>) = source.Count = 0

0 commit comments

Comments
 (0)