anchor.diff:  open FParsec
   open TomlFs.AST
   open TomlFs.Parsers
  -
  -type UserState  = unit 
  -type Parser<'t> = Parser<'t,UserState>
  -
  -open System.Runtime.CompilerServices
  -
  -
  -// TODO - Invesigate whether 
  -//  [<MethodImpl (MethodImplOptions.AggressiveInlining)>]
  -// makes a difference
  -
  -// TODO - Proper checks for `_` rules
  -
  -
  -let inline notChar (c1:char) (c2:char) = uint32 c1 <> uint32 c2
  -//let pBareKey: Parser<_> = many1CharsTill (digit<|>letter<|>``_``<|>``-``) unicodeSpaces1
  -//
  -////let pInt: Parser<_> = 
  -////    let firstDigit: Parser<_> = satisfy (notChar '0'|&|isDigit)
  -//    let signed: Parser<_>  = anyOf['+';'-'] >>. firstDigit
  -//    let intMid: Parser<_>  =  
  -
  -
   
   let date1 = "1979-05-27T07:32:00Z"
   let date2 = "1979-05-27T00:32:00-07:00"
  
positive.code: 
  """
  ;;
  
  
  
  
  printfn "toml 0"
  
negative.code: let date4 = "1979-05-27T07:32:00"
  let date5 = "1979-05-27T00:32:00.999999"
  let date6 = "1979-05-27"
  
  let int0 = "1_000"  
  let int1 = "5_349_221" 
  let int2 = "1_2_3_4_5" 
  let int3 = "0_2_3_4_5" 
  let int4 = "72345" 
  
  let flt0 = "9._224_617  .445_991_228_313"
  let flt1 = "+1.0"
  