anchor.diff:          | "CLSCompliant"
           | "AssemblyDelaySign"
           | "ComVisible" -> 
  -          let found,value = bool.TryParse attr.Value
  -          if found then
  -            codeAttributeDeclaration.Arguments.Add(new CodeAttributeArgument(new CodePrimitiveExpression(value))) |> ignore
  -            codeCompileUnit.AssemblyCustomAttributes.Add(codeAttributeDeclaration) |> ignore
  +          match bool.TryParse attr.Value with
  +          | true,value ->
  +              codeAttributeDeclaration.Arguments.Add(codeAttrArg value) |> ignore
  +              codeCompileUnit.AssemblyCustomAttributes.Add(codeAttributeDeclaration) |> ignore
  +          | _ -> ()
           | _ -> 
  -            codeAttributeDeclaration.Arguments.Add(new CodeAttributeArgument(new CodePrimitiveExpression(attr.Value))) |> ignore
  +            codeAttributeDeclaration.Arguments.Add(codeAttrArg attr.Value) |> ignore
               codeCompileUnit.AssemblyCustomAttributes.Add(codeAttributeDeclaration) |> ignore
         String.Empty
           
  
positive.code:       
    codeCompileUnit.Namespaces.Add codeNamespace |> ignore
    
    let addString =
      match param.CodeLanguage with
      | FSharp      ->          
  
negative.code:              (fun attr ->
                 match bool.TryParse attr.Value with
                 | true, value -> sprintf "[<assembly: %s (%A)>]" attr.Key value
                 | _ -> sprintf "[<assembly: %s (\"%s\")>]" attr.Key attr.Value)
           |> separated "\n") + "\n()"        
      | _ ->  
        for attr in attributes do            
  