anchor.diff:  
   let toml_tablekey = (pTableKey .>> tskipRestOfLine) 
   
  -
  -
  -
  -
  -pTableImpl := 
  -    (pTableKey .>> tskipRestOfLine).>>. (many toml_item)
  -
  -pArrOfTablesImpl :=
  -    many ((pArrayOfTablesKey .>> tskipRestOfLine) .>>. many toml_item)
  +pTableImpl       := (pTableKey .>> tskipRestOfLine).>>. (many toml_item)
  +pArrOfTablesImpl := many ((pArrayOfTablesKey .>> tskipRestOfLine) .>>. many toml_item)
   
   (*
       Rewrite parser to split on 
  
positive.code: (*| Whitespace/Comment/LineEnd AKA Skip Parsers |*)
  
  /// toml approved whitespace is ' ' or '\t'
  let ws               = isAnyOf [' ';'\t']
  let skip_toml_spaces = skipManySatisfy ws
  let skip_tspcs       = skip_toml_spaces
  let skipComment      = skipChar '#' >>. skipRestOfLine  true
  let tskipRestOfLine  = skipComment <|>  skipRestOfLine  true
  let tskipper         = skipMany (choice [skip_tspcs; tskipRestOfLine])
  
  
  (*| Punctuation Parsers |*)
  
negative.code: (*| Key Parsers |*)
  
  // key formats
  let pBareKey          : Parser<_> = many1Satisfy (isDigit|?|isLetter|?|isAnyOf['_';'-']) 
  let pQuoteKey         : Parser<_> = between ``"`` ``"`` (many1Chars anyChar) 
  // key in a collection
  let toml_key          : Parser<_> = (choice [pBareKey; pQuoteKey ]) .>> skip_tspcs
  // toplevel keys
  let pTableKey         : Parser<_> = between ``[``   ``]`` (sepBy toml_key ``.``)
  let pArrayOfTablesKey : Parser<_> = between ``[[`` ``]]`` (sepBy toml_key ``.``)
  
  
  