anchor.diff:                      yield! rcheck Scope.EnumCase Collapse.Below cr cr
                       yield! parseAttributes attrs
               | SynTypeDefnSimpleRepr.Record (_,fields,rr) ->
  -                yield! rcheck Scope.RecordDefn Collapse.Same rr rr //<| Range.modBoth rr 1 1
  +                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
  
positive.code:                 for t in types do
                      yield! parseTypeDefn t
              // Fold the attributes above a module
              | SynModuleDecl.NestedModule (SynComponentInfo.ComponentInfo (attrs,_,_,_,_,_,_,cmpRange),_, decls,_,_) ->
  //                cmpInfo.
                  // Outline the full scope of the module
                  let r = Range.endToEnd cmpRange decl.Range
                  yield! rcheck Scope.Module Collapse.Below decl.Range r
  
negative.code: 
      type private LineNum = int
      type private LineStr = string
      type private CommentType = SingleLine | XmlDoc
  
      [<NoComparison>]
      type private CommentList =
  