Skip to content

Commit d845e48

Browse files
committed
Remove IL bloat from this PR as per dotnet#5212
1 parent 41ddb08 commit d845e48

File tree

1 file changed

+14
-0
lines changed

1 file changed

+14
-0
lines changed

src/fsharp/FSharp.Core/prim-types.fs

Lines changed: 14 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1719,12 +1719,26 @@ namespace Microsoft.FSharp.Core
17191719
| null, _ -> false
17201720
| _, null -> false
17211721
| (:? (obj[]) as arr1), (:? (obj[]) as arr2) -> GenericEqualityObjArray er iec arr1 arr2
1722+
| _ ->
1723+
match xobj,yobj with
17221724
| (:? (byte[]) as arr1), (:? (byte[]) as arr2) -> GenericEqualityByteArray arr1 arr2
1725+
| _ ->
1726+
match xobj,yobj with
17231727
| (:? (int32[]) as arr1), (:? (int32[]) as arr2) -> GenericEqualityInt32Array arr1 arr2
1728+
| _ ->
1729+
match xobj,yobj with
17241730
| (:? (int64[]) as arr1), (:? (int64[]) as arr2) -> GenericEqualityInt64Array arr1 arr2
1731+
| _ ->
1732+
match xobj,yobj with
17251733
| (:? (char[]) as arr1), (:? (char[]) as arr2) -> GenericEqualityCharArray arr1 arr2
1734+
| _ ->
1735+
match xobj,yobj with
17261736
| (:? (float32[]) as arr1), (:? (float32[]) as arr2) -> GenericEqualitySingleArray er arr1 arr2
1737+
| _ ->
1738+
match xobj,yobj with
17271739
| (:? (float[]) as arr1), (:? (float[]) as arr2) -> GenericEqualityDoubleArray er arr1 arr2
1740+
| _ ->
1741+
match xobj,yobj with
17281742
| (:? System.Array as arr1), (:? System.Array as arr2) -> GenericEqualityArbArray er iec arr1 arr2
17291743
| _ -> raise (Exception "invalid logic - expected array")
17301744

0 commit comments

Comments
 (0)