anchor.diff:            match assemblyTableFwd.TryGetValue(assembly) with
             | true, newT -> newT
             | false, _ ->
  -            let tgtAssembly = ProvidedAssembly(true, assembly.GetName(), assembly.Location) 
  -
  -            for (types, enclosingGeneratedTypeNames) in assembly.GetTheTypes() do 
  +            let tgtAssembly = ProvidedAssembly(true, assembly.GetName(), assembly.Location, K(convCustomAttributesDataToTgt(assembly.GetCustomAttributesData())))
  +
  +            for (types, enclosingGeneratedTypeNames) in assembly.GetTheTypes() do
                   let typesT = Array.map convProvidedTypeDefToTgt types
                   tgtAssembly.AddTheTypes (typesT, enclosingGeneratedTypeNames) 
   
  
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
  