anchor.diff:      and private visitBinding (Binding(_,kind,_,_,_,_,_,_,_,e,range,_) as b) =
           seq {
               match kind with
  -            | NormalBinding ->
  +            | SynBindingKind.NormalBinding ->
                   let r1 = b.RangeOfBindingSansRhs
                   let r2 = b.RangeOfBindingAndRhs
                   yield Range.endToEnd r1 r2
  -            | DoBinding ->
  +            | SynBindingKind.DoBinding ->
                   let doEnd = mkPos range.Start.Line (range.Start.Column + 2)
                   yield mkFileIndexRange range.FileIndex doEnd range.End
  -            | _ -> ()
  +            | SynBindingKind.StandaloneExpression -> 
  +                yield range
               yield! visitExpr e
           }
   
  
positive.code:                 yield! visitMatchClauses clauses
              | SynExpr.App (_, _, _, e, _) ->
                  yield! visitExpr e
              | SynExpr.CompExpr (_, _, e, r) ->
                  yield r
                  yield! visitExpr e
              | SynExpr.Sequential (_, _, e1, e2, _) ->
                  yield! visitExpr e1
                  yield! visitExpr e2
              | SynExpr.YieldOrReturn (_, e, _) ->
                  yield! visitExpr e
              | SynExpr.YieldOrReturnFrom (_, e, _) ->
                  yield! visitExpr e
              | SynExpr.ArrayOrListOfSeqExpr (_, e, _) ->
                  yield! visitExpr e
  
negative.code:                 yield! visitExpr e
              | SynExpr.Quote(_,isRaw,e,_,r) ->
                  // subtract columns so the @@> or @> is not collapsed
                  let rEnd = Range.mkPos r.End.Line (r.EndColumn-(if isRaw then 3 else 2)) 
                  yield mkFileIndexRange r.FileIndex r.Start rEnd
                  yield! visitExpr e
              | _ -> ()
  