anchor.diff:              loaded.GetOrAdd(baseName, fun _ -> let t, _, _ = Parsing.ParseSource baseName src in t)
           let getOrLoadPath fullPath =
               loaded.GetOrAdd(baseName, fun _ -> let t, _, _ = Parsing.ParseSource baseName (File.ReadAllText fullPath) in t)
  -        let reload fullPath =
  -            let src = File.ReadAllText fullPath
  -            let parsed, _, _ = Parsing.ParseSource baseName src
  -            loaded.AddOrUpdate(baseName, parsed, fun _ _ -> parsed)
           let requireResources = Dictionary(StringComparer.InvariantCultureIgnoreCase)
           fillWith |> Seq.iter (function
               | TemplateHole.Elt (n, d) when not (obj.ReferenceEquals(d, null)) ->
  
positive.code: 
      static let watchers = ConcurrentDictionary<string, FileSystemWatcher>()
  
      static let getTemplate baseName name (templates: IDictionary<_,_>) : Template =
          match templates.TryGetValue name with
          | false, _ -> failwithf "Template not defined: %s/%A" baseName name
  
negative.code:                                     NotifyFilter = (NotifyFilters.LastWrite ||| NotifyFilters.Security ||| NotifyFilters.FileName),
                                      EnableRaisingEvents = true)
                              let handler _ =
                                  reloader.Post(baseName, fullPath)
                              watcher.Changed.Add handler
                              watcher)
                          getOrLoadPath fullPath
  