bel_parser 1.0.0.alpha.1

data/lib/bel_parser/parsers/common/list.rb

@@ -0,0 +1,2142 @@
+
+# begin: ragel
+=begin
+
+class << self
+	attr_accessor :_bel_trans_keys
+	private :_bel_trans_keys, :_bel_trans_keys=
+end
+self._bel_trans_keys = [
+	0, 0, 123, 123, 9, 122, 
+	34, 92, 9, 125, 9, 
+	125, 10, 10, 92, 92, 
+	9, 125, 48, 122, 10, 122, 
+	34, 34, 34, 92, 10, 
+	10, 92, 92, 0, 0, 
+	0, 0, 0, 0, 0
+]
+
+class << self
+	attr_accessor :_bel_key_spans
+	private :_bel_key_spans, :_bel_key_spans=
+end
+self._bel_key_spans = [
+	0, 1, 114, 59, 117, 117, 1, 1, 
+	117, 75, 113, 1, 59, 1, 1, 0, 
+	0, 0
+]
+
+class << self
+	attr_accessor :_bel_index_offsets
+	private :_bel_index_offsets, :_bel_index_offsets=
+end
+self._bel_index_offsets = [
+	0, 0, 2, 117, 177, 295, 413, 415, 
+	417, 535, 611, 725, 727, 787, 789, 791, 
+	792, 793
+]
+
+class << self
+	attr_accessor :_bel_indicies
+	private :_bel_indicies, :_bel_indicies=
+end
+self._bel_indicies = [
+	1, 0, 3, 2, 2, 2, 2, 2, 
+	2, 2, 2, 2, 2, 2, 2, 2, 
+	2, 2, 2, 2, 2, 2, 2, 2, 
+	2, 3, 2, 4, 2, 2, 2, 2, 
+	2, 2, 2, 2, 2, 2, 2, 2, 
+	2, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 2, 2, 2, 2, 2, 
+	2, 2, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 2, 2, 2, 2, 
+	5, 2, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 2, 7, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 8, 
+	6, 10, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	10, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 11, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 12, 9, 13, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 13, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 14, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 15, 0, 16, 0, 8, 
+	6, 18, 17, 17, 17, 17, 17, 17, 
+	17, 17, 17, 17, 17, 17, 17, 17, 
+	17, 17, 17, 17, 17, 17, 17, 17, 
+	18, 17, 17, 17, 17, 17, 17, 17, 
+	17, 17, 17, 17, 19, 17, 17, 17, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 17, 17, 17, 17, 17, 17, 
+	17, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 17, 17, 17, 17, 20, 
+	17, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 17, 17, 21, 17, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 22, 22, 22, 22, 22, 22, 22, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 22, 22, 22, 22, 23, 22, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 22, 24, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 22, 22, 22, 22, 22, 
+	22, 22, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 22, 22, 22, 22, 
+	25, 22, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 22, 27, 26, 29, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 30, 28, 31, 26, 30, 28, 32, 
+	32, 32, 0
+]
+
+class << self
+	attr_accessor :_bel_trans_targs
+	private :_bel_trans_targs, :_bel_trans_targs=
+end
+self._bel_trans_targs = [
+	0, 2, 0, 2, 3, 8, 3, 4, 
+	7, 0, 5, 2, 6, 5, 2, 6, 
+	15, 0, 5, 2, 8, 6, 0, 10, 
+	16, 10, 0, 12, 12, 13, 14, 17, 
+	0
+]
+
+class << self
+	attr_accessor :_bel_trans_actions
+	private :_bel_trans_actions, :_bel_trans_actions=
+end
+self._bel_trans_actions = [
+	1, 2, 3, 0, 4, 5, 7, 7, 
+	7, 6, 8, 9, 10, 0, 11, 12, 
+	13, 14, 15, 16, 17, 18, 19, 5, 
+	20, 17, 21, 4, 7, 7, 7, 22, 
+	0
+]
+
+class << self
+	attr_accessor :_bel_eof_actions
+	private :_bel_eof_actions, :_bel_eof_actions=
+end
+self._bel_eof_actions = [
+	0, 1, 3, 6, 6, 1, 1, 6, 
+	14, 19, 19, 21, 21, 21, 21, 0, 
+	0, 0
+]
+
+class << self
+	attr_accessor :bel_start
+end
+self.bel_start = 1;
+class << self
+	attr_accessor :bel_first_final
+end
+self.bel_first_final = 15;
+class << self
+	attr_accessor :bel_error
+end
+self.bel_error = 0;
+
+class << self
+	attr_accessor :bel_en_ident
+end
+self.bel_en_ident = 9;
+class << self
+	attr_accessor :bel_en_string
+end
+self.bel_en_string = 11;
+class << self
+	attr_accessor :bel_en_list
+end
+self.bel_en_list = 1;
+
+
+begin
+	p ||= 0
+	pe ||= data.length
+	cs = bel_start
+end
+
+begin
+	testEof = false
+	_slen, _trans, _keys, _inds, _acts, _nacts = nil
+	_goto_level = 0
+	_resume = 10
+	_eof_trans = 15
+	_again = 20
+	_test_eof = 30
+	_out = 40
+	while true
+	if _goto_level <= 0
+	if p == pe
+		_goto_level = _test_eof
+		next
+	end
+	if cs == 0
+		_goto_level = _out
+		next
+	end
+	end
+	if _goto_level <= _resume
+	_keys = cs << 1
+	_inds = _bel_index_offsets[cs]
+	_slen = _bel_key_spans[cs]
+	_wide = data[p].ord
+	_trans = if (   _slen > 0 && 
+			_bel_trans_keys[_keys] <= _wide && 
+			_wide <= _bel_trans_keys[_keys + 1] 
+		    ) then
+			_bel_indicies[ _inds + _wide - _bel_trans_keys[_keys] ] 
+		 else 
+			_bel_indicies[ _inds + _slen ]
+		 end
+	cs = _bel_trans_targs[_trans]
+	if _bel_trans_actions[_trans] != 0
+	case _bel_trans_actions[_trans]
+	when 17 then
+		begin
+
+    (@buffers[:ident] ||= []) << data[p].ord
+  		end
+	when 7 then
+		begin
+
+    (@buffers[:string] ||= []) << data[p].ord
+  		end
+	when 11 then
+		begin
+
+    @buffers.delete(:string)
+    @buffers.delete(:ident)
+  		end
+	when 2 then
+		begin
+
+    @buffers[:list] = list()
+  		end
+	when 12 then
+		begin
+
+    #TODO: Mark @buffers[:list] as complete.
+  		end
+	when 13 then
+		begin
+
+    yield @buffers[:list]
+  		end
+	when 1 then
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 5 then
+		begin
+
+    @buffers[:ident] = []
+  		end
+		begin
+
+    (@buffers[:ident] ||= []) << data[p].ord
+  		end
+	when 20 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    yield @buffers[:ident]
+  		end
+	when 19 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    @buffers[:ident] ||= []
+    yield @buffers[:ident]
+  		end
+	when 4 then
+		begin
+
+    @buffers[:string] = []
+  		end
+		begin
+
+    (@buffers[:string] ||= []) << data[p].ord
+  		end
+	when 22 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    yield @buffers[:string]
+  		end
+	when 21 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    @buffers[:string] ||= []
+    yield @buffers[:string]
+  		end
+	when 15 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+	when 8 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+	when 16 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers.delete(:string)
+    @buffers.delete(:ident)
+  		end
+	when 18 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list] as complete.
+  		end
+	when 14 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 9 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers.delete(:string)
+    @buffers.delete(:ident)
+  		end
+	when 10 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list] as complete.
+  		end
+	when 6 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 3 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	end
+	end
+	end
+	if _goto_level <= _again
+	if cs == 0
+		_goto_level = _out
+		next
+	end
+	p += 1
+	if p != pe
+		_goto_level = _resume
+		next
+	end
+	end
+	if _goto_level <= _test_eof
+	if p == eof
+	  case _bel_eof_actions[cs]
+	when 1 then
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 19 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    @buffers[:ident] ||= []
+    yield @buffers[:ident]
+  		end
+	when 21 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    @buffers[:string] ||= []
+    yield @buffers[:string]
+  		end
+	when 14 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 6 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 3 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	  end
+	end
+
+	end
+	if _goto_level <= _out
+		break
+	end
+end
+	end
+
+class << self
+	attr_accessor :_bel_trans_keys
+	private :_bel_trans_keys, :_bel_trans_keys=
+end
+self._bel_trans_keys = [
+	0, 0, 123, 123, 9, 122, 
+	34, 92, 9, 125, 9, 
+	125, 10, 10, 92, 92, 
+	9, 125, 48, 122, 10, 122, 
+	34, 34, 34, 92, 10, 
+	10, 92, 92, 0, 0, 
+	0, 0, 0, 0, 0
+]
+
+class << self
+	attr_accessor :_bel_key_spans
+	private :_bel_key_spans, :_bel_key_spans=
+end
+self._bel_key_spans = [
+	0, 1, 114, 59, 117, 117, 1, 1, 
+	117, 75, 113, 1, 59, 1, 1, 0, 
+	0, 0
+]
+
+class << self
+	attr_accessor :_bel_index_offsets
+	private :_bel_index_offsets, :_bel_index_offsets=
+end
+self._bel_index_offsets = [
+	0, 0, 2, 117, 177, 295, 413, 415, 
+	417, 535, 611, 725, 727, 787, 789, 791, 
+	792, 793
+]
+
+class << self
+	attr_accessor :_bel_indicies
+	private :_bel_indicies, :_bel_indicies=
+end
+self._bel_indicies = [
+	1, 0, 3, 2, 2, 2, 2, 2, 
+	2, 2, 2, 2, 2, 2, 2, 2, 
+	2, 2, 2, 2, 2, 2, 2, 2, 
+	2, 3, 2, 4, 2, 2, 2, 2, 
+	2, 2, 2, 2, 2, 2, 2, 2, 
+	2, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 2, 2, 2, 2, 2, 
+	2, 2, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 2, 2, 2, 2, 
+	5, 2, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 2, 7, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 8, 
+	6, 10, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	10, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 11, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 12, 9, 13, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 13, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 14, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 15, 0, 16, 0, 8, 
+	6, 18, 17, 17, 17, 17, 17, 17, 
+	17, 17, 17, 17, 17, 17, 17, 17, 
+	17, 17, 17, 17, 17, 17, 17, 17, 
+	18, 17, 17, 17, 17, 17, 17, 17, 
+	17, 17, 17, 17, 19, 17, 17, 17, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 17, 17, 17, 17, 17, 17, 
+	17, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 17, 17, 17, 17, 20, 
+	17, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 17, 17, 21, 17, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 22, 22, 22, 22, 22, 22, 22, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 22, 22, 22, 22, 23, 22, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 22, 24, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 22, 22, 22, 22, 22, 
+	22, 22, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 22, 22, 22, 22, 
+	25, 22, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 22, 27, 26, 29, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 30, 28, 31, 26, 30, 28, 32, 
+	32, 32, 0
+]
+
+class << self
+	attr_accessor :_bel_trans_targs
+	private :_bel_trans_targs, :_bel_trans_targs=
+end
+self._bel_trans_targs = [
+	0, 2, 0, 2, 3, 8, 3, 4, 
+	7, 0, 5, 2, 6, 5, 2, 6, 
+	15, 0, 5, 2, 8, 6, 0, 10, 
+	16, 10, 0, 12, 12, 13, 14, 17, 
+	0
+]
+
+class << self
+	attr_accessor :_bel_trans_actions
+	private :_bel_trans_actions, :_bel_trans_actions=
+end
+self._bel_trans_actions = [
+	1, 2, 3, 0, 4, 5, 7, 7, 
+	7, 6, 8, 9, 10, 0, 11, 12, 
+	13, 14, 15, 16, 17, 18, 19, 5, 
+	20, 17, 21, 4, 7, 7, 7, 22, 
+	0
+]
+
+class << self
+	attr_accessor :_bel_eof_actions
+	private :_bel_eof_actions, :_bel_eof_actions=
+end
+self._bel_eof_actions = [
+	0, 1, 3, 6, 6, 1, 1, 6, 
+	14, 19, 19, 21, 21, 21, 21, 0, 
+	0, 0
+]
+
+class << self
+	attr_accessor :bel_start
+end
+self.bel_start = 1;
+class << self
+	attr_accessor :bel_first_final
+end
+self.bel_first_final = 15;
+class << self
+	attr_accessor :bel_error
+end
+self.bel_error = 0;
+
+class << self
+	attr_accessor :bel_en_ident
+end
+self.bel_en_ident = 9;
+class << self
+	attr_accessor :bel_en_string
+end
+self.bel_en_string = 11;
+class << self
+	attr_accessor :bel_en_list
+end
+self.bel_en_list = 1;
+
+
+begin
+	p ||= 0
+	pe ||= data.length
+	cs = bel_start
+end
+
+begin
+	testEof = false
+	_slen, _trans, _keys, _inds, _acts, _nacts = nil
+	_goto_level = 0
+	_resume = 10
+	_eof_trans = 15
+	_again = 20
+	_test_eof = 30
+	_out = 40
+	while true
+	if _goto_level <= 0
+	if p == pe
+		_goto_level = _test_eof
+		next
+	end
+	if cs == 0
+		_goto_level = _out
+		next
+	end
+	end
+	if _goto_level <= _resume
+	_keys = cs << 1
+	_inds = _bel_index_offsets[cs]
+	_slen = _bel_key_spans[cs]
+	_wide = data[p].ord
+	_trans = if (   _slen > 0 && 
+			_bel_trans_keys[_keys] <= _wide && 
+			_wide <= _bel_trans_keys[_keys + 1] 
+		    ) then
+			_bel_indicies[ _inds + _wide - _bel_trans_keys[_keys] ] 
+		 else 
+			_bel_indicies[ _inds + _slen ]
+		 end
+	cs = _bel_trans_targs[_trans]
+	if _bel_trans_actions[_trans] != 0
+	case _bel_trans_actions[_trans]
+	when 17 then
+		begin
+
+    (@buffers[:ident] ||= []) << data[p].ord
+  		end
+	when 7 then
+		begin
+
+    (@buffers[:string] ||= []) << data[p].ord
+  		end
+	when 11 then
+		begin
+
+    @buffers.delete(:string)
+    @buffers.delete(:ident)
+  		end
+	when 2 then
+		begin
+
+    @buffers[:list] = list()
+  		end
+	when 12 then
+		begin
+
+    #TODO: Mark @buffers[:list] as complete.
+  		end
+	when 13 then
+		begin
+
+    yield @buffers[:list]
+  		end
+	when 1 then
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 5 then
+		begin
+
+    @buffers[:ident] = []
+  		end
+		begin
+
+    (@buffers[:ident] ||= []) << data[p].ord
+  		end
+	when 20 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    yield @buffers[:ident]
+  		end
+	when 19 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    @buffers[:ident] ||= []
+    yield @buffers[:ident]
+  		end
+	when 4 then
+		begin
+
+    @buffers[:string] = []
+  		end
+		begin
+
+    (@buffers[:string] ||= []) << data[p].ord
+  		end
+	when 22 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    yield @buffers[:string]
+  		end
+	when 21 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    @buffers[:string] ||= []
+    yield @buffers[:string]
+  		end
+	when 15 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+	when 8 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+	when 16 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers.delete(:string)
+    @buffers.delete(:ident)
+  		end
+	when 18 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list] as complete.
+  		end
+	when 14 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 9 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers.delete(:string)
+    @buffers.delete(:ident)
+  		end
+	when 10 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list] as complete.
+  		end
+	when 6 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 3 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	end
+	end
+	end
+	if _goto_level <= _again
+	if cs == 0
+		_goto_level = _out
+		next
+	end
+	p += 1
+	if p != pe
+		_goto_level = _resume
+		next
+	end
+	end
+	if _goto_level <= _test_eof
+	if p == eof
+	  case _bel_eof_actions[cs]
+	when 1 then
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 19 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    @buffers[:ident] ||= []
+    yield @buffers[:ident]
+  		end
+	when 21 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    @buffers[:string] ||= []
+    yield @buffers[:string]
+  		end
+	when 14 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 6 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 3 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	  end
+	end
+
+	end
+	if _goto_level <= _out
+		break
+	end
+end
+	end
+
+
+=end
+# end: ragel
+
+require_relative '../ast/node'
+require_relative '../mixin/buffer'
+require_relative '../nonblocking_io_wrapper'
+
+module BELParser
+  module Parsers
+    module Common
+      module List
+
+        class << self
+
+          MAX_LENGTH = 1024 * 128 # 128K
+
+          def parse(content)
+            return nil unless content
+
+            Parser.new(content).each do |obj|
+              yield obj
+            end
+          end
+        end
+
+        private
+
+        class Parser
+          include Enumerable
+          include BELParser::Parsers::Buffer
+          include BELParser::Parsers::AST::Sexp
+
+          def initialize(content)
+            @content = content
+      # begin: ragel        
+            
+class << self
+	attr_accessor :_bel_trans_keys
+	private :_bel_trans_keys, :_bel_trans_keys=
+end
+self._bel_trans_keys = [
+	0, 0, 123, 123, 9, 122, 
+	34, 92, 9, 125, 9, 
+	125, 10, 10, 92, 92, 
+	9, 125, 48, 122, 10, 122, 
+	34, 34, 34, 92, 10, 
+	10, 92, 92, 0, 0, 
+	0, 0, 0, 0, 0
+]
+
+class << self
+	attr_accessor :_bel_key_spans
+	private :_bel_key_spans, :_bel_key_spans=
+end
+self._bel_key_spans = [
+	0, 1, 114, 59, 117, 117, 1, 1, 
+	117, 75, 113, 1, 59, 1, 1, 0, 
+	0, 0
+]
+
+class << self
+	attr_accessor :_bel_index_offsets
+	private :_bel_index_offsets, :_bel_index_offsets=
+end
+self._bel_index_offsets = [
+	0, 0, 2, 117, 177, 295, 413, 415, 
+	417, 535, 611, 725, 727, 787, 789, 791, 
+	792, 793
+]
+
+class << self
+	attr_accessor :_bel_indicies
+	private :_bel_indicies, :_bel_indicies=
+end
+self._bel_indicies = [
+	1, 0, 3, 2, 2, 2, 2, 2, 
+	2, 2, 2, 2, 2, 2, 2, 2, 
+	2, 2, 2, 2, 2, 2, 2, 2, 
+	2, 3, 2, 4, 2, 2, 2, 2, 
+	2, 2, 2, 2, 2, 2, 2, 2, 
+	2, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 2, 2, 2, 2, 2, 
+	2, 2, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 2, 2, 2, 2, 
+	5, 2, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 5, 5, 5, 5, 
+	5, 5, 5, 5, 2, 7, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 6, 
+	6, 6, 6, 6, 6, 6, 6, 8, 
+	6, 10, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	10, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 11, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 9, 9, 9, 
+	9, 9, 9, 9, 9, 12, 9, 13, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 13, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 14, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 15, 0, 16, 0, 8, 
+	6, 18, 17, 17, 17, 17, 17, 17, 
+	17, 17, 17, 17, 17, 17, 17, 17, 
+	17, 17, 17, 17, 17, 17, 17, 17, 
+	18, 17, 17, 17, 17, 17, 17, 17, 
+	17, 17, 17, 17, 19, 17, 17, 17, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 17, 17, 17, 17, 17, 17, 
+	17, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 17, 17, 17, 17, 20, 
+	17, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 20, 20, 20, 20, 20, 
+	20, 20, 20, 17, 17, 21, 17, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 22, 22, 22, 22, 22, 22, 22, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 22, 22, 22, 22, 23, 22, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 23, 23, 23, 23, 23, 23, 
+	23, 23, 22, 24, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 22, 22, 22, 22, 22, 22, 22, 
+	22, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 22, 22, 22, 22, 22, 
+	22, 22, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 22, 22, 22, 22, 
+	25, 22, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 25, 25, 25, 25, 
+	25, 25, 25, 25, 22, 27, 26, 29, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 28, 28, 28, 28, 28, 28, 28, 
+	28, 30, 28, 31, 26, 30, 28, 32, 
+	32, 32, 0
+]
+
+class << self
+	attr_accessor :_bel_trans_targs
+	private :_bel_trans_targs, :_bel_trans_targs=
+end
+self._bel_trans_targs = [
+	0, 2, 0, 2, 3, 8, 3, 4, 
+	7, 0, 5, 2, 6, 5, 2, 6, 
+	15, 0, 5, 2, 8, 6, 0, 10, 
+	16, 10, 0, 12, 12, 13, 14, 17, 
+	0
+]
+
+class << self
+	attr_accessor :_bel_trans_actions
+	private :_bel_trans_actions, :_bel_trans_actions=
+end
+self._bel_trans_actions = [
+	1, 2, 3, 0, 4, 5, 7, 7, 
+	7, 6, 8, 9, 10, 0, 11, 12, 
+	13, 14, 15, 16, 17, 18, 19, 5, 
+	20, 17, 21, 4, 7, 7, 7, 22, 
+	0
+]
+
+class << self
+	attr_accessor :_bel_eof_actions
+	private :_bel_eof_actions, :_bel_eof_actions=
+end
+self._bel_eof_actions = [
+	0, 1, 3, 6, 6, 1, 1, 6, 
+	14, 19, 19, 21, 21, 21, 21, 0, 
+	0, 0
+]
+
+class << self
+	attr_accessor :bel_start
+end
+self.bel_start = 1;
+class << self
+	attr_accessor :bel_first_final
+end
+self.bel_first_final = 15;
+class << self
+	attr_accessor :bel_error
+end
+self.bel_error = 0;
+
+class << self
+	attr_accessor :bel_en_ident
+end
+self.bel_en_ident = 9;
+class << self
+	attr_accessor :bel_en_string
+end
+self.bel_en_string = 11;
+class << self
+	attr_accessor :bel_en_list
+end
+self.bel_en_list = 1;
+
+
+      # end: ragel        
+          end
+
+          def each
+            @buffers = {}
+            data     = @content.unpack('C*')
+            p        = 0
+            pe       = data.length
+            eof      = data.length
+
+      # begin: ragel        
+            
+begin
+	p ||= 0
+	pe ||= data.length
+	cs = bel_start
+end
+
+            
+begin
+	testEof = false
+	_slen, _trans, _keys, _inds, _acts, _nacts = nil
+	_goto_level = 0
+	_resume = 10
+	_eof_trans = 15
+	_again = 20
+	_test_eof = 30
+	_out = 40
+	while true
+	if _goto_level <= 0
+	if p == pe
+		_goto_level = _test_eof
+		next
+	end
+	if cs == 0
+		_goto_level = _out
+		next
+	end
+	end
+	if _goto_level <= _resume
+	_keys = cs << 1
+	_inds = _bel_index_offsets[cs]
+	_slen = _bel_key_spans[cs]
+	_wide = data[p].ord
+	_trans = if (   _slen > 0 && 
+			_bel_trans_keys[_keys] <= _wide && 
+			_wide <= _bel_trans_keys[_keys + 1] 
+		    ) then
+			_bel_indicies[ _inds + _wide - _bel_trans_keys[_keys] ] 
+		 else 
+			_bel_indicies[ _inds + _slen ]
+		 end
+	cs = _bel_trans_targs[_trans]
+	if _bel_trans_actions[_trans] != 0
+	case _bel_trans_actions[_trans]
+	when 17 then
+		begin
+
+    (@buffers[:ident] ||= []) << data[p].ord
+  		end
+	when 7 then
+		begin
+
+    (@buffers[:string] ||= []) << data[p].ord
+  		end
+	when 11 then
+		begin
+
+    @buffers.delete(:string)
+    @buffers.delete(:ident)
+  		end
+	when 2 then
+		begin
+
+    @buffers[:list] = list()
+  		end
+	when 12 then
+		begin
+
+    #TODO: Mark @buffers[:list] as complete.
+  		end
+	when 13 then
+		begin
+
+    yield @buffers[:list]
+  		end
+	when 1 then
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 5 then
+		begin
+
+    @buffers[:ident] = []
+  		end
+		begin
+
+    (@buffers[:ident] ||= []) << data[p].ord
+  		end
+	when 20 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    yield @buffers[:ident]
+  		end
+	when 19 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    @buffers[:ident] ||= []
+    yield @buffers[:ident]
+  		end
+	when 4 then
+		begin
+
+    @buffers[:string] = []
+  		end
+		begin
+
+    (@buffers[:string] ||= []) << data[p].ord
+  		end
+	when 22 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    yield @buffers[:string]
+  		end
+	when 21 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    @buffers[:string] ||= []
+    yield @buffers[:string]
+  		end
+	when 15 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+	when 8 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+	when 16 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers.delete(:string)
+    @buffers.delete(:ident)
+  		end
+	when 18 then
+		begin
+
+    @buffers[:ident] = identifier(utf8_string(@buffers[:ident]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list] as complete.
+  		end
+	when 14 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 9 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers.delete(:string)
+    @buffers.delete(:ident)
+  		end
+	when 10 then
+		begin
+
+    @buffers[:string] = string(utf8_string(@buffers[:string]))
+  		end
+		begin
+
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list] as complete.
+  		end
+	when 6 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 3 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	end
+	end
+	end
+	if _goto_level <= _again
+	if cs == 0
+		_goto_level = _out
+		next
+	end
+	p += 1
+	if p != pe
+		_goto_level = _resume
+		next
+	end
+	end
+	if _goto_level <= _test_eof
+	if p == eof
+	  case _bel_eof_actions[cs]
+	when 1 then
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 19 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    @buffers[:ident] ||= []
+    yield @buffers[:ident]
+  		end
+	when 21 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    @buffers[:string] ||= []
+    yield @buffers[:string]
+  		end
+	when 14 then
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 6 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	when 3 then
+		begin
+
+    @buffers[:string] ||= []
+    @buffers[:string] = string(utf8_string(@buffers[:string]).sub(/\n$/, ''))
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] string as error.
+    @buffers[:list_arg] = list_item(@buffers[:string])
+  		end
+		begin
+
+    unless @buffers[:ident].is_a?(::AST::Node)
+      @buffers[:ident] ||= []
+      @buffers[:ident]   = identifier(utf8_string(@buffers[:ident]).sub(/\n$/, ''))
+    end
+  		end
+		begin
+
+    #TODO: Mark @buffers[:list_arg] identifier as error.
+    @buffers[:list_arg] = list_item(@buffers[:ident])
+  		end
+		begin
+
+    # Append list argument if its value is not empty.
+    list_arg_value = @buffers[:list_arg].children[0].children[0]
+    if list_arg_value != ''
+      @buffers[:list] <<= @buffers[:list_arg]
+    end
+  		end
+		begin
+
+    @buffers[:list] ||= list()
+    yield @buffers[:list]
+  		end
+	  end
+	end
+
+	end
+	if _goto_level <= _out
+		break
+	end
+end
+	end
+
+      # end: ragel        
+          end
+        end
+      end
+    end
+  end
+end
+
+if __FILE__ == $0
+  $stdin.each_line do |line|
+    BELParser::Parsers::Common::List.parse(line) { |obj|
+      puts obj.inspect
+    }
+  end
+end
+
+# vim: ft=ruby ts=2 sw=2:
+# encoding: utf-8