let rec private processToken (token : Token) (context : BuilderContext) (nextTokens :Token list) =
        //do smth
        processNextToken nextTokens newContext

    and private processNextToken (tokens : Token list) (context : BuilderContext) =
        match tokens with
          | [] -> ()
          | h::t -> processToken h context t