class Kramdown::Parser::Kramdown

def parse_table
  orig_pos = @src.pos
  table = new_block_el(:table, nil, :alignment => [])
  @src.scan(TABLE_SEP_LINE)
  rows = []
  has_footer = false
  columns = 0
  add_container = lambda do |type, force|
    if force || type != :tbody || !has_footer
      cont = Element.new(type)
      cont.children, rows = rows, []
      table.children << cont
    end
  end
  while !@src.eos?
    if @src.scan(TABLE_SEP_LINE) && !rows.empty?
      if table.options[:alignment].empty? && !has_footer
        add_container.call(:thead, false)
        table.options[:alignment] = @src[1].scan(TABLE_HSEP_ALIGN).map do |left, right|
          (left.empty? && right.empty? && :default) || (right.empty? && :left) || (left.empty? && :right) || :center
        end
      else # treat as normal separator line
        add_container.call(:tbody, false)
      end
    elsif @src.scan(TABLE_FSEP_LINE)
      add_container.call(:tbody, true) if !rows.empty?
      has_footer = true
    elsif @src.scan(TABLE_ROW_LINE)
      trow = Element.new(:tr)
      cells = (@src[1] + ' ').split(/\|/)
      i = 0
      while i < cells.length - 1
        backslashes = cells[i].scan(/\\+$/).first
        if backslashes && backslashes.length % 2 == 1
          cells[i] = cells[i].chop + '|' + cells[i+1]
          cells.delete_at(i+1)
        else
          i += 1
        end
      end
      cells.pop if cells.last.strip.empty?
      cells.each do |cell_text|
        tcell = Element.new(:td)
        tcell.children << Element.new(:text, cell_text.strip)
        trow.children << tcell
      end
      columns = [columns, cells.length].max
      rows << trow
    else
      break
    end
  end
  add_container.call(has_footer ? :tfoot : :tbody, false) if !rows.empty?
  if !table.children.any? {|c| c.type == :tbody}
    warning("Found table without body - ignoring it")
    @src.pos = orig_pos
    return false
  end
  # adjust all table rows to have equal number of columns, same for alignment defs
  table.children.each do |kind|
    kind.children.each do |row|
      (columns - row.children.length).times do
        row.children << Element.new(:td)
      end
    end
  end
  if table.options[:alignment].length > columns
    table.options[:alignment] = table.options[:alignment][0...columns]
  else
    table.options[:alignment] += [:default] * (columns - table.options[:alignment].length)
  end
  @tree.children << table
  true
end