anchor.diff:      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 :: _ ->
  
positive.code:     Collection.assertEqual (srcToLineArray expectedSrc) (srcToLineArray actualSrc)
  
  [<Test>]
  let ``single-field record stub generation`` () =
      """
  type MyRecord = { Field1: int }
  let x: MyRecord = { }"""
  
negative.code: let x: MyRecord = { Field1 = failwith "" }"""
  
  [<Test>]
  let ``multiple-field typed record stub generation (1)`` () =
      """
  type MyRecord = {Field1: int; Field2: float; Field3: float}
  let x: MyRecord = { }"""
  