Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- task rmap_nowy_12_vseq_base::send_pkt();
- ptp_pkt = ptp_pkt_t::type_id::create("ptp_pkt");
- fd = $fopen("vect.txt","r");
- fd_val = $fopen("vect_number.txt","r");
- fd_packet_num = $fopen("packet_number.txt","r");
- status = $fscanf(fd_packet_num, "%d", packet_num);
- $display("Packet number: %d", packet_num);
- $fclose(fd_packet_num);
- for(int i = 0; i < packet_num; i++) begin
- status = $fscanf(fd_val, "%d", val);
- if (status == 0)
- begin
- $display("Error reading val");
- ptp_pkt.cargo = new[20];
- end
- else
- begin
- ptp_pkt.cargo = new[val];
- $display("Numbers: %d", val);
- end
- foreach(ptp_pkt.cargo[i])
- begin
- status = $fscanf(fd,"%h",data);
- ptp_pkt.cargo[i] = data;
- $display("My data value: %h", data );
- end
- $display("wait");
- ptp_pkt.start(spacewire_serial_0);
- end
- $fclose(fd_val);
- $fclose(fd);
- endtask
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement