anchor.diff:          member _.IsStructRecord = typeof<'Record>.IsValueType
           member _.IsAnonymousRecord = isAnonymousRecord
   
  -        member _.Fields = recordFields |> Array.map unbox
  +        member _.Fields = recordFields.Value |> Array.map unbox
           member s.Accept v = v.Visit s
   
   and IFSharpRecordVisitor<'R> =
  
positive.code:                 let fieldInfo = allFields |> Array.find (fun f -> f.Name = "_" + p.Name || f.Name.ToLower() = p.Name.ToLower())
                  mkWriteMemberUntyped<'Union> p.Name p [|fieldInfo|]
  
              Array.map mkUnionField properties
  
      /// Underlying FSharp.Reflection.UnionCaseInfo description
      member _.CaseInfo = uci
      /// Number of fields in the particular union case
      member _.Arity = properties.Length
      /// Field shapes for union case
      member _.Fields = caseFields
  
      /// Creates an uninitialized instance for specific union case
      [<MethodImpl(MethodImplOptions.AggressiveInlining)>]
  
negative.code:                 (argTypes : Type []) (returnType : Type)
                  (ilBuilder : ILGenerator -> unit) =
  
          let name = sprintf "%O-%s" typeof<'Delegate> id
          let dynamicMethod = new DynamicMethod(name, returnType, argTypes, typeof<Marker>, skipVisibility = true)
          let ilGen = dynamicMethod.GetILGenerator()
          do ilBuilder ilGen
          dynamicMethod.CreateDelegate typeof<'Delegate> :?> 'Delegate
  
      /// Emits a dynamic method that projects supplied member path
      let emitGetter<'DeclaringType, 'Property> (path : MemberInfo []) =
  