anchor.diff:  
               let scopeType =
                   match comment.Type with
  -                | Regular -> Scope.Comment
  +                | SingleLine -> Scope.Comment
                   | XmlDoc -> Scope.XmlDocComment
   
               let range = Range.mkRange "" (Range.mkPos (startLine + 1) startCol) (Range.mkPos (endLine + 1) endCol)
  
positive.code:             |> List.reduce Range.unionRanges
  
  
      /// Scope indicates the way a range/snapshot should be collapsed. |Scope.Scope.Same| is for a scope inside
      /// some kind of scope delimiter, e.g. `[| ... |]`, `[ ... ]`, `{ ... }`, etc.  |Scope.Below| is for expressions
      /// following a binding or the right hand side of a pattern, e.g. `let x = ...`
      type Collapse =
          | Below
          | Same
  
      type Scope =
          | Open
          | Namespace
  
negative.code:                     yield! rcheck Scope.EnumCase Collapse.Below cr cr
                      yield! parseAttributes attrs
              | SynTypeDefnSimpleRepr.Record (_,fields,rr) ->
                  yield! rcheck Scope.RecordDefn Collapse.Same rr rr 
                  for SynField.Field (attrs,_,_,_,_,_,_,fr) in fields do
                      yield! rcheck Scope.RecordField Collapse.Below fr fr
                      yield! parseAttributes attrs
  