anchor.diff:  // Copyright (c) 2017 Theodore Tsirpanis
  -// 
  +//
   // This software is released under the MIT License.
   // https://opensource.org/licenses/MIT
   
  
positive.code:                 match newDFA with
                  | Some dfa ->
                      match dfa.AcceptSymbol with
                      | Some x -> impl state newPos dfa (Some x) currPos xs
                      | None -> impl state newPos dfa lastAccept lastAccPos xs
                  | None ->
                      match lastAccept with
                      | Some x -> state |> getLookAheadBuffer lastAccPos |> newToken x
                      | None -> state |> getLookAheadBuffer 1u |> newToken Symbol.Error 
          3.1415926535897932384626433
  
negative.code:     let consumeBuffer n = state {
          let! len = getOptic ParserState.InputStream_ <!> eval (List.length())
          let consumeSingle = state {
              let! x = getOptic (ParserState.InputStream_ >-> List.head_)
              match x with
              | Some x ->
                  do! mapOptic ParserState.InputStream_ List.tail // We know that the list has items here.
  