anchor.diff:                          Seq.map toXml children
                           |> Seq.toArray
                           :> seq<_>
  -            extra.[keySM] <-
  +            extra.[SCRIPTS] <-
                   getResourcesAndScripts env controls
                   |> XS.CDataNode :> XS.INode
                   |> Seq.singleton
               tpl.Run {
  +                appPath = env.AppPath
                   extra = extra
                   value = x
               }
  
positive.code: 
      [<Sealed>]
      type Template<'T>(path: string, freq: Template.LoadFrequency, holes: Map<string,Hole<'T>>) =
          let keySM = "scripts"
          let pageTemplate =
              let mutable t = XT.Template<Wrapper<'T>>()
              for (KeyValue (k, v)) in holes do
                  match v with
                  | SH f -> t <- t.With(k, fun x -> f x.value)
                  | EH f -> t <- t.With(k, fun x -> x.extra.[k])
              t <- t.With(keySM, fun x -> x.extra.[keySM])
              t
          let basicTemplate =
              let mutable t = XT.CustomTemplate<HtmlElement,HtmlElement,'T>(CustomXml.Instance)
  
negative.code:         | H.TextContent x -> XS.TextNode x :> _
          | H.VerbatimContent x -> XS.CDataNode x :> _
          | H.CommentContent x -> XS.TextNode "" :> _
  
      [<Literal>]
      let SCRIPTS = "SCRIPTS"
  
      [<Literal>]
      let ROOT = "ROOT"
  
      module Template =
          type LoadFrequency =
  