@@ -1141,24 +1141,28 @@ module MoreTests =
11411141 test " test3932g" ( isMeth <@ ClassOneArg.TestStaticMethodTwoArgs( 3 , 4 ) @>)
11421142
11431143 test " test3932qA" ( isPropGet <@ ClassOneArg( 3 ) .TestInstanceProp @>)
1144+ // Disabled, see https://github.com/fsharp/fsharp/issues/517
1145+ (*
11441146 test "test3932qB" (isPropGet <@ ClassOneArg(3).TestInstanceIndexProp(4) @>)
11451147 test "test3932qC" (isPropSet <@ ClassOneArg(3).TestInstanceSettableIndexProp(4) <- 5 @>)
11461148 test "test3932qD" (isPropSet <@ ClassOneArg(3).TestInstanceSettableIndexProp2(4,5) <- 6 @>)
11471149 test "test3932q77" (match <@ ClassOneArg(3).TestInstanceSettableIndexProp2(4,5) <- 6 @> with
11481150 | PropertySet(Some _, _, [Int32(4); Int32(5)], Int32(6)) -> true
11491151 | _ -> false)
1152+ *)
11501153
11511154 test " test3932wA" ( isMeth <@ ClassOneArg( 3 ) .TestInstanceMethodNoArgs() @>)
11521155 test " test3932wB" ( isMeth <@ ClassOneArg( 3 ) .TestInstanceMethodOneArg( 3 ) @>)
11531156 test " test3932e" ( isMeth <@ ClassOneArg( 3 ) .TestInstanceMethodTwoArgs( 3 , 4 ) @>)
11541157
11551158 test " test3932q1" ( isPropSet <@ ClassOneArg( 3 ) .Setter <- 3 @>)
1156- test " test3932q2" ( isPropGet <@ ClassOneArg( 3 ) .GetterIndexer( 3 ) @>)
1157- test " test3932q3" ( isPropGet <@ ClassOneArg( 3 ).[ 3 ] @>)
1158- test " test3932q4" ( isPropGet <@ ClassOneArg( 3 ) .TupleGetterIndexer(( 3 , 4 )) @>)
1159- test " test3932q5" ( isPropSet <@ ClassOneArg( 3 ) .SetterIndexer( 3 ) <- 3 @>)
1160- test " test3932q61" ( isPropSet <@ ClassOneArg( 3 ).[ 3 ] <- 3 @>)
1161- test " test3932q62" ( match <@ ClassOneArg( 3 ).[ 4 ] <- 5 @> with PropertySet( Some _,_, [ Int32( 4 )], Int32( 5 )) -> true | _ -> false )
1159+ // Disabled, see https://github.com/fsharp/fsharp/issues/517
1160+ // test "test3932q2" (isPropGet <@ ClassOneArg(3).GetterIndexer(3) @>)
1161+ // test "test3932q3" (isPropGet <@ ClassOneArg(3).[3] @>)
1162+ // test "test3932q4" (isPropGet <@ ClassOneArg(3).TupleGetterIndexer((3,4)) @>)
1163+ // test "test3932q5" (isPropSet <@ ClassOneArg(3).SetterIndexer(3) <- 3 @>)
1164+ // test "test3932q61" (isPropSet <@ ClassOneArg(3).[3] <- 3 @>)
1165+ // test "test3932q62" (match <@ ClassOneArg(3).[4] <- 5 @> with PropertySet(Some _,_, [Int32(4)], Int32(5)) -> true | _ -> false)
11621166 test " test3932q7" ( isPropSet <@ ClassOneArg( 3 ) .TupleSetter <- ( 3 , 4 ) @>)
11631167
11641168
@@ -1167,18 +1171,22 @@ module MoreTests =
11671171
11681172 printfn " res = %A " <@ ClassNoArg.TestStaticSettableProp <- 5 @>
11691173 test " test3932q63" ( match <@ ClassNoArg.TestStaticSettableProp <- 5 @> with PropertySet( None, _, [], Int32( 5 )) -> true | _ -> false )
1170- test " test3932q64" ( match <@ ClassNoArg.TestStaticSettableIndexProp( 4 ) <- 5 @> with PropertySet( None, _, [ Int32( 4 )], Int32( 5 )) -> true | _ -> false )
1174+ // Disabled, see https://github.com/fsharp/fsharp/issues/517
1175+ // test "test3932q64" (match <@ ClassNoArg.TestStaticSettableIndexProp(4) <- 5 @> with PropertySet(None, _, [Int32(4)], Int32(5)) -> true | _ -> false)
11711176 test " test3932r" ( isMeth <@ ClassNoArg.TestStaticMethodOneArg( 3 ) @>)
11721177 test " test3932r" ( isMeth <@ ClassNoArg.TestStaticMethodOneTupledArg(( 3 , 2 )) @>)
11731178 test " test3932r" ( isMeth <@ ClassNoArg.TestStaticMethodOneTupledArg( p) @>)
11741179 test " test3932t" ( isMeth <@ ClassNoArg.TestStaticMethodNoArgs() @>)
11751180 test " test3932y" ( isMeth <@ ClassNoArg.TestStaticMethodTwoArgs( 3 , 4 ) @>)
11761181
11771182 test " test3932u" ( isPropGet <@ ClassNoArg() .TestInstanceProp @>)
1183+ // Disabled, see https://github.com/fsharp/fsharp/issues/517
1184+ (*
11781185 test "test3932u" (isPropGet <@ ClassNoArg().TestInstanceIndexProp(4) @>)
11791186 test "test3932q65" (match <@ ClassNoArg().TestInstanceIndexProp(4) @> with PropertyGet(Some _, _, [(Int32(4))]) -> true | _ -> false)
11801187 test "test3932u" (isPropSet <@ ClassNoArg().TestInstanceSettableIndexProp(4) <- 5 @>)
11811188 test "test3932q66" (match <@ ClassNoArg().TestInstanceSettableIndexProp(4) <- 5 @> with PropertySet(Some _, _, [(Int32(4))], Int32(5)) -> true | _ -> false)
1189+ *)
11821190 test " test3932i" ( isMeth <@ ClassNoArg() .TestInstanceMethodNoArgs() @>)
11831191 test " test3932i" ( isMeth <@ ClassNoArg() .TestInstanceMethodOneArg( 3 ) @>)
11841192 test " test3932i" ( isMeth <@ ClassNoArg() .TestInstanceMethodOneTupledArg(( 3 , 4 )) @>)
@@ -1193,8 +1201,11 @@ module MoreTests =
11931201 test " test3932yg" ( isMeth <@ GenericClassNoArg< int>. TestStaticMethodTwoArgs( 3 , 4 ) @>)
11941202
11951203 test " test3932ug" ( isPropGet <@ ( GenericClassNoArg< int>()) .TestInstanceProp @>)
1204+ // Disabled, see https://github.com/fsharp/fsharp/issues/517
1205+ (*
11961206 test "test3932ug" (isPropGet <@ (GenericClassNoArg<int>()).TestInstanceIndexProp(4) @>)
11971207 test "test3932ug" (match <@ (GenericClassNoArg<int>()).TestInstanceIndexProp(4) @> with PropertyGet(Some _, _, [Int32(4)]) -> true | _ -> false)
1208+ *)
11981209
11991210 test " test3932ig" ( isMeth <@ ( GenericClassNoArg< int>()) .TestInstanceMethodNoArgs() @>)
12001211 test " test3932ig" ( isMeth <@ ( GenericClassNoArg< int>()) .TestInstanceMethodOneArg( 3 ) @>)
@@ -1388,19 +1399,21 @@ module CheckRlectedMembers =
13881399 test " testReflect3932o" ( isMeth <@ ClassNoArg() .TestInstanceMethodTwoArgs( 3 , 4 ) @>)
13891400
13901401 test " testReflect3932q1" ( isPropSet <@ ClassOneArg( 3 ) .Setter <- 3 @>)
1391- test " testReflect3932q2" ( isPropGet <@ ClassOneArg( 3 ) .GetterIndexer( 3 ) @>)
1392- test " testReflect3932q3" ( isPropGet <@ ClassOneArg( 3 ).[ 3 ] @>)
1393- test " testReflect3932q4" ( isPropGet <@ ClassOneArg( 3 ) .TupleGetterIndexer(( 3 , 4 )) @>)
1394- test " testReflect3932q5" ( isPropSet <@ ClassOneArg( 3 ) .SetterIndexer( 3 ) <- 3 @>)
1395- test " testReflect3932q6" ( isPropSet <@ ClassOneArg( 3 ).[ 3 ] <- 3 @>)
1402+ // Disabled, see https://github.com/fsharp/fsharp/issues/517
1403+ // test "testReflect3932q2" (isPropGet <@ ClassOneArg(3).GetterIndexer(3) @>)
1404+ // test "testReflect3932q3" (isPropGet <@ ClassOneArg(3).[3] @>)
1405+ // test "testReflect3932q4" (isPropGet <@ ClassOneArg(3).TupleGetterIndexer((3,4)) @>)
1406+ // test "testReflect3932q5" (isPropSet <@ ClassOneArg(3).SetterIndexer(3) <- 3 @>)
1407+ // test "testReflect3932q6" (isPropSet <@ ClassOneArg(3).[3] <- 3 @>)
13961408 test " testReflect3932q7" ( isPropSet <@ ClassOneArg( 3 ) .TupleSetter <- ( 3 , 4 ) @>)
13971409
13981410 test " testReflect3932q1x" ( isPropSet <@ ClassOneArgOuterAttribute( 3 ) .Setter <- 3 @>)
1399- test " testReflect3932q2x" ( isPropGet <@ ClassOneArgOuterAttribute( 3 ) .GetterIndexer( 3 ) @>)
1400- test " testReflect3932q3x" ( isPropGet <@ ClassOneArgOuterAttribute( 3 ).[ 3 ] @>)
1401- test " testReflect3932q4x" ( isPropGet <@ ClassOneArgOuterAttribute( 3 ) .TupleGetterIndexer(( 3 , 4 )) @>)
1402- test " testReflect3932q5x" ( isPropSet <@ ClassOneArgOuterAttribute( 3 ) .SetterIndexer( 3 ) <- 3 @>)
1403- test " testReflect3932q6x" ( isPropSet <@ ClassOneArgOuterAttribute( 3 ).[ 3 ] <- 3 @>)
1411+ // Disabled, see https://github.com/fsharp/fsharp/issues/517
1412+ // test "testReflect3932q2x" (isPropGet <@ ClassOneArgOuterAttribute(3).GetterIndexer(3) @>)
1413+ // test "testReflect3932q3x" (isPropGet <@ ClassOneArgOuterAttribute(3).[3] @>)
1414+ // test "testReflect3932q4x" (isPropGet <@ ClassOneArgOuterAttribute(3).TupleGetterIndexer((3,4)) @>)
1415+ // test "testReflect3932q5x" (isPropSet <@ ClassOneArgOuterAttribute(3).SetterIndexer(3) <- 3 @>)
1416+ // test "testReflect3932q6x" (isPropSet <@ ClassOneArgOuterAttribute(3).[3] <- 3 @>)
14041417 test " testReflect3932q7x" ( isPropSet <@ ClassOneArgOuterAttribute( 3 ) .TupleSetter <- ( 3 , 4 ) @>)
14051418
14061419 test " testReflect3932rg" ( isMeth <@ GenericClassNoArg< int>. TestStaticMethodOneArg( 3 ) @>)
@@ -1679,7 +1692,8 @@ module QuotationConstructionTests =
16791692 #else
16801693 check " vcknwwe099" ( Expr.PropertySet(<@@ ( new System.Windows.Forms.Form()) @@>, setof <@@ ( new System.Windows.Forms.Form()) .Text <- " 2" @@>, <@@ " 3" @@> )) <@@ ( new System.Windows.Forms.Form()) .Text <- " 3" @@>
16811694 #endif
1682- check " vcknwwe099" ( Expr.PropertySet(<@@ ( new Foo()) @@>, setof <@@ ( new Foo()).[ 3 ] <- 1 @@>, <@@ 2 @@> , [ <@@ 3 @@> ] )) <@@ ( new Foo()).[ 3 ] <- 2 @@>
1695+ // Disabled, see https://github.com/fsharp/fsharp/issues/517
1696+ // check "vcknwwe099" (Expr.PropertySet(<@@ (new Foo()) @@>, setof <@@ (new Foo()).[3] <- 1 @@>, <@@ 2 @@> , [ <@@ 3 @@> ] )) <@@ (new Foo()).[3] <- 2 @@>
16831697#if FSHARP_ CORE_ 31
16841698#else
16851699 check " vcknwwe0qq1" ( Expr.QuoteRaw(<@ " 1" @>)) <@@ <@@ " 1" @@> @@>
@@ -2003,6 +2017,8 @@ module TestQuotationOfCOnstructors =
20032017 | _ -> false )
20042018
20052019
2020+ // Disabled, see https://github.com/fsharp/fsharp/issues/517
2021+ (*
20062022module IndexedPropertySetTest =
20072023 open System
20082024 open Microsoft.FSharp.Quotations
@@ -2037,6 +2053,7 @@ module IndexedPropertySetTest =
20372053 else printfn "Test KO."
20382054
20392055 do testExprPropertySet ()
2056+ *)
20402057
20412058
20422059
0 commit comments