anchor.diff:          let input = "< fooBar /> < testTag />"
           let index, value, t = eatAt input 10
           value |> should equal "testTag"
  -        index |> should equal 23
  +        index |> should equal 24
           t |> should equal TagType.Single
   
       [<Test>]
  
positive.code:         let input = "< fooBar / >"
          let index, value, t = eat input
          value |> should equal "fooBar"
          index |> should equal 11
          t |> should equal TagType.Single
  
      [<Test>]
  
negative.code:         let input = " foo <testTag rest/> <hamEggs/>"
          let index, value, t = eat input
          value |> should equal "testTag"
          index |> should equal 20
          t |> should equal TagType.Single
  
      [<Test>]
  