anchor.diff:                      fullName))
           |> Array.concat
   
  -    debug "Qualified symbols: %A" qualifiedSymbols
  +    //debug "Qualified symbols: %A" qualifiedSymbols
           
       let unusedOpenDeclarations: OpenDeclaration list =
           Array.foldBack (fun (symbolRange: Range.range, fullName) openDecls ->
  
positive.code:                                             modifiedIdents.[index] <- idents.[index] + "Module"
                                              modifiedIdents
                                          | None -> idents)
  
                                  { Idents = Set.ofList idents
                                    DeclRange = openStatementRange
                                    Range = (Range.mkRange openStatementRange.FileName openStatementRange.Start moduleRange.End) } :: acc 
                              | _ -> acc) [] 
  
negative.code: 
  [<NoComparison>]
  type OpenDeclaration =
      { Idents: Idents list
        DeclRange: Range.range
        Range: Range.range }
  
  type private Line = int
  
  let longIdentToArray (longIdent: LongIdent): Idents =
      longIdent |> List.map string |> List.toArray
  
  // If "what" span is entirely included in "from" span, then truncate "from" to the end of "what".
  // Example: for ReferenceType symbol "System.Diagnostics.DebuggerDisplay" there are "System", "Diagnostics" and "DebuggerDisplay"
  