anchor.diff:  // [x] Handle case when all fields are written
   // [x] Handle pattern: let x = { MyRecord1.Field1 = 0 }
   // [x] Handle pattern: let x = { Field1 = 0 }
  +// [x] Handle copy-and-update expression
  +// [ ] Handle record pattern maching: let { Field1 = _; Field2 = _ } = x
   // [ ] Add tests for SmartTag generation?
  -// [ ] Handle record pattern maching: let { Field1 = _; Field2 = _ } = x
  -// [ ] Handle copy-and-update expression
   
   open FSharpVSPowerTools
   open FSharpVSPowerTools.CodeGeneration
  
positive.code:     parseResults.ParseTree
      |> Option.bind (RecordStubGenerator.tryFindRecordBinding pos)
  
  let tokenizeLine (src: string) (lineIdx1: int) =
      let lines =
          src.Split('\n')
          |> Array.mapi (fun i line -> i, line)
          |> Map.ofArray
  
      let lineIdx0 = lineIdx1 - 1 
      let line = lines.[lineIdx0]
      Lexer.tokenizeLine src args (lineIdx0) line Lexer.queryLexState
  
  let tryGetLeftPosOfFirstRecordField (recordExprCategory: RecordBinding) =
      match recordExprCategory.FieldExpressionList with
      | fieldInfo :: _ ->
  
negative.code:     Collection.assertEqual (srcToLineArray expectedSrc) (srcToLineArray actualSrc)
  
  [<Test>]
  let ``single-field typed record stub generation`` () =
      """
  type MyRecord = { Field1: int }
  let x: MyRecord = { }"""
  