anchor.diff:              (Binding(_, _, _, _, _, _, SynValData(memebrOpt, _, _), synPat, _, synExpr, _, _)) =
   
               let m = match synExpr with 
  -                    | SynExpr.Typed(e, _, _) -> e.Range // fix range for properties with type annotations
  -                    | _ -> synExpr.Range
  +                    | SynExpr.Typed(e, _, _) -> Some e.Range // fix range for properties with type annotations
  +                    | _ -> None
               match synPat, memebrOpt with
               | SynPat.LongIdent(LongIdentWithDots(lid,_), _,_, _, _, _), Some(flags) when isMember -> 
                   let icon, kind =
  
positive.code:             |> Array.map (fun (d, idx, nest) -> 
                  let nest = nest |> Array.ofList |> Array.map (fun (decl, idx) -> decl.WithUniqueName(uniqueName d.Name idx))
                  nest |> Array.sortInPlaceWith (fun a b -> compare a.Name b.Name)
                  { Declaration = d.WithUniqueName(uniqueName d.Name idx); Nested = nest } )                  
          items |> Array.sortInPlaceWith (fun a b -> compare a.Declaration.Name b.Declaration.Name)
          new FSharpNavigationItems(items)
  
negative.code:                 match memb with
                  | SynMemberDefn.LetBindings(binds, _, _, _) -> List.collect (processBinding false enclosingEntityKind false) binds
                  | SynMemberDefn.Member(bind, _) -> processBinding true enclosingEntityKind false bind
                  | SynMemberDefn.ValField(Field(_, _, Some(rcid), _, _, _, _, _), _) ->
                      [ createMember(rcid, FieldDecl, iIconGroupFieldBlue, rcid.idRange, enclosingEntityKind, false) ]
                  | SynMemberDefn.AutoProperty(_attribs,_isStatic,id,_tyOpt,_propKind,_,_xmlDoc,_access,_synExpr, _, _) -> 
                      [ createMember(id, FieldDecl, iIconGroupFieldBlue, id.idRange, enclosingEntityKind, false) ]
                  | SynMemberDefn.AbstractSlot(ValSpfn(_, id, _, ty, _, _, _, _, _, _, _), _, _) ->
  