| /* | |
| * From PR#751. | |
| * The (*) can get tangled with a contracted (* *) | |
| */ | |
| module tb; | |
| reg [1:0] sel; | |
| reg [0:3] in; | |
| reg out; | |
| always @(*) | |
| out = in[sel]; | |
| initial | |
| begin | |
| $monitor($time, " %b[%b]: %b", in, sel, out); | |
| #10 in = 4'b 0100; | |
| #10 sel = 0; | |
| #10 sel = 1; | |
| #10 $finish; | |
| end | |
| endmodule |