Skip to content

Commit d821ab9

Browse files
committed
make tests pass
1 parent 0d8433e commit d821ab9

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

tests/service/ExprTests.fs

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -673,6 +673,7 @@ let ``Test expressions of declarations stress big expressions`` () =
673673
printDeclarations None (List.ofSeq file1.Declarations) |> Seq.toList |> ignore
674674

675675

676+
#if FX_ATLEAST_45
676677

677678
[<Test>]
678679
let ``Check use of type provider that provides calls to F# code`` () =
@@ -707,6 +708,7 @@ let ``Check use of type provider that provides calls to F# code`` () =
707708
"""member get_X13(this) (unitVar1) = let this: Microsoft.FSharp.Core.obj = ("My internal state" :> Microsoft.FSharp.Core.obj) :> ErasedWithConstructor.Provided.MyType in G`1<Microsoft.FSharp.Core.int>.DoNothingOneArg (3) @ (18,22--18,55)""";
708709
"""member get_X14(this) (unitVar1) = let this: Microsoft.FSharp.Core.obj = ("My internal state" :> Microsoft.FSharp.Core.obj) :> ErasedWithConstructor.Provided.MyType in G`1<Microsoft.FSharp.Core.int>.DoNothingTwoArg (new C(),3) @ (19,22--19,55)"""]
709710

711+
#endif
710712

711713
#if SELF_HOST_STRESS
712714

0 commit comments

Comments
 (0)