Function insertCallNode

src/compile.cpp:9349–9376

}

GcArray* insertCallNode(MyThread* t,
                        GcArray* table,
                        unsigned* size,
                        GcCallNode* node)
{
  if (DebugCallTable) {
    fprintf(stderr,
            "insert call node %p\n",
            reinterpret_cast<void*>(node->address()));
  }

  PROTECT(t, table);
  PROTECT(t, node);

  ++(*size);

  if (*size >= table->length() * 2) {
    table = resizeTable(t, table, table->length() * 2);
  }

  intptr_t key = node->address();
  unsigned index = static_cast<uintptr_t>(key) & (table->length() - 1);

  node->setNext(t, cast<GcCallNode>(t, table->body()[index]));
  table->setBodyElement(t, index, node);

  return table;
}

GcHashMap* makeClassMap(Thread* t,
                        unsigned* table,