anchor.diff:              
               let readText() = 
                 Async.RunSynchronously <| async {
  -                  use! stream = asyncOpenStream (Some tp.Invalidate) resolver uri
  +                  use! stream = asyncOpenStream (Some (tp.Invalidate, tp.AddChild)) resolver uri
                     use reader = new StreamReader(stream)
                     return reader.ReadToEnd()
                 } 
  
positive.code:   /// * cfg -> the type provider config
    /// * resolutionFolder -> if the type provider allows to override the resolutionFolder pass it here
    let parseTextAtDesignTime sampleOrSampleUri parseFunc formatName
                              (tp:TypeProviderForNamespaces) (cfg:TypeProviderConfig) resolutionFolder =
    
        let tryGetUri str =
            match Uri.TryCreate(str, UriKind.RelativeOrAbsolute) with
  
negative.code:   /// * replaceer -> the assemblyReplacer
    /// * resolutionFolder -> if the type provider allows to override the resolutionFolder pass it here
    let generateConstructors formatName sampleOrSampleUri sampleIsList parseSingle parseList getSpecFromSamples
                             (tp:DisposableTypeProviderForNamespaces) (cfg:TypeProviderConfig) (replacer:AssemblyReplacer) resolutionFolder =
  
      let isRunningInFSI = cfg.IsHostedExecution
      let defaultResolutionFolder = cfg.ResolutionFolder
  