/* There is only one block in main, it contains the allocation and the calls. */
/* Allocate the defined object and generate the type information. */
symconst_symbol sym = {class_prima};
- obj_size = new_SymConst(sym, symconst_size);
+ obj_size = new_SymConst(sym, symconst_type_size);
obj_o = new_Alloc(get_store(), obj_size, class_prima, heap_alloc);
set_store(new_Proj(obj_o, mode_M, 0)); /* make the changed memory visible */
obj_o = new_Proj(obj_o, mode_P, 2); /* remember the pointer to the object */