diff --git a/ivtest/ivltests/sv_class_prop_packed_dims.v b/ivtest/ivltests/sv_class_prop_packed_dims.v new file mode 100644 index 000000000..05d97179e --- /dev/null +++ b/ivtest/ivltests/sv_class_prop_packed_dims.v @@ -0,0 +1,40 @@ +// Check that multi-dimensional packed vector class properties are supported. + +module test; + + bit failed = 1'b0; + + `define check(val, exp) do begin \ + if (val !== exp) begin \ + $display("FAILED(%0d). '%s' expected %0h, got %0h", `__LINE__, \ + `"val`", exp, val); \ + failed = 1'b1; \ + end \ + end while (0) + + class C; + logic [1:0][3:0] x; + bit [0:1][0:3] y; + endclass + + C c; + + initial begin + c = new; + + c.x = 8'h5a; + c.y = 8'hc3; + `check(c.x, 8'h5a); + `check(c.y, 8'hc3); + + c.x += 8'h01; + c.y ^= 8'hff; + `check(c.x, 8'h5b); + `check(c.y, 8'h3c); + + if (!failed) begin + $display("PASSED"); + end + end + +endmodule diff --git a/ivtest/regress-vvp.list b/ivtest/regress-vvp.list index 09f0498cf..6db59a86b 100644 --- a/ivtest/regress-vvp.list +++ b/ivtest/regress-vvp.list @@ -264,6 +264,7 @@ sv_chained_constructor5 vvp_tests/sv_chained_constructor5.json sv_class_prop_assign_op1 vvp_tests/sv_class_prop_assign_op1.json sv_class_prop_assign_op2 vvp_tests/sv_class_prop_assign_op2.json sv_class_prop_logic vvp_tests/sv_class_prop_logic.json +sv_class_prop_packed_dims vvp_tests/sv_class_prop_packed_dims.json sv_class_prop_nest_darray1 vvp_tests/sv_class_prop_nest_darray1.json sv_class_prop_nest_obj1 vvp_tests/sv_class_prop_nest_obj1.json sv_class_prop_nest_real1 vvp_tests/sv_class_prop_nest_real1.json diff --git a/ivtest/vvp_tests/sv_class_prop_packed_dims.json b/ivtest/vvp_tests/sv_class_prop_packed_dims.json new file mode 100644 index 000000000..2697dc424 --- /dev/null +++ b/ivtest/vvp_tests/sv_class_prop_packed_dims.json @@ -0,0 +1,9 @@ +{ + "type" : "normal", + "source" : "sv_class_prop_packed_dims.v", + "iverilog-args" : [ "-g2005-sv" ], + "vlog95" : { + "__comment" : "Classes are not supported", + "type" : "CE" + } +}