anchor.diff:          | Some tree ->
               let actualRanges =
                   getOutliningRanges tree
  -                |> Seq.filter (fun r -> r.StartLine <> r.EndLine)
  -                |> Seq.map (fun r -> r.StartLine, r.StartColumn, r.EndLine, r.EndColumn)
  +                |> Seq.filter (fun sr-> sr.Range.StartLine <> sr.Range.EndLine)
  +                |> Seq.map (fun r ->  r.Range.StartLine
  +                                    , r.Range.StartColumn
  +                                    , r.Range.EndLine
  +                                    , r.Range.EndColumn)
                   |> List.ofSeq
               CollectionAssert.AreEquivalent (List.sort expectedRanges, List.sort actualRanges)
           | None -> failwithf "Expected there to be a parse tree for source:\n%s" source
  
positive.code:         ()
      ()
  """
      => [ 3, 11, 4, 10
           7, 11, 8, 10 ]
negative.code:         foo()
          ()       // 8
  """
      => [ 2, 10,  8, 10
           3,  4,  4, 10
           3, 13,  4, 10
           6,  4,  8, 10 ]
  
  [<Test>]
  let ``complex outlining test``() =
  