From 27897d5ba228cda74d803a6741c2c78e813d0741 Mon Sep 17 00:00:00 2001 From: Ryszard Rozak Date: Thu, 19 Feb 2026 09:55:43 +0100 Subject: [PATCH] Move testcase with real to supported Signed-off-by: Ryszard Rozak --- test_regress/t/t_force_unpacked.v | 11 +++++++++++ test_regress/t/t_force_unpacked_unsup.v | 11 ----------- 2 files changed, 11 insertions(+), 11 deletions(-) diff --git a/test_regress/t/t_force_unpacked.v b/test_regress/t/t_force_unpacked.v index 8335035e5..193c02e63 100644 --- a/test_regress/t/t_force_unpacked.v +++ b/test_regress/t/t_force_unpacked.v @@ -25,6 +25,7 @@ module t ( int int_arr[-1:2][1][3]; bit [5:0] bit_arr[5]; union_t union_arr[4]; + real real_arr[2][1][3]; assign bit_arr[2][3] = 1; @@ -35,18 +36,21 @@ module t ( logic_arr[0][2][-4] <= 1; int_arr[0][0][2] <= 1; union_arr[1].x <= 1; + real_arr[0][0][1] <= 1; end else if (cyc == 1) begin `checkh(logic_arr[0][2][-4], 1); `checkh(int_arr[0][0][2], 1); `checkh(bit_arr[2][3], 1); `checkh(union_arr[1].x, 1); + `checkr(real_arr[0][0][1], 1); end else if (cyc == 2) begin force logic_arr[0][2][-4] = 0; force int_arr[0][0][2] = 0; force bit_arr[2][3] = 0; force union_arr[1].y = 2; + force real_arr[0][0][1] = 0; end else if (cyc == 3) begin `checkh(logic_arr[0][2][-4], 0); @@ -56,11 +60,14 @@ module t ( `checkh(bit_arr[2][3], 0); `checkh(union_arr[1].x, 2); union_arr[1].x <= 3; + `checkr(real_arr[0][0][1], 0); + real_arr[0][0][1] <= 2; end else if (cyc == 4) begin `checkh(logic_arr[0][2][-4], 0); `checkh(int_arr[0][0][2], 0); `checkh(union_arr[1].y, 2); + `checkr(real_arr[0][0][1], 0); end else if (cyc == 5) begin release logic_arr[0][2][-4]; @@ -68,6 +75,7 @@ module t ( release bit_arr[2][3]; `checkh(bit_arr[2][3], 1); release union_arr[1].x; + release real_arr[0][0][1]; end else if (cyc == 6) begin `checkh(logic_arr[0][2][-4], 0); @@ -77,11 +85,14 @@ module t ( `checkh(bit_arr[2][3], 1); `checkh(union_arr[1].x, 2); union_arr[1].y <= 4; + `checkr(real_arr[0][0][1], 0); + real_arr[0][0][1] <= 3; end else if (cyc == 7) begin `checkh(logic_arr[0][2][-4], 1); `checkh(int_arr[0][0][2], 1); `checkh(union_arr[1].x, 4); + `checkr(real_arr[0][0][1], 3); end else if (cyc == 8) begin $write("*-* All Finished *-*\n"); diff --git a/test_regress/t/t_force_unpacked_unsup.v b/test_regress/t/t_force_unpacked_unsup.v index 27562ed45..c173b84c4 100644 --- a/test_regress/t/t_force_unpacked_unsup.v +++ b/test_regress/t/t_force_unpacked_unsup.v @@ -20,54 +20,43 @@ module t ( struct_t s_array[3000]; bit big_array[40][40][40]; - real r_array[2]; // Test loop always @(posedge clk) begin cyc <= cyc + 1; if (cyc == 0) begin - r_array[0] <= 1; big_array[1][2][3] <= 1; s_array[1].x <= 1; end else if (cyc == 1) begin - `checkr(r_array[0], 1); `checkr(big_array[1][2][3], 1); `checkh(s_array[1].x, 1); end else if (cyc == 2) begin - force r_array[0] = 0; force big_array[1][2][3] = 0; force s_array[1].x = 0; end else if (cyc == 3) begin - `checkr(r_array[0], 0); `checkr(big_array[1][2][3], 0); - r_array[0] <= 1; big_array[1][2][3] <= 1; `checkh(s_array[1].x, 0); s_array[1].x <= 1; end else if (cyc == 4) begin - `checkr(r_array[0], 0); `checkr(big_array[1][2][3], 0); `checkh(s_array[1].x, 0); end else if (cyc == 5) begin - release r_array[0]; release big_array[1][2][3]; release s_array[1].x; end else if (cyc == 6) begin - `checkr(r_array[0], 0); `checkr(big_array[1][2][3], 0); - r_array[0] <= 1; big_array[1][2][3] <= 1; `checkh(s_array[1].x, 0); s_array[1].x <= 1; end else if (cyc == 7) begin - `checkr(r_array[0], 1); `checkr(big_array[1][2][3], 1); `checkh(s_array[1].x, 1); end