int main(){
    program p = compile_file("tomb.pike"); //o egy class, csak mutatok minden fuggvenyre osztalyra stb
    object progi = p(); // peldanyositjuk a class-t
    object rec = progi->record();
    object rec2 = p->record(); // lehet, mert record non-static konstans;
    progi->show_record(rec);
    progi->main();
    write("----------\n");
    write("program.pike\n");
    write("----------\n");
    progi->show_record(rec2);
    //array(p->record) records; HIBA vs array(record) records; in tomb.pike
    //array(progi->record) records;  progi local variable, azzal meg nem deklaralhatunk arrayt
    //inherit vs program2.pike
    return 0;

}