URL
https://opencores.org/ocsvn/ahb_slave/ahb_slave/trunk
Subversion Repositories ahb_slave
[/] [ahb_slave/] [trunk/] [src/] [gen/] [prgen_rand.v] - Rev 2
Go to most recent revision | Compare with Previous | Blame | View Log
function integer rand_chance; input [31:0] chance_true; begin if (chance_true > 100) begin $display("RAND_CHANCE-E-: fatal error, rand_chance called with percent chance larger than 100.\tTime: %0d ns", $time); $finish; end rand_chance = (rand(1,100) <= chance_true); end endfunction // rand_chance function integer rand; input [31:0] min; input [31:0] max; integer range; begin if (min > max) begin $display("RAND-E-: fatal error, rand was called with min larger than max.\tTime: %0d ns", $time); $finish; end range = (max - min) + 1; if (range == 0) range = -1; rand = min + ($random % range); end endfunction // rand function integer align; input [31:0] num; input [31:0] align_size; integer align; begin align = num - (num % align_size); end endfunction function integer rand_align; input [31:0] min; input [31:0] max; input [31:0] align; integer rand_align; begin rand_align = rand(min, max); if (rand_align > align) rand_align = align(rand_align, align); end endfunction
Go to most recent revision | Compare with Previous | Blame | View Log