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:                   | MemberKind.PropertyGetSet
                    | MemberKind.PropertySet
                    | MemberKind.PropertyGet -> iIconGroupProperty, PropertyDecl
                  let lidShow, rangeMerge = 
                    match lid with 
                    | _thisVar::nm::_ -> (List.tail lid, nm.idRange) 
                    | hd::_ -> (lid, hd.idRange) 
                    | _ -> (lid, m)
                  [ createMemberLid(lidShow, kind, icon, unionRanges rangeMerge m, enclosingEntityKind, isAbstract) ]
              | SynPat.LongIdent(LongIdentWithDots(lid,_), _,_, _, _, _), _ -> 
                  [ createMemberLid(lid, FieldDecl, iIconGroupConstant, unionRanges (List.head lid).idRange m, enclosingEntityKind, isAbstract) ]
              | SynPat.Named (_,ident,_,_,r), _ ->
                  [ createMemberLid([ident], FieldDecl, iIconGroupConstant, r, enclosingEntityKind, isAbstract)]
              | _ -> []
  
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, _, _, _, _, _, _, _), _, _) ->
  