empty array singleton table

xamarin · Jun 2, 2018 · c4ef4ad · c4ef4ad
1 parent 205f5cf
commit c4ef4ad
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/fsharp/FSharp.Core/array.fs b/src/fsharp/FSharp.Core/array.fs
@@ -74,8 +74,12 @@ namespace Microsoft.FSharp.Collections
             if array.Length = 0 then invalidArg "array" (SR.GetString(SR.notEnoughElements))            
             Microsoft.FSharp.Primitives.Basics.Array.subUnchecked 1 (array.Length - 1) array
 
+        type EmptyArray<'T>() = 
+            static let empty = ([| |] : 'T [])
+            static member Empty = empty
+
         [<CompiledName("Empty")>]
-        let empty<'T> : 'T [] = [| |]
+        let empty<'T> : 'T [] = EmptyArray.Empty
 
         [<CodeAnalysis.SuppressMessage("Microsoft.Naming","CA1704:IdentifiersShouldBeSpelledCorrectly")>]
         [<CompiledName("CopyTo")>]