anchor.diff:  #endif
       let typeMap = Dictionary<ProvidedTypeDefinition,TypeBuilder>(HashIdentity.Reference)
       let typeMapExtra = Dictionary<string,TypeBuilder>(HashIdentity.Structural)
  +    let uniqueLambdaTypeName = 
  +        let counter = ref 0
  +        fun () -> 
  +            let n = !counter 
  +            incr counter 
  +            sprintf "Lambda%d" n
  +
       member __.Assembly = assembly :> Assembly
       /// Emit the given provided type definitions into an assembly and adjust 'Assembly' property of all type definitions to return that
       /// assembly.
  
positive.code:                 if m.MemberType = MemberTypes.Constructor then
                      yield (m :?> ConstructorInfo) |]
      // Methods
      override this.GetMethodImpl(name, _bindingAttr, _binderBinder, _callConvention, _types, _modifiers) : MethodInfo = 
          let membersWithName = 
              [ for m in getMembers() do                
                  if m.MemberType.HasFlag(MemberTypes.Method) && m.Name = name then
                      yield  m ]
          match membersWithName with 
  
negative.code:                 [ for ctorArg in implictCtorArgs -> 
                        tb.DefineField(ctorArg.Name, convType ctorArg.ParameterType, FieldAttributes.Private) ]
              
              let rec emitLambda(callSiteIlg : ILGenerator, v : Quotations.Var, body : Quotations.Expr, freeVars : seq<Quotations.Var>, locals : Dictionary<_, LocalBuilder>) =
                  let lambda = assemblyMainModule.DefineType(uniqueLambdaTypeName(), TypeAttributes.Class)
                  let baseType = typedefof<FSharpFunc<_, _>>.MakeGenericType(v.Type, body.Type)
  