Skip to content

Commit 6a18c0c

Browse files
dsymedsyme
committed
Merge branch 'master' of https://github.com/Microsoft/visualfsharp into improve-1293
2 parents 4114238 + 47dd515 commit 6a18c0c

29 files changed

+1511
-1017
lines changed

‎src/fsharp/AugmentWithHashCompare.fs‎

Lines changed: 19 additions & 19 deletions
Original file line numberDiff line numberDiff line change
@@ -850,24 +850,24 @@ let TyconIsCandidateForAugmentationWithHash g tycon = TyconIsCandidateForAugment
850850
//-------------------------------------------------------------------------
851851

852852
let slotImplMethod (final,c,slotsig) : ValMemberInfo =
853-
{ ImplementedSlotSigs=[slotsig];
853+
{ ImplementedSlotSigs=[slotsig]
854854
MemberFlags=
855-
{ IsInstance=true;
856-
IsDispatchSlot=false;
857-
IsFinal=final;
858-
IsOverrideOrExplicitImpl=true;
859-
MemberKind=MemberKind.Member};
860-
IsImplemented=false;
855+
{ IsInstance=true
856+
IsDispatchSlot=false
857+
IsFinal=final
858+
IsOverrideOrExplicitImpl=true
859+
MemberKind=MemberKind.Member}
860+
IsImplemented=false
861861
ApparentParent=c}
862862

863863
let nonVirtualMethod c : ValMemberInfo =
864-
{ ImplementedSlotSigs=[];
865-
MemberFlags={ IsInstance=true;
866-
IsDispatchSlot=false;
867-
IsFinal=false;
868-
IsOverrideOrExplicitImpl=false;
869-
MemberKind=MemberKind.Member};
870-
IsImplemented=false;
864+
{ ImplementedSlotSigs=[]
865+
MemberFlags={ IsInstance=true
866+
IsDispatchSlot=false
867+
IsFinal=false
868+
IsOverrideOrExplicitImpl=false
869+
MemberKind=MemberKind.Member}
870+
IsImplemented=false
871871
ApparentParent=c}
872872

873873
let unitArg = ValReprInfo.unitArgData
@@ -945,7 +945,7 @@ let MakeBindingsForCompareAugmentation g (tycon:Tycon) =
945945
let thisv,thatv,comparee = comparef g tcref tycon
946946
mkLambdas m tps [thisv;thatv] (comparee,g.int_ty)
947947
[ // This one must come first because it may be inlined into the second
948-
mkCompGenBind vspec2 rhs2;
948+
mkCompGenBind vspec2 rhs2
949949
mkCompGenBind vspec1 rhs1; ]
950950
if tycon.IsUnionTycon then mkCompare mkUnionCompare
951951
elif tycon.IsRecordTycon || tycon.IsStructOrEnumTycon then mkCompare mkRecdCompare
@@ -1016,8 +1016,8 @@ let MakeBindingsForEqualityWithComparerAugmentation g (tycon:Tycon) =
10161016

10171017
mkLambdas m tps [thisv; unitv] (hashe,g.int_ty)
10181018

1019-
[(mkCompGenBind withcGetHashCodeVal.Deref withcGetHashCodeExpr) ;
1020-
(mkCompGenBind objGetHashCodeVal.Deref objGetHashCodeExpr) ;
1019+
[(mkCompGenBind withcGetHashCodeVal.Deref withcGetHashCodeExpr)
1020+
(mkCompGenBind objGetHashCodeVal.Deref objGetHashCodeExpr)
10211021
(mkCompGenBind withcEqualsVal.Deref withcEqualsExpr)]
10221022
if tycon.IsUnionTycon then mkStructuralEquatable mkUnionHashWithComparer mkUnionEqualityWithComparer
10231023
elif (tycon.IsRecordTycon || tycon.IsStructOrEnumTycon) then mkStructuralEquatable mkRecdHashWithComparer mkRecdEqualityWithComparer
@@ -1054,8 +1054,8 @@ let MakeBindingsForEqualsAugmentation g (tycon:Tycon) =
10541054
mkLambdas m tps [thisv;thatobjv] (equalse,g.bool_ty)
10551055

10561056

1057-
[ mkCompGenBind nocEqualsVal.Deref nocEqualsExpr;
1058-
mkCompGenBind objEqualsVal.Deref objEqualsExpr; ]
1057+
[ mkCompGenBind nocEqualsVal.Deref nocEqualsExpr
1058+
mkCompGenBind objEqualsVal.Deref objEqualsExpr ]
10591059
if tycon.IsExceptionDecl then mkEquals mkExnEquality
10601060
elif tycon.IsUnionTycon then mkEquals mkUnionEquality
10611061
elif tycon.IsRecordTycon || tycon.IsStructOrEnumTycon then mkEquals mkRecdEquality

‎src/fsharp/CompileOps.fs‎

Lines changed: 161 additions & 161 deletions
Large diffs are not rendered by default.

‎src/fsharp/CompileOptions.fs‎

Lines changed: 196 additions & 196 deletions
Large diffs are not rendered by default.

‎src/fsharp/ConstraintSolver.fs‎

Lines changed: 3 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1613,11 +1613,10 @@ and AddConstraint (csenv:ConstraintSolverEnv) ndeep m2 trace tp newConstraint =
16131613
// Record a entry in the undo trace if one is provided
16141614
let d = tp.Data
16151615
let orig = d.typar_constraints
1616-
begin match trace with
1616+
match trace with
16171617
| NoTrace -> ()
16181618
| WithTrace trace -> trace.Push (fun () -> d.typar_constraints <- orig)
1619-
end;
1620-
d.typar_constraints <- newConstraints;
1619+
d.typar_constraints <- newConstraints
16211620

16221621
CompleteD)))
16231622

@@ -2403,7 +2402,7 @@ let EliminateConstraintsForGeneralizedTypars csenv trace (generalizedTypars: Typ
24032402
let cxs = cxst.FindAll tpn
24042403
if isNil cxs then () else
24052404
cxs |> List.iter (fun cx ->
2406-
cxst.Remove tpn;
2405+
cxst.Remove tpn
24072406
match trace with
24082407
| NoTrace -> ()
24092408
| WithTrace trace -> trace.Push (fun () -> (csenv.SolverState.ExtraCxs.Add (tpn,cx))))

‎src/fsharp/DetupleArgs.fs‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -227,13 +227,13 @@ module GlobalUsageAnalysis =
227227
let logNonRecBinding z (bind:Binding) =
228228
let v = bind.Var
229229
let vs = FlatList.one v
230-
{z with RecursiveBindings = Zmap.add v (false,vs) z.RecursiveBindings;
230+
{z with RecursiveBindings = Zmap.add v (false,vs) z.RecursiveBindings
231231
Defns = Zmap.add v bind.Expr z.Defns }
232232

233233
/// Log the definition of a recursive binding
234234
let logRecBindings z binds =
235235
let vs = valsOfBinds binds
236-
{z with RecursiveBindings = (z.RecursiveBindings,vs) ||> FlatList.fold (fun mubinds v -> Zmap.add v (true,vs) mubinds);
236+
{z with RecursiveBindings = (z.RecursiveBindings,vs) ||> FlatList.fold (fun mubinds v -> Zmap.add v (true,vs) mubinds)
237237
Defns = (z.Defns,binds) ||> FlatList.fold (fun eqns bind -> Zmap.add bind.Var bind.Expr eqns) }
238238

239239
/// Work locally under a lambda of some kind
@@ -392,7 +392,7 @@ let rebuildTS g m ts vs =
392392
(x,ty),vs
393393

394394
let (x,_ty),vs = rebuild vs ts
395-
if vs.Length <> 0 then internalError "rebuildTS: had more fringe vars than fringe. REPORT BUG" else ();
395+
if vs.Length <> 0 then internalError "rebuildTS: had more fringe vars than fringe. REPORT BUG"
396396
x
397397

398398
/// CallPattern is tuple-structure for each argument position.
@@ -794,7 +794,7 @@ let passBind penv (TBind(fOrig,repr,letSeqPtOpt) as bind) =
794794
// fCBody - parts - formals
795795
let transformedFormals = trans.transformedFormals
796796
let p = transformedFormals.Length
797-
if (vss.Length < p) then internalError "passBinds: |vss|<p - detuple pass" else (); (* ASSERTION *)
797+
if (vss.Length < p) then internalError "passBinds: |vss|<p - detuple pass"
798798
let xqNs = List.drop p vss
799799
let x1ps = List.take p vss
800800
let y1Ps = List.concat (List.map2 transFormal transformedFormals x1ps)

‎src/fsharp/FSharp.Core.Unittests/FSharp.Core.Unittests.fsproj‎

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -120,6 +120,7 @@
120120
<None Include="FSharp.Core\Microsoft.FSharp.Core\IntConversionsTestGenerator.fsx" />
121121
<Compile Include="FSharp.Core\Microsoft.FSharp.Core\OptionModule.fs" />
122122
<Compile Include="FSharp.Core\Microsoft.FSharp.Core\PrintfTests.fs" />
123+
<Compile Include="FSharp.Core\Microsoft.FSharp.Core\ResultTests.fs" />
123124
<Compile Include="FSharp.Core\Microsoft.FSharp.Control\Cancellation.fs" />
124125
<Compile Include="FSharp.Core\Microsoft.FSharp.Control\AsyncType.fs" />
125126
<Compile Include="FSharp.Core\Microsoft.FSharp.Control\LazyType.fs" />

‎src/fsharp/FSharp.Core.Unittests/FSharp.Core/Microsoft.FSharp.Core/ResultTests.fs‎

Lines changed: 44 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,44 @@
1+
// Copyright (c) Microsoft Corporation. All Rights Reserved. Licensed under the Apache License, Version 2.0. See License.txt in the project root for license information.
2+
3+
// Various tests for:
4+
// Microsoft.FSharp.Core.Result
5+
6+
namespace FSharp.Core.Unittests.FSharp_Core.Microsoft_FSharp_Core
7+
8+
open System
9+
open FSharp.Core.Unittests.LibraryTestFx
10+
open NUnit.Framework
11+
12+
type EmailValidation=
13+
| Empty
14+
| NoAt
15+
16+
module Results=
17+
let bind f m = match m with Error e -> Error e | Ok x -> f x
18+
19+
open Results
20+
21+
[<TestFixture>]
22+
type ResultTests() =
23+
24+
let fail_if_empty email=
25+
if String.IsNullOrEmpty(email) then Error Empty else Ok email
26+
27+
let fail_if_not_at (email:string)=
28+
if (email.Contains("@")) then Ok email else Error NoAt
29+
30+
let validate_email =
31+
fail_if_empty
32+
>> bind fail_if_not_at
33+
34+
let test_validate_email email (expected:Result<string,EmailValidation>) =
35+
let actual = validate_email email
36+
Assert.AreEqual(expected, actual)
37+
38+
39+
[<Test>]
40+
member this.CanChainTogetherSuccessiveValidations() =
41+
test_validate_email "" (Error Empty)
42+
test_validate_email "something_else" (Error NoAt)
43+
test_validate_email "some@email.com" (Ok "some@email.com")
44+

‎src/fsharp/FSharp.Core.Unittests/SurfaceArea.Silverlight.2.0.fs‎

Lines changed: 63 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1821,6 +1821,69 @@ Microsoft.FSharp.Core.FSharpRef`1[T]: T get_contents()
18211821
Microsoft.FSharp.Core.FSharpRef`1[T]: Void .ctor(T)
18221822
Microsoft.FSharp.Core.FSharpRef`1[T]: Void set_Value(T)
18231823
Microsoft.FSharp.Core.FSharpRef`1[T]: Void set_contents(T)
1824+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean Equals(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
1825+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean Equals(System.Object)
1826+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
1827+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean IsError
1828+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean IsOk
1829+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean get_IsError()
1830+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean get_IsOk()
1831+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
1832+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 CompareTo(System.Object)
1833+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 CompareTo(System.Object, System.Collections.IComparer)
1834+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 GetHashCode()
1835+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 GetHashCode(System.Collections.IEqualityComparer)
1836+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 Tag
1837+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 get_Tag()
1838+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: System.String ToString()
1839+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: System.Type GetType()
1840+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: TError Item
1841+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: TError get_Item()
1842+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean Equals(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
1843+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean Equals(System.Object)
1844+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
1845+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean IsError
1846+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean IsOk
1847+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean get_IsError()
1848+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean get_IsOk()
1849+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
1850+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 CompareTo(System.Object)
1851+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 CompareTo(System.Object, System.Collections.IComparer)
1852+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 GetHashCode()
1853+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 GetHashCode(System.Collections.IEqualityComparer)
1854+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 Tag
1855+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 get_Tag()
1856+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: System.String ToString()
1857+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: System.Type GetType()
1858+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: T Item
1859+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: T get_Item()
1860+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Boolean Equals(System.Object)
1861+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Int32 Error
1862+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Int32 GetHashCode()
1863+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Int32 Ok
1864+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: System.String ToString()
1865+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: System.Type GetType()
1866+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean Equals(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
1867+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean Equals(System.Object)
1868+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
1869+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean IsError
1870+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean IsOk
1871+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean get_IsError()
1872+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean get_IsOk()
1873+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
1874+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 CompareTo(System.Object)
1875+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 CompareTo(System.Object, System.Collections.IComparer)
1876+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 GetHashCode()
1877+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 GetHashCode(System.Collections.IEqualityComparer)
1878+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 Tag
1879+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 get_Tag()
1880+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]
1881+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]
1882+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]
1883+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2[T,TError] NewError(TError)
1884+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2[T,TError] NewOk(T)
1885+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: System.String ToString()
1886+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: System.Type GetType()
18241887
Microsoft.FSharp.Core.FSharpTypeFunc: Boolean Equals(System.Object)
18251888
Microsoft.FSharp.Core.FSharpTypeFunc: Int32 GetHashCode()
18261889
Microsoft.FSharp.Core.FSharpTypeFunc: System.Object Specialize[T]()

‎src/fsharp/FSharp.Core.Unittests/SurfaceArea.net20.fs‎

Lines changed: 63 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -2000,6 +2000,69 @@ Microsoft.FSharp.Core.FSharpRef`1[T]: T get_contents()
20002000
Microsoft.FSharp.Core.FSharpRef`1[T]: Void .ctor(T)
20012001
Microsoft.FSharp.Core.FSharpRef`1[T]: Void set_Value(T)
20022002
Microsoft.FSharp.Core.FSharpRef`1[T]: Void set_contents(T)
2003+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean Equals(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
2004+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean Equals(System.Object)
2005+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
2006+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean IsError
2007+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean IsOk
2008+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean get_IsError()
2009+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Boolean get_IsOk()
2010+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
2011+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 CompareTo(System.Object)
2012+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 CompareTo(System.Object, System.Collections.IComparer)
2013+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 GetHashCode()
2014+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 GetHashCode(System.Collections.IEqualityComparer)
2015+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 Tag
2016+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: Int32 get_Tag()
2017+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: System.String ToString()
2018+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: System.Type GetType()
2019+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: TError Item
2020+
Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]: TError get_Item()
2021+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean Equals(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
2022+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean Equals(System.Object)
2023+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
2024+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean IsError
2025+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean IsOk
2026+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean get_IsError()
2027+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Boolean get_IsOk()
2028+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
2029+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 CompareTo(System.Object)
2030+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 CompareTo(System.Object, System.Collections.IComparer)
2031+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 GetHashCode()
2032+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 GetHashCode(System.Collections.IEqualityComparer)
2033+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 Tag
2034+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: Int32 get_Tag()
2035+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: System.String ToString()
2036+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: System.Type GetType()
2037+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: T Item
2038+
Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]: T get_Item()
2039+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Boolean Equals(System.Object)
2040+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Int32 Error
2041+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Int32 GetHashCode()
2042+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Int32 Ok
2043+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: System.String ToString()
2044+
Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: System.Type GetType()
2045+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean Equals(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
2046+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean Equals(System.Object)
2047+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
2048+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean IsError
2049+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean IsOk
2050+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean get_IsError()
2051+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean get_IsOk()
2052+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
2053+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 CompareTo(System.Object)
2054+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 CompareTo(System.Object, System.Collections.IComparer)
2055+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 GetHashCode()
2056+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 GetHashCode(System.Collections.IEqualityComparer)
2057+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 Tag
2058+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 get_Tag()
2059+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2+Error[T,TError]
2060+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2+Ok[T,TError]
2061+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]
2062+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2[T,TError] NewError(TError)
2063+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2[T,TError] NewOk(T)
2064+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: System.String ToString()
2065+
Microsoft.FSharp.Core.FSharpResult`2[T,TError]: System.Type GetType()
20032066
Microsoft.FSharp.Core.FSharpTypeFunc: Boolean Equals(System.Object)
20042067
Microsoft.FSharp.Core.FSharpTypeFunc: Int32 GetHashCode()
20052068
Microsoft.FSharp.Core.FSharpTypeFunc: System.Object Specialize[T]()

0 commit comments

Comments
 (0)