
function dump_table(table, html_target_id)
{
  var data_text = '';
  for (var i=0; i<table.length; i++)
  {
    data_text += "<TR>";
    var data_line = table[i];
    for (j=0; j<data_line.length; j++)
      data_text += "<TD>" + data_line[j] + "</TD>";
    data_text += "</TR>";
  }
  document.getElementById(html_target_id).innerHTML += "<TABLE>"+data_text+"</TABLE>";
}

function dump_object(object, recursion, max_recursion, slot_name, html_target_id)
{
  var indent = '';
  for (var i=0; i<=recursion; i++)
    indent += '  ';

  if (object == null)
    return indent + slot_name + " - null\n";
  //cut the strings composed of just one char
  if (object.length < 2)
    return "";

  var string = indent + slot_name + ' - ' + object.toString() + "\n";

  if (recursion <= max_recursion)
    for (var slot in object)
      //if (slot != 'clone')
        string += dump_object(object[slot], recursion+1, max_recursion, slot);

  if (recursion != 0)
    return string;
  else
    document.getElementById(html_target_id).innerHTML += "<PRE>" + string + "</PRE>";
}

