anchor.diff:      member x.TokenColumn = 
         let _, _, _, c = x.Token in c
       #endif
  +
  +  type P = State
  +  module S = Symbol
   
     (*
       Creates a string error snippet 
  
positive.code:     #if DEBUG
      with
      member x.TokenName = 
        let s, _, _, _ = x.Token in s |> S.getName
  
      member x.TokenValue = 
        let _, v, _, _ = x.Token in v
  
negative.code: 
      // It's just so much faster
      // to use mutable values 
      // then creating a new State
      // object for each token consumed
      mutable Token : Token
      mutable EndExpression : bool
  