tape_block * myblock=0;
do{
if (myblock) delete myblock;
- myblock=new tape_block(0);
+ myblock=tape_block::gen_from_fd(0);
printf ("Block type:%2o-%o\n",myblock->get_type(),myblock->get_subtype());
} while (myblock->get_state()==tape_block::TBS_OK);
printf("---");