packcr 0.0.6 → 0.0.7

data/lib/packcr/tokenizer.rb

@@ -1,2948 +0,0 @@
-# A packrat parser generated by PackCR 0.0.5
-
-require "packcr"
-
-class Packcr::Tokenizer
-  def initialize(debug: false)
-    @buffer = +""
-
-    @pos = 0
-    @cur = 0
-    @level = 0
-    @lrstack = []
-    @thunk = ThunkNode.new([], nil, 0)
-    @lrtable = LrTable.new
-    @debug = debug
-    @global_values = {}
-    @parser_buffer = +""
-    @ifile = open(File.join(__dir__, "parser.rb.peg"))
-  end
-
-  def debug
-    yield if @debug
-  end
-
-  def getc
-    $stdin.getc
-  end
-
-  def refill_buffer(num, mode = nil)
-    len = @buffer.length
-    if len >= @cur + num
-      return len - @cur
-    end
-    while len < @cur + num
-      c = getc
-      break if !c
-      @buffer << c
-      len = @buffer.length
-    end
-    return len - @cur
-  end
-
-  def commit_buffer
-    @buffer = @buffer[@cur, @buffer.length - @cur]
-    @pos += @cur
-    @lrtable.clear
-    @cur = 0
-  end
-
-  def parse
-    pos = @pos
-    if apply_rule(:evaluate_rule_TOKEN, @thunk.thunks, nil, 0)
-      @thunk.do_action(self, nil, 0)
-    else
-      raise SyntaxError, "can't parse"
-    end
-    commit_buffer
-    @thunk.clear
-    refill_buffer(1) >= 1 && pos != @pos
-  end
-
-  def run
-    nil while parse
-  end
-
-  def action_COMMENT_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x01"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_ESOURCE_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x02"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_SOURCE_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x03"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_LHEADER_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x04"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_LSOURCE_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x05"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_HEADER_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x06"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_LOC_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x07"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_INIT_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x08"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_ECOMMON_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x09"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_COMMON_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x0a"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_VALUE_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x0b"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_AUXIL_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x0c"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_PREFIX_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x0d"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DIRECTIVE_CAPT_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x0e"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_LARROW_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x0f"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_RARROW_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x10"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_SLASH_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x11"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_CUT_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x12"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_ERROR_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x13"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_AND_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x14"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_BANG_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x15"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_MULT_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x16"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_PLUS_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x17"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_QUESTION_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x18"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_COLON_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x19"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DDOLLER_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x1a"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_NDOLLER_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    @parser_buffer << "\x1b"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_NDOLLER_1(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    ____ = __1.to_i
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_LPAREN_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x1c"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_RPAREN_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x1d"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_LT_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x1e"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_GT_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x1f"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_DOT_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x20"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_CHARCLASS_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    @parser_buffer << "\x21"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_CHARCLASS_1(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    ____ = __1
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_QUOTATION_SINGLE_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    @parser_buffer << "\x22"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_QUOTATION_SINGLE_1(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    ____ = __1
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_QUOTATION_DOUBLE_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    @parser_buffer << "\x23"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_QUOTATION_DOUBLE_1(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    ____ = __1
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_FOOTER_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    @parser_buffer << "\x24"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_IDENTIFIER_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    @parser_buffer << "\x25"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_IDENTIFIER_1(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    __1 = __pcc_in.capts[0].capture_string(@buffer)
-    __1s = @pos + __pcc_in.capts[0].range_start
-    __1e = @pos + __pcc_in.capts[0].range_end
-    ____ = __1
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_SPACES_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x26"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_LBRACE_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x27"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def action_RBRACE_0(__pcc_in, __pcc_vars, __pcc_index)
-    ____ = (__pcc_vars[__pcc_index] ||= Value.new).value if __pcc_vars
-    __0 = __pcc_in.capt0.capture_string(@buffer)
-    __0s = @pos + __pcc_in.capt0.range_start
-    __0e = @pos + __pcc_in.capt0.range_end
-    @parser_buffer << "\x28"
-
-    __pcc_vars[__pcc_index].value = ____ if __pcc_vars
-  end
-
-  def evaluate_rule_TOKEN
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    TOKEN #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      catch(1) do |; pos, p_loc, n|
-        pos = @cur
-        n = chunk.thunks.length
-        if apply_rule(:evaluate_rule_COMMENT, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_ESOURCE, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_SOURCE, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_LHEADER, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_LSOURCE, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_HEADER, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_LOC, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_INIT, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_ECOMMON, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_COMMON, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_VALUE, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_AUXIL, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_PREFIX, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DIRECTIVE_CAPT, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_LARROW, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_RARROW, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_SLASH, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_CUT, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_ERROR, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_AND, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_BANG, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_MULT, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_PLUS, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_QUESTION, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_COLON, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DDOLLER, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_NDOLLER, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_LPAREN, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_RPAREN, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_LT, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_GT, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_DOT, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_CHARCLASS, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_QUOTATION_SINGLE, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_QUOTATION_DOUBLE, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_FOOTER, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_IDENTIFIER, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_SPACES, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_LBRACE, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_RBRACE, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        throw(0)
-      end
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   TOKEN #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH TOKEN #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_COMMENT
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    COMMENT #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "#"
-      )
-        throw(0)
-      end
-      @cur += 1
-      1.times do |;p0, p0_loc, n0, i, pos, p_loc, n, stat|
-        i = 0
-        catch(1) do
-          pos = @cur
-          n = chunk.thunks.length
-          1.times do |;u, n|
-            if refill_buffer(1) < 1
-              throw(1)
-            end
-            u = @buffer[@cur]
-            if (
-              u == "\n"
-            )
-              throw(1)
-            end
-            @cur += 1
-          end
-          i += 1
-          if @cur != pos
-            redo
-          end
-          pos = nil
-        end
-        if pos
-          @cur = pos
-          chunk.thunks[n..-1] = []
-        end
-      end
-      catch(2) do |; pos, p_loc, n|
-        pos = @cur
-        n = chunk.thunks.length
-        catch(3) do
-          1.times do |;pos, p_loc, n|
-            pos = @cur
-            n = chunk.thunks.length
-            catch(5) do
-              catch(4) do
-                if (
-                  refill_buffer(1) < 1 ||
-                  @buffer[@cur] != "\r"
-                )
-                  throw(4)
-                end
-                @cur += 1
-                throw(5)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-            end
-          end
-          if (
-            refill_buffer(1) < 1 ||
-            @buffer[@cur] != "\n"
-          )
-            throw(3)
-          end
-          @cur += 1
-          throw(2)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_EOF, chunk.thunks, nil, 0)
-          throw(2)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        throw(0)
-      end
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_COMMENT_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   COMMENT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH COMMENT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_ESOURCE
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_ESOURCE #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(12) < 12 ||
-        @buffer[@cur, 12] != "%earlysource"
-      )
-        throw(0)
-      end
-      @cur += 12
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_ESOURCE_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_ESOURCE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_ESOURCE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_SOURCE
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_SOURCE #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(7) < 7 ||
-        @buffer[@cur, 7] != "%source"
-      )
-        throw(0)
-      end
-      @cur += 7
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_SOURCE_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_SOURCE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_SOURCE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_LHEADER
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_LHEADER #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(11) < 11 ||
-        @buffer[@cur, 11] != "%lateheader"
-      )
-        throw(0)
-      end
-      @cur += 11
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_LHEADER_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_LHEADER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_LHEADER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_LSOURCE
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_LSOURCE #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(11) < 11 ||
-        @buffer[@cur, 11] != "%latesource"
-      )
-        throw(0)
-      end
-      @cur += 11
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_LSOURCE_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_LSOURCE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_LSOURCE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_HEADER
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_HEADER #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(7) < 7 ||
-        @buffer[@cur, 7] != "%header"
-      )
-        throw(0)
-      end
-      @cur += 7
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_HEADER_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_HEADER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_HEADER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_LOC
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_LOC #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(9) < 9 ||
-        @buffer[@cur, 9] != "%location"
-      )
-        throw(0)
-      end
-      @cur += 9
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_LOC_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_LOC #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_LOC #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_INIT
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_INIT #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(11) < 11 ||
-        @buffer[@cur, 11] != "%initialize"
-      )
-        throw(0)
-      end
-      @cur += 11
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_INIT_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_INIT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_INIT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_ECOMMON
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_ECOMMON #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(12) < 12 ||
-        @buffer[@cur, 12] != "%earlycommon"
-      )
-        throw(0)
-      end
-      @cur += 12
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_ECOMMON_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_ECOMMON #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_ECOMMON #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_COMMON
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_COMMON #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(7) < 7 ||
-        @buffer[@cur, 7] != "%common"
-      )
-        throw(0)
-      end
-      @cur += 7
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_COMMON_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_COMMON #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_COMMON #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_VALUE
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_VALUE #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(6) < 6 ||
-        @buffer[@cur, 6] != "%value"
-      )
-        throw(0)
-      end
-      @cur += 6
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_VALUE_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_VALUE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_VALUE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_AUXIL
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_AUXIL #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(6) < 6 ||
-        @buffer[@cur, 6] != "%auxil"
-      )
-        throw(0)
-      end
-      @cur += 6
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_AUXIL_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_AUXIL #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_AUXIL #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_PREFIX
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_PREFIX #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(7) < 7 ||
-        @buffer[@cur, 7] != "%prefix"
-      )
-        throw(0)
-      end
-      @cur += 7
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_PREFIX_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_PREFIX #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_PREFIX #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DIRECTIVE_CAPT
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DIRECTIVE_CAPT #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(8) < 8 ||
-        @buffer[@cur, 8] != "%capture"
-      )
-        throw(0)
-      end
-      @cur += 8
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DIRECTIVE_CAPT_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DIRECTIVE_CAPT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DIRECTIVE_CAPT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_LARROW
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    LARROW #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(2) < 2 ||
-        @buffer[@cur, 2] != "<-"
-      )
-        throw(0)
-      end
-      @cur += 2
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_LARROW_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   LARROW #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH LARROW #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_RARROW
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    RARROW #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(2) < 2 ||
-        @buffer[@cur, 2] != "->"
-      )
-        throw(0)
-      end
-      @cur += 2
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_RARROW_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   RARROW #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH RARROW #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_SLASH
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    SLASH #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "/"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_SLASH_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   SLASH #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH SLASH #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_CUT
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    CUT #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(2) < 2 ||
-        @buffer[@cur, 2] != "8<"
-      )
-        throw(0)
-      end
-      @cur += 2
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_CUT_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   CUT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH CUT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_ERROR
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    ERROR #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "~"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_ERROR_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   ERROR #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH ERROR #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_AND
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    AND #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "&"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_AND_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   AND #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH AND #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_BANG
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    BANG #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "!"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_BANG_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   BANG #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH BANG #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_MULT
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    MULT #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "*"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_MULT_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   MULT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH MULT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_PLUS
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    PLUS #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "+"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_PLUS_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   PLUS #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH PLUS #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_QUESTION
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    QUESTION #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "?"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_QUESTION_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   QUESTION #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH QUESTION #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_COLON
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    COLON #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != ":"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_COLON_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   COLON #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH COLON #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DDOLLER
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DDOLLER #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(2) < 2 ||
-        @buffer[@cur, 2] != "$$"
-      )
-        throw(0)
-      end
-      @cur += 2
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DDOLLER_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DDOLLER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DDOLLER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_NDOLLER
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    NDOLLER #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(1)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "$"
-      )
-        throw(0)
-      end
-      @cur += 1
-      1.times do |;pos, q, capt, p_loc, q_loc|
-        pos = @cur
-        1.times do |;u, n|
-          if refill_buffer(1) < 1
-            throw(0)
-          end
-          u = @buffer[@cur]
-          if (!(
-            (u >= "1" && u <= "9")
-          ))
-            throw(0)
-          end
-          @cur += 1
-        end
-        1.times do |;p0, p0_loc, n0, i, pos, p_loc, n, stat|
-          i = 0
-          catch(1) do
-            pos = @cur
-            n = chunk.thunks.length
-            1.times do |;u, n|
-              if refill_buffer(1) < 1
-                throw(1)
-              end
-              u = @buffer[@cur]
-              if (!(
-                (u >= "0" && u <= "9")
-              ))
-                throw(1)
-              end
-              @cur += 1
-            end
-            i += 1
-            if @cur != pos
-              redo
-            end
-            pos = nil
-          end
-          if pos
-            @cur = pos
-            chunk.thunks[n..-1] = []
-          end
-        end
-        q = @cur
-        capt = chunk.capts[0]
-        capt.range_start = pos
-        capt.range_end = q
-      end
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_NDOLLER_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_NDOLLER_1,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   NDOLLER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH NDOLLER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_LPAREN
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    LPAREN #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "("
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_LPAREN_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   LPAREN #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH LPAREN #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_RPAREN
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    RPAREN #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != ")"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_RPAREN_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   RPAREN #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH RPAREN #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_LT
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    LT #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "<"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_LT_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   LT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH LT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_GT
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    GT #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != ">"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_GT_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   GT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH GT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_DOT
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    DOT #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "."
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_DOT_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   DOT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH DOT #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_CHARCLASS
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    CHARCLASS #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(1)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "["
-      )
-        throw(0)
-      end
-      @cur += 1
-      1.times do |;pos, q, capt, p_loc, q_loc|
-        pos = @cur
-        1.times do |;p0, p0_loc, n0, i, pos, p_loc, n, stat|
-          i = 0
-          catch(1) do
-            pos = @cur
-            n = chunk.thunks.length
-            catch(2) do |; pos, p_loc, n|
-              pos = @cur
-              n = chunk.thunks.length
-              1.times do |;u, n|
-                if refill_buffer(1) >= 1
-                  u = @buffer[@cur]
-                  unless (
-                    u == "\\" ||
-                    u == "[" ||
-                    u == "]"
-                  )
-                    @cur += 1
-                    throw(2)
-                  end
-                end
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              catch(3) do
-                if (
-                  refill_buffer(2) < 2 ||
-                  @buffer[@cur, 2] != "\\["
-                )
-                  throw(3)
-                end
-                @cur += 2
-                throw(2)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              catch(4) do
-                if (
-                  refill_buffer(2) < 2 ||
-                  @buffer[@cur, 2] != "\\]"
-                )
-                  throw(4)
-                end
-                @cur += 2
-                throw(2)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              catch(5) do
-                if (
-                  refill_buffer(1) < 1 ||
-                  @buffer[@cur] != "\\"
-                )
-                  throw(5)
-                end
-                @cur += 1
-                throw(2)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              throw(1)
-            end
-            i += 1
-            if @cur != pos
-              redo
-            end
-            pos = nil
-          end
-          if pos
-            @cur = pos
-            chunk.thunks[n..-1] = []
-          end
-        end
-        q = @cur
-        capt = chunk.capts[0]
-        capt.range_start = pos
-        capt.range_end = q
-      end
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "]"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_CHARCLASS_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_CHARCLASS_1,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   CHARCLASS #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH CHARCLASS #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_QUOTATION_SINGLE
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    QUOTATION_SINGLE #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(1)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "\'"
-      )
-        throw(0)
-      end
-      @cur += 1
-      1.times do |;pos, q, capt, p_loc, q_loc|
-        pos = @cur
-        1.times do |;p0, p0_loc, n0, i, pos, p_loc, n, stat|
-          i = 0
-          catch(1) do
-            pos = @cur
-            n = chunk.thunks.length
-            catch(2) do |; pos, p_loc, n|
-              pos = @cur
-              n = chunk.thunks.length
-              1.times do |;u, n|
-                if refill_buffer(1) >= 1
-                  u = @buffer[@cur]
-                  unless (
-                    u == "\\" ||
-                    u == "'" ||
-                    u == "\n"
-                  )
-                    @cur += 1
-                    throw(2)
-                  end
-                end
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              catch(3) do
-                if (
-                  refill_buffer(2) < 2 ||
-                  @buffer[@cur, 2] != "\\'"
-                )
-                  throw(3)
-                end
-                @cur += 2
-                throw(2)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              catch(4) do
-                if (
-                  refill_buffer(2) < 2 ||
-                  @buffer[@cur, 2] != "\\\n"
-                )
-                  throw(4)
-                end
-                @cur += 2
-                throw(2)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              catch(5) do
-                if (
-                  refill_buffer(1) < 1 ||
-                  @buffer[@cur] != "\\"
-                )
-                  throw(5)
-                end
-                @cur += 1
-                1.times do |;u, n|
-                  if refill_buffer(1) < 1
-                    throw(5)
-                  end
-                  u = @buffer[@cur]
-                  if (
-                    u == "'" ||
-                    u == "\n"
-                  )
-                    throw(5)
-                  end
-                  @cur += 1
-                end
-                throw(2)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              throw(1)
-            end
-            i += 1
-            if @cur != pos
-              redo
-            end
-            pos = nil
-          end
-          if pos
-            @cur = pos
-            chunk.thunks[n..-1] = []
-          end
-        end
-        q = @cur
-        capt = chunk.capts[0]
-        capt.range_start = pos
-        capt.range_end = q
-      end
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "\'"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_QUOTATION_SINGLE_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_QUOTATION_SINGLE_1,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   QUOTATION_SINGLE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH QUOTATION_SINGLE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_QUOTATION_DOUBLE
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    QUOTATION_DOUBLE #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(1)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "\""
-      )
-        throw(0)
-      end
-      @cur += 1
-      1.times do |;pos, q, capt, p_loc, q_loc|
-        pos = @cur
-        1.times do |;p0, p0_loc, n0, i, pos, p_loc, n, stat|
-          i = 0
-          catch(1) do
-            pos = @cur
-            n = chunk.thunks.length
-            catch(2) do |; pos, p_loc, n|
-              pos = @cur
-              n = chunk.thunks.length
-              1.times do |;u, n|
-                if refill_buffer(1) >= 1
-                  u = @buffer[@cur]
-                  unless (
-                    u == "\\" ||
-                    u == "\"" ||
-                    u == "\n"
-                  )
-                    @cur += 1
-                    throw(2)
-                  end
-                end
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              catch(3) do
-                if (
-                  refill_buffer(2) < 2 ||
-                  @buffer[@cur, 2] != "\\\""
-                )
-                  throw(3)
-                end
-                @cur += 2
-                throw(2)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              catch(4) do
-                if (
-                  refill_buffer(2) < 2 ||
-                  @buffer[@cur, 2] != "\\\n"
-                )
-                  throw(4)
-                end
-                @cur += 2
-                throw(2)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              catch(5) do
-                if (
-                  refill_buffer(1) < 1 ||
-                  @buffer[@cur] != "\\"
-                )
-                  throw(5)
-                end
-                @cur += 1
-                1.times do |;u, n|
-                  if refill_buffer(1) < 1
-                    throw(5)
-                  end
-                  u = @buffer[@cur]
-                  if (
-                    u == "\"" ||
-                    u == "\n"
-                  )
-                    throw(5)
-                  end
-                  @cur += 1
-                end
-                throw(2)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-              throw(1)
-            end
-            i += 1
-            if @cur != pos
-              redo
-            end
-            pos = nil
-          end
-          if pos
-            @cur = pos
-            chunk.thunks[n..-1] = []
-          end
-        end
-        q = @cur
-        capt = chunk.capts[0]
-        capt.range_start = pos
-        capt.range_end = q
-      end
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "\""
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_QUOTATION_DOUBLE_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_QUOTATION_DOUBLE_1,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   QUOTATION_DOUBLE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH QUOTATION_DOUBLE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_FOOTER
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    FOOTER #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(1)
-    catch(0) do
-      if (
-        refill_buffer(2) < 2 ||
-        @buffer[@cur, 2] != "%%"
-      )
-        throw(0)
-      end
-      @cur += 2
-      catch(1) do |; pos, p_loc, n|
-        pos = @cur
-        n = chunk.thunks.length
-        catch(2) do
-          1.times do |;pos, p_loc, n|
-            pos = @cur
-            n = chunk.thunks.length
-            catch(4) do
-              catch(3) do
-                if (
-                  refill_buffer(1) < 1 ||
-                  @buffer[@cur] != "\r"
-                )
-                  throw(3)
-                end
-                @cur += 1
-                throw(4)
-              end
-              @cur = pos
-              chunk.thunks[n..-1] = []
-            end
-          end
-          if (
-            refill_buffer(1) < 1 ||
-            @buffer[@cur] != "\n"
-          )
-            throw(2)
-          end
-          @cur += 1
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        if apply_rule(:evaluate_rule_EOF, chunk.thunks, nil, 0)
-          throw(1)
-        end
-        @cur = pos
-        chunk.thunks[n..-1] = []
-        throw(0)
-      end
-      1.times do |;pos, q, capt, p_loc, q_loc|
-        pos = @cur
-        1.times do |;p0, p0_loc, n0, i, pos, p_loc, n, stat|
-          i = 0
-          catch(5) do
-            pos = @cur
-            n = chunk.thunks.length
-            1.times do |;u, n|
-              if refill_buffer(1) < 1
-                throw(5)
-              end
-              u = @buffer[@cur]
-              @cur += 1
-            end
-            i += 1
-            if @cur != pos
-              redo
-            end
-            pos = nil
-          end
-          if pos
-            @cur = pos
-            chunk.thunks[n..-1] = []
-          end
-        end
-        q = @cur
-        capt = chunk.capts[0]
-        capt.range_start = pos
-        capt.range_end = q
-      end
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_FOOTER_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   FOOTER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH FOOTER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_IDENTIFIER
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    IDENTIFIER #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(1)
-    catch(0) do
-      1.times do |;pos, q, capt, p_loc, q_loc|
-        pos = @cur
-        1.times do |;u, n|
-          if refill_buffer(1) < 1
-            throw(0)
-          end
-          u = @buffer[@cur]
-          if (!(
-            (u >= "a" && u <= "z") ||
-            (u >= "A" && u <= "Z") ||
-            u == "_"
-          ))
-            throw(0)
-          end
-          @cur += 1
-        end
-        1.times do |;p0, p0_loc, n0, i, pos, p_loc, n, stat|
-          i = 0
-          catch(1) do
-            pos = @cur
-            n = chunk.thunks.length
-            1.times do |;u, n|
-              if refill_buffer(1) < 1
-                throw(1)
-              end
-              u = @buffer[@cur]
-              if (!(
-                (u >= "a" && u <= "z") ||
-                (u >= "A" && u <= "Z") ||
-                u == "_" ||
-                (u >= "0" && u <= "9")
-              ))
-                throw(1)
-              end
-              @cur += 1
-            end
-            i += 1
-            if @cur != pos
-              redo
-            end
-            pos = nil
-          end
-          if pos
-            @cur = pos
-            chunk.thunks[n..-1] = []
-          end
-        end
-        q = @cur
-        capt = chunk.capts[0]
-        capt.range_start = pos
-        capt.range_end = q
-      end
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_IDENTIFIER_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_IDENTIFIER_1,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          chunk.capts.slice(0),
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   IDENTIFIER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH IDENTIFIER #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_SPACES
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    SPACES #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      1.times do |;p0, p0_loc, n0, i, pos, p_loc, n, stat|
-        p0 = @cur
-        n0 = chunk.thunks.length
-        i = 0
-        catch(1) do
-          pos = @cur
-          n = chunk.thunks.length
-          1.times do |;u, n|
-            if refill_buffer(1) < 1
-              throw(1)
-            end
-            u = @buffer[@cur]
-            if (!(
-              u == " " ||
-              u == "\t" ||
-              u == "\v" ||
-              u == "\f" ||
-              u == "\r" ||
-              u == "\n"
-            ))
-              throw(1)
-            end
-            @cur += 1
-          end
-          i += 1
-          if @cur != pos
-            redo
-          end
-          pos = nil
-        end
-        if pos
-          @cur = pos
-          chunk.thunks[n..-1] = []
-        end
-        if i < 1
-          @cur = p0
-          chunk.thunks[n0..-1] = []
-          throw(0)
-        end
-      end
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_SPACES_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   SPACES #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH SPACES #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_LBRACE
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    LBRACE #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "{"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_LBRACE_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   LBRACE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH LBRACE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_RBRACE
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    RBRACE #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if (
-        refill_buffer(1) < 1 ||
-        @buffer[@cur] != "}"
-      )
-        throw(0)
-      end
-      @cur += 1
-      chunk.thunks.push(
-        ThunkLeaf.new(
-          :action_RBRACE_0,
-          Capture.new(
-            chunk.pos, @cur,
-          ),
-          {},
-          {},
-        )
-      )
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   RBRACE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH RBRACE #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-  def evaluate_rule_EOF
-    chunk = ThunkChunk.new
-    chunk.pos = @cur
-    debug { warn "#{ "  " * @level}EVAL    EOF #{chunk.pos} #{@buffer[chunk.pos..-1].inspect}" }
-    @level += 1
-    chunk.resize_captures(0)
-    catch(0) do
-      if refill_buffer(1) >= 1
-        throw(0)
-      end
-      @level -= 1
-      debug { warn "#{ "  " * @level}MATCH   EOF #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-      return chunk
-    end
-    @level -= 1
-    debug { warn "#{ "  " * @level}NOMATCH EOF #{chunk.pos} #{@buffer[chunk.pos...@cur].inspect}" }
-    return nil
-  end
-
-
-  def rule_chunk(rule, thunks, values, index)
-    pos = @pos + @cur
-    answer = @lrtable.answers[pos, rule]
-    head = @lrtable.heads[pos]
-
-    if head
-      if !answer && rule != head.rule_name && !head.invol[rule]
-        return nil
-      end
-      if head.eval.delete(rule)
-        return public_send(rule)
-      end
-    end
-
-    if answer
-      @cur = answer.pos - @pos
-      if !answer.lr
-        return answer.chunk
-      end
-      answer.lr.head ||= LrHead.new(rule)
-      @lrstack.reverse_each do |lrentry|
-        answer_head = answer.lr.head
-        if lrentry.head == answer_head
-          break
-        end
-        lrentry.head = answer_head
-        answer_head.invol[lrentry.rule] = true
-      end
-      return answer.lr.seed
-    end
-
-    lr = LrEntry.new
-    lr.rule = rule
-    @lrstack.push(lr)
-    answer = LrAnswer.new(lr, pos)
-    @lrtable.answers[pos, rule] = answer
-    chunk = public_send(rule)
-    @lrstack.pop
-    answer.pos = @pos + @cur
-    if !lr.head
-      answer.chunk = chunk
-      return chunk
-    end
-
-    lr.seed = chunk
-    head = lr.head
-    if head.rule_name != rule
-      return chunk
-    end
-
-    answer.chunk = chunk
-    if !chunk
-      return nil
-    end
-    @lrtable.heads[pos] = head
-    while true
-      @cur = pos - @pos
-      head.invol_to_eval
-      chunk = public_send(rule)
-      if !chunk || @pos + @cur <= answer.pos
-        break
-      end
-      answer.chunk = chunk
-      answer.pos = @pos + @cur
-    end
-    @lrtable.heads[pos] = nil
-    @cur = answer.pos - @pos
-    answer.chunk
-  end
-
-  def apply_rule(rule, thunks, values, index)
-    chunk = rule_chunk(rule, thunks, values, index)
-    if !chunk
-      return false
-    end
-    values ||= @global_values
-    thunks << ThunkNode.new(chunk.thunks, values, index)
-    return true
-  end
-
-  def do_action(thunks, values, index)
-    thunks.each do |thunk|
-      thunk.do_action(self, values, index)
-    end
-  end
-
-  class LrTable
-    attr_reader :heads, :answers
-
-    def initialize
-      @heads = {}
-      @answers = LrAnswerTable.new
-    end
-
-    def clear
-      @heads.clear
-      @answers.clear
-    end
-  end
-
-  class LrAnswerTable
-    def initialize
-      @answers = {}
-    end
-
-    def clear
-      @answers.clear
-    end
-
-    def []=(index, rule_name, answer)
-      entry = @answers[index] ||= {}
-      entry[rule_name] = answer
-    end
-
-    def [](index, rule_name)
-      @answers.dig(index, rule_name)
-    end
-  end
-
-  class LrHead
-    attr_accessor :rule_name, :invol, :eval
-
-    def initialize(rule_name)
-      @rule_name = rule_name
-      @invol = {}
-      @eval = {}
-    end
-
-    def invol_to_eval
-      @eval.clear
-      @invol.each do |k, v|
-        @eval[k] = true
-      end
-    end
-  end
-
-  class ThunkChunk
-    attr_accessor :thunks, :capts, :pos, :values
-
-    def initialize
-      super
-      @thunks = []
-      @capts = {}
-      @pos = 0
-      @values = {}
-    end
-
-    def resize_captures(len)
-      len.times do |i|
-        @capts[i] = Capture.new
-      end
-    end
-  end
-
-  class Thunk
-  end
-
-  class ThunkLeaf < Thunk
-    attr_accessor :capt0, :capts, :value_refs, :action
-
-    def initialize(action, capt0 = Capture.new, value_refs = {}, capts = {})
-      @value_refs = value_refs
-      @capts = capts
-      @capt0 = capt0
-      @action = action
-    end
-
-    def do_action(ctx, values, index)
-      ctx.public_send(action, self, values, index)
-    end
-  end
-
-  class ThunkNode < Thunk
-    attr_accessor :thunks, :values, :index
-
-    def initialize(thunks, values, index)
-      @thunks = thunks
-      @values = values
-      @index = index
-      values[index] ||= Value.new if values
-    end
-
-    def do_action(ctx, _values, _index)
-      @thunks.each do |thunk|
-        thunk.do_action(ctx, @values, @index)
-      end
-    end
-
-    def clear
-      @thunks.clear
-    end
-  end
-
-  class LrEntry
-    attr_accessor :rule, :head, :seed
-  end
-
-  class Capture
-    attr_accessor :range_start, :range_end
-
-    def initialize(range_start = 0, range_end = 0)
-      @range_start = range_start
-      @range_end = range_end
-    end
-
-    def capture_string(buffer)
-      @string ||= buffer[@range_start, @range_end - @range_start]
-    end
-  end
-
-  class LrAnswer
-    attr_accessor :lr, :chunk, :pos
-
-    def initialize(lr, pos)
-      @pos = pos
-      @lr = lr
-    end
-
-    def chunk=(chunk)
-      @lr = nil
-      @chunk = chunk
-    end
-  end
-
-  class Value
-    attr_accessor :value
-  end
-end
-
-class Packcr::Tokenizer
-  attr_accessor :parser_buffer
-  def getc
-    @ifile.getc
-  end
-end
-
-tokenizer = Packcr::Tokenizer.new(debug: true)
-begin
-  tokenizer.run
-rescue SyntaxError
-end
-p tokenizer.parser_buffer.gsub!(/./) { |c| "%02x " % c.ord }