anchor.diff:                          |> Seq.toArray
                           :> seq<_>
               let scripts, styles, meta = getSeparateResourcesAndScripts env controls
  +            let tpl = getPageTemplate'.Value (defaultArg root ".") ()
               if tpl.Holes |> Seq.exists (fun h -> let h = h.ToUpperInvariant() in h = STYLES || h = META) then
                   extra.[SCRIPTS] <- Seq.singleton (XS.CDataNode scripts :> _)
                   extra.[STYLES] <- Seq.singleton (XS.CDataNode styles :> _)
  
positive.code:             t().Run(value)
  
          member this.CheckPageTemplate(root: string) =
              ignore (getPageTemplate'.Value root ())
  
          member this.Run(env: Env, x: Async<'T>, ?root: string) : Async<XS.Element> =
              let tpl = getPageTemplate'.Value (defaultArg root ".") ()
              let controls = Queue(controls)
              let extra = Dictionary()
              async {
  
negative.code:             Template(getBasicTemplate, getPageTemplate, Map.add name h holes, controls)
  
          member this.Compile(root) =
              getBasicTemplate holes (defaultArg root ".")
              |> ignore
              this
  
  