anchor.diff:              theTypes.Add (ptds, enclosingTypeNames)
   
           let theTypesArray = lazy (theTypes.ToArray() |> Array.collect (function (ptds, None) -> Array.map (fun ptd -> (ptd :> Type)) ptds | _ -> [| |]))
  +        
  +        member __.AddCustomAttribute(attribute) = customAttributesImpl.AddCustomAttribute(attribute)
   
           override __.GetReferencedAssemblies() = [| |] //notRequired x "GetReferencedAssemblies" (assemblyName.ToString())
   
  
positive.code:             let ilg = context.ILGlobals
              let assemblyName = targetAssembly.GetName()
              let assemblyFileName = targetAssembly.Location
              let assemblyBuilder = ILAssemblyBuilder(assemblyName, assemblyFileName, ilg)
              let assemblyMainModule = assemblyBuilder.MainModule
  
              // Set the Assembly on the type definitions
  
negative.code:             } 
          override __.ToString() = "builder for " + moduleName
  
      type ILAssemblyBuilder(assemblyName: AssemblyName, fileName, ilg, attrs : ILCustomAttribute seq) =
          let cattrs = ResizeArray<ILCustomAttribute>(attrs)
          let manifest = 
              { Name = assemblyName.Name
                AuxModuleHashAlgorithm = 0x8004 // SHA1
                PublicKey = UNone
                Version = UNone
                Locale = UNone
                CustomAttrs = { new ILCustomAttrs with member __.Entries = cattrs.ToArray() }
                //AssemblyLongevity=ILAssemblyLongevity.Unspecified
                DisableJitOptimizations = false
                JitTracking = true
  