[Cryptech-Commits] [core/math/modexpng] 83/92: Better handling of debug output (no need to manally adjust word count anymore).

git at cryptech.is git at cryptech.is
Sat Mar 14 18:20:02 UTC 2020


This is an automated email from the git hooks/post-receive script.

paul at psgd.org pushed a commit to branch master
in repository core/math/modexpng.

commit bc4eb54a4b0d84c4028e5afa7d8509b66aedaf8a
Author: Pavel V. Shatov (Meister) <meisterpaul1 at yandex.ru>
AuthorDate: Mon Feb 3 22:35:44 2020 +0300

    Better handling of debug output (no need to manally adjust word count anymore).
---
 rtl/modexpng_core_top_debug.vh | 144 ++++++++++++++++++++---------------------
 1 file changed, 72 insertions(+), 72 deletions(-)

diff --git a/rtl/modexpng_core_top_debug.vh b/rtl/modexpng_core_top_debug.vh
index 0b69340..9e1d6ec 100644
--- a/rtl/modexpng_core_top_debug.vh
+++ b/rtl/modexpng_core_top_debug.vh
@@ -40,86 +40,86 @@ always @(posedge clk)
         //
         // X.X
         //
-        $write("                  "); for (i=0; i<32; i=i+1) $write("[ %3d ] ", i);                                              $write("\n");
-        $write("X.X.WIDE.A:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[0*256+i]); $write("\n");
-        $write("X.X.WIDE.B:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[1*256+i]); $write("\n");
-        $write("X.X.WIDE.C:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[2*256+i]); $write("\n");
-        $write("X.X.WIDE.D:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[3*256+i]); $write("\n");
-        $write("X.X.WIDE.E:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[4*256+i]); $write("\n");
-        $write("X.X.WIDE.N:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[5*256+i]); $write("\n");
-        $write("X.X.WIDE.L:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[6*256+i]); $write("\n");
-        $write("X.X.WIDE.H:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[7*256+i]); $write("\n");
-        $write("                  "); for (i=0; i<32; i=i+1) $write("------- ");                                                 $write("\n");
-        $write("X.X.NARROW.A:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[0*256+i]);           $write("\n");
-        $write("X.X.NARROW.B:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[1*256+i]);           $write("\n");
-        $write("X.X.NARROW.C:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[2*256+i]);           $write("\n");
-        $write("X.X.NARROW.D:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[3*256+i]);           $write("\n");
-        $write("X.X.NARROW.E:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[4*256+i]);           $write("\n");
-        $write("X.X.NARROW.COEFF: "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[5*256+i]);           $write("\n");
-        $write("X.X.NARROW.Q:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[6*256+i]);           $write("\n");
-        $write("X.X.NARROW.EXT:   "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[7*256+i]);           $write("\n");
+        $write("                  "); for (i=0; i<=word_index_last_n; i=i+1) $write("[ %3d ] ", i);                                              $write("\n");
+        $write("X.X.WIDE.A:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[0*256+i]); $write("\n");
+        $write("X.X.WIDE.B:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[1*256+i]); $write("\n");
+        $write("X.X.WIDE.C:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[2*256+i]); $write("\n");
+        $write("X.X.WIDE.D:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[3*256+i]); $write("\n");
+        $write("X.X.WIDE.E:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[4*256+i]); $write("\n");
+        $write("X.X.WIDE.N:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[5*256+i]); $write("\n");
+        $write("X.X.WIDE.L:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[6*256+i]); $write("\n");
+        $write("X.X.WIDE.H:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_x.mem[7*256+i]); $write("\n");
+        $write("                  "); for (i=0; i<=word_index_last_n; i=i+1) $write("------- ");                                                 $write("\n");
+        $write("X.X.NARROW.A:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[0*256+i]);           $write("\n");
+        $write("X.X.NARROW.B:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[1*256+i]);           $write("\n");
+        $write("X.X.NARROW.C:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[2*256+i]);           $write("\n");
+        $write("X.X.NARROW.D:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[3*256+i]);           $write("\n");
+        $write("X.X.NARROW.E:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[4*256+i]);           $write("\n");
+        $write("X.X.NARROW.COEFF: "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[5*256+i]);           $write("\n");
+        $write("X.X.NARROW.Q:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[6*256+i]);           $write("\n");
+        $write("X.X.NARROW.EXT:   "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_x.mem[7*256+i]);           $write("\n");
         //
         // X.Y
         //
-        $write("                  "); for (i=0; i<32; i=i+1) $write("[ %3d ] ", i);                                              $write("\n");
-        $write("X.Y.WIDE.A:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[0*256+i]); $write("\n");
-        $write("X.Y.WIDE.B:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[1*256+i]); $write("\n");
-        $write("X.Y.WIDE.C:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[2*256+i]); $write("\n");
-        $write("X.Y.WIDE.D:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[3*256+i]); $write("\n");
-        $write("X.Y.WIDE.E:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[4*256+i]); $write("\n");
-        $write("X.Y.WIDE.N:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[5*256+i]); $write("\n");
-        $write("X.Y.WIDE.L:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[6*256+i]); $write("\n");
-        $write("X.Y.WIDE.H:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[7*256+i]); $write("\n");
-        $write("                  "); for (i=0; i<32; i=i+1) $write("------- ");                                                 $write("\n");
-        $write("X.Y.NARROW.A:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[0*256+i]);           $write("\n");
-        $write("X.Y.NARROW.B:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[1*256+i]);           $write("\n");
-        $write("X.Y.NARROW.C:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[2*256+i]);           $write("\n");
-        $write("X.Y.NARROW.D:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[3*256+i]);           $write("\n");
-        $write("X.Y.NARROW.E:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[4*256+i]);           $write("\n");
-        $write("X.Y.NARROW.COEFF: "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[5*256+i]);           $write("\n");
-        $write("X.Y.NARROW.Q:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[6*256+i]);           $write("\n");
-        $write("X.Y.NARROW.EXT:   "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[7*256+i]);           $write("\n");
+        $write("                  "); for (i=0; i<=word_index_last_n; i=i+1) $write("[ %3d ] ", i);                                              $write("\n");
+        $write("X.Y.WIDE.A:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[0*256+i]); $write("\n");
+        $write("X.Y.WIDE.B:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[1*256+i]); $write("\n");
+        $write("X.Y.WIDE.C:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[2*256+i]); $write("\n");
+        $write("X.Y.WIDE.D:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[3*256+i]); $write("\n");
+        $write("X.Y.WIDE.E:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[4*256+i]); $write("\n");
+        $write("X.Y.WIDE.N:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[5*256+i]); $write("\n");
+        $write("X.Y.WIDE.L:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[6*256+i]); $write("\n");
+        $write("X.Y.WIDE.H:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.gen_wide[0].wide_y.mem[7*256+i]); $write("\n");
+        $write("                  "); for (i=0; i<=word_index_last_n; i=i+1) $write("------- ");                                                 $write("\n");
+        $write("X.Y.NARROW.A:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[0*256+i]);           $write("\n");
+        $write("X.Y.NARROW.B:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[1*256+i]);           $write("\n");
+        $write("X.Y.NARROW.C:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[2*256+i]);           $write("\n");
+        $write("X.Y.NARROW.D:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[3*256+i]);           $write("\n");
+        $write("X.Y.NARROW.E:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[4*256+i]);           $write("\n");
+        $write("X.Y.NARROW.COEFF: "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[5*256+i]);           $write("\n");
+        $write("X.Y.NARROW.Q:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[6*256+i]);           $write("\n");
+        $write("X.Y.NARROW.EXT:   "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_x.narrow_y.mem[7*256+i]);           $write("\n");
         //
         // Y.X
         //
-        $write("                  "); for (i=0; i<32; i=i+1) $write("[ %3d ] ", i);                                              $write("\n");
-        $write("Y.X.WIDE.A:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[0*256+i]); $write("\n");
-        $write("Y.X.WIDE.B:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[1*256+i]); $write("\n");
-        $write("Y.X.WIDE.C:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[2*256+i]); $write("\n");
-        $write("Y.X.WIDE.D:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[3*256+i]); $write("\n");
-        $write("Y.X.WIDE.E:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[4*256+i]); $write("\n");
-        $write("Y.X.WIDE.N:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[5*256+i]); $write("\n");
-        $write("Y.X.WIDE.L:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[6*256+i]); $write("\n");
-        $write("Y.X.WIDE.H:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[7*256+i]); $write("\n");
-        $write("                  "); for (i=0; i<32; i=i+1) $write("------- ");                                                 $write("\n");
-        $write("Y.X.NARROW.A:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[0*256+i]);           $write("\n");
-        $write("Y.X.NARROW.B:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[1*256+i]);           $write("\n");
-        $write("Y.X.NARROW.C:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[2*256+i]);           $write("\n");
-        $write("Y.X.NARROW.D:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[3*256+i]);           $write("\n");
-        $write("Y.X.NARROW.E:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[4*256+i]);           $write("\n");
-        $write("Y.X.NARROW.COEFF: "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[5*256+i]);           $write("\n");
-        $write("Y.X.NARROW.Q:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[6*256+i]);           $write("\n");
-        $write("Y.X.NARROW.EXT:   "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[7*256+i]);           $write("\n");
+        $write("                  "); for (i=0; i<=word_index_last_n; i=i+1) $write("[ %3d ] ", i);                                              $write("\n");
+        $write("Y.X.WIDE.A:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[0*256+i]); $write("\n");
+        $write("Y.X.WIDE.B:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[1*256+i]); $write("\n");
+        $write("Y.X.WIDE.C:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[2*256+i]); $write("\n");
+        $write("Y.X.WIDE.D:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[3*256+i]); $write("\n");
+        $write("Y.X.WIDE.E:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[4*256+i]); $write("\n");
+        $write("Y.X.WIDE.N:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[5*256+i]); $write("\n");
+        $write("Y.X.WIDE.L:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[6*256+i]); $write("\n");
+        $write("Y.X.WIDE.H:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_x.mem[7*256+i]); $write("\n");
+        $write("                  "); for (i=0; i<=word_index_last_n; i=i+1) $write("------- ");                                                 $write("\n");
+        $write("Y.X.NARROW.A:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[0*256+i]);           $write("\n");
+        $write("Y.X.NARROW.B:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[1*256+i]);           $write("\n");
+        $write("Y.X.NARROW.C:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[2*256+i]);           $write("\n");
+        $write("Y.X.NARROW.D:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[3*256+i]);           $write("\n");
+        $write("Y.X.NARROW.E:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[4*256+i]);           $write("\n");
+        $write("Y.X.NARROW.COEFF: "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[5*256+i]);           $write("\n");
+        $write("Y.X.NARROW.Q:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[6*256+i]);           $write("\n");
+        $write("Y.X.NARROW.EXT:   "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_x.mem[7*256+i]);           $write("\n");
         //
         // Y.Y
         //
-        $write("                  "); for (i=0; i<32; i=i+1) $write("[ %3d ] ", i);                                              $write("\n");
-        $write("Y.Y.WIDE.A:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[0*256+i]); $write("\n");
-        $write("Y.Y.WIDE.B:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[1*256+i]); $write("\n");
-        $write("Y.Y.WIDE.C:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[2*256+i]); $write("\n");
-        $write("Y.Y.WIDE.D:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[3*256+i]); $write("\n");
-        $write("Y.Y.WIDE.E:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[4*256+i]); $write("\n");
-        $write("Y.Y.WIDE.N:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[5*256+i]); $write("\n");
-        $write("Y.Y.WIDE.L:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[6*256+i]); $write("\n");
-        $write("Y.Y.WIDE.H:       "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[7*256+i]); $write("\n");
-        $write("                  "); for (i=0; i<32; i=i+1) $write("------- ");                                                 $write("\n");
-        $write("Y.Y.NARROW.A:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[0*256+i]);           $write("\n");
-        $write("Y.Y.NARROW.B:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[1*256+i]);           $write("\n");
-        $write("Y.Y.NARROW.C:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[2*256+i]);           $write("\n");
-        $write("Y.Y.NARROW.D:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[3*256+i]);           $write("\n");
-        $write("Y.Y.NARROW.E:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[4*256+i]);           $write("\n");
-        $write("Y.Y.NARROW.COEFF: "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[5*256+i]);           $write("\n");
-        $write("Y.Y.NARROW.Q:     "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[6*256+i]);           $write("\n");
-        $write("Y.Y.NARROW.EXT:   "); for (i=0; i<32; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[7*256+i]);           $write("\n");
+        $write("                  "); for (i=0; i<=word_index_last_n; i=i+1) $write("[ %3d ] ", i);                                              $write("\n");
+        $write("Y.Y.WIDE.A:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[0*256+i]); $write("\n");
+        $write("Y.Y.WIDE.B:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[1*256+i]); $write("\n");
+        $write("Y.Y.WIDE.C:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[2*256+i]); $write("\n");
+        $write("Y.Y.WIDE.D:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[3*256+i]); $write("\n");
+        $write("Y.Y.WIDE.E:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[4*256+i]); $write("\n");
+        $write("Y.Y.WIDE.N:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[5*256+i]); $write("\n");
+        $write("Y.Y.WIDE.L:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[6*256+i]); $write("\n");
+        $write("Y.Y.WIDE.H:       "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.gen_wide[0].wide_y.mem[7*256+i]); $write("\n");
+        $write("                  "); for (i=0; i<=word_index_last_n; i=i+1) $write("------- ");                                                 $write("\n");
+        $write("Y.Y.NARROW.A:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[0*256+i]);           $write("\n");
+        $write("Y.Y.NARROW.B:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[1*256+i]);           $write("\n");
+        $write("Y.Y.NARROW.C:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[2*256+i]);           $write("\n");
+        $write("Y.Y.NARROW.D:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[3*256+i]);           $write("\n");
+        $write("Y.Y.NARROW.E:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[4*256+i]);           $write("\n");
+        $write("Y.Y.NARROW.COEFF: "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[5*256+i]);           $write("\n");
+        $write("Y.Y.NARROW.Q:     "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[6*256+i]);           $write("\n");
+        $write("Y.Y.NARROW.EXT:   "); for (i=0; i<=word_index_last_n; i=i+1) $write("0x%05x ", storage_block_y.narrow_y.mem[7*256+i]);           $write("\n");
         //
     end



More information about the Commits mailing list