Creating a Queue of Classes

This is an example of using a queue of classes. ----file: queue_of_classes.sv---- // compile with: ncverilog queue_of_classes.sv +sv package mypack; class some_class; randc shortint myint; constraint c1 {myint inside {[1:20]}; } function void printit; $display("value= %d", myint); endfunction endclass endpackage // --------------------- // this module creates a queue of classes module queue_of_classes(); import mypack::*; logic clk = 'b1; initial forever clk = #10 ~clk; int success; some_class myQ[$]; some_class myclass; task dowrite; $display("--------Write Queue--------"); myclass = new; // create point to new class object success = myclass.randomize(); myclass.printit; myQ.push_front(myclass ); // push onto queue endtask task doread; $display("--------Read Queue---------"); if (myQ.size() > 0) begin: datainQ myclass = myQ.pop_back(); // pop queue myclass.printit; end: datainQ else $display("Queue Empty - cant read"); endtask task doQueContents; // non-destructive read $display("--------Queue Stats-------------"); $display("Que Size= %d", myQ.size() ); for (int j=0; j