anchor.diff:              deps.Connect src (M.ResourceNode rT)
           match c.Kind with
           | V.JavaScriptConstructor e ->
  -            List.iter (deps.Connect src) (GetCalls e)
  +            List.iter (deps.Connect src) (getCalls e)
           | _ -> ()
       let visitMethod src (m: V.Method) =
           m.Requirements
  
positive.code:         | V.InlineModuleProperty i ->
              match i.Quotation with
              | None -> ()
              | Some e -> List.iter (deps.Connect src) (GetCalls e)
          | V.JavaScriptModuleProperty e ->
              List.iter (deps.Connect src) (GetCalls e)
          | _ -> ()
      let rec visitType assem ctx (t: V.Type) =
          let self =
  
negative.code: 
  /// Finds all outgoing calls, field accesses and
  /// constructor expressions in the quotation.
  let getCalls (expr: Q.Expression) =
      let rec f ds expr =
          match expr with
          | Q.Call (m, xs) ->
  