anchor.diff:    do namespaces |> Seq.iter (config.Namespaces.Add >> ignore)
     do config.BaseTemplateType <- typedefof<DocPageTemplateBase<_>>
     do config.Debug <- true 
  -  let templateservice = new MyTemplateService(config)
  +  let razorEngine = RazorEngineService.Create(config)
   
     let handleCompile source f =
       try
  
positive.code:     with get() = StringDictionary(defaultArg (x.tryGetViewBagValue<IDictionary<string, string>> "Properties") (dict []))
      and set (value:StringDictionary) = x.trySetViewBagValue<IDictionary<string, string>> "Properties" value.Dictionary
  
    member x.Root = x.Properties.["root"]   
    member x.RenderPart(name, model:obj) = 
      if x.TemplateService.Resolve(name, model) = null then
          let templateContent = (x.TemplateService :?> MyTemplateService).Resolver.Resolve(name)
          x.TemplateService.Compile(templateContent, model.GetType(), name)
      x.TemplateService.Run(name, model, null)
  
negative.code:         Log.run (fun () ->
            use _c = Log.colored ConsoleColor.Red
            printfn "\nProcessing the file '%s' failed\nSource written to: '%s'\nCompilation errors:" source csharp
            for error in ex.CompilerErrors do
              let errorType = if error.IsWarning then "warning" else "error"
              printfn " - %s: (%d, %d) %s" errorType error.Line error.Column error.ErrorText
            printfn ""
  