Fix waveform dumpers to use vpiInstance when dumping all variables.

(cherry picked from commit a7cb93842e)
This commit is contained in:
Martin Whitaker 2021-04-21 09:08:26 +01:00
parent 69cf8d8901
commit ada3067899
4 changed files with 12 additions and 12 deletions

View File

@ -824,10 +824,10 @@ static PLI_INT32 sys_dumpvars_calltf(ICARUS_VPI_CONST PLI_BYTE8*name)
} }
if (!depth) depth = 10000; if (!depth) depth = 10000;
/* This dumps all the modules in the design if none are given. */ /* This dumps all the instances in the design if none are given. */
if (!argv || !(item = vpi_scan(argv))) { if (!argv || !(item = vpi_scan(argv))) {
argv = vpi_iterate(vpiModule, 0x0); argv = vpi_iterate(vpiInstance, 0x0);
assert(argv); /* There must be at least one top level module. */ assert(argv); /* There must be at least one top level instance. */
item = vpi_scan(argv); item = vpi_scan(argv);
} }

View File

@ -768,10 +768,10 @@ static PLI_INT32 sys_dumpvars_calltf(ICARUS_VPI_CONST PLI_BYTE8*name)
} }
if (!depth) depth = 10000; if (!depth) depth = 10000;
/* This dumps all the modules in the design if none are given. */ /* This dumps all the instances in the design if none are given. */
if (!argv || !(item = vpi_scan(argv))) { if (!argv || !(item = vpi_scan(argv))) {
argv = vpi_iterate(vpiModule, 0x0); argv = vpi_iterate(vpiInstance, 0x0);
assert(argv); /* There must be at least one top level module. */ assert(argv); /* There must be at least one top level instance. */
item = vpi_scan(argv); item = vpi_scan(argv);
} }

View File

@ -820,10 +820,10 @@ static PLI_INT32 sys_dumpvars_calltf(ICARUS_VPI_CONST PLI_BYTE8*name)
} }
if (!depth) depth = 10000; if (!depth) depth = 10000;
/* This dumps all the modules in the design if none are given. */ /* This dumps all the instances in the design if none are given. */
if (!argv || !(item = vpi_scan(argv))) { if (!argv || !(item = vpi_scan(argv))) {
argv = vpi_iterate(vpiModule, 0x0); argv = vpi_iterate(vpiInstance, 0x0);
assert(argv); /* There must be at least one top level module. */ assert(argv); /* There must be at least one top level instance. */
item = vpi_scan(argv); item = vpi_scan(argv);
} }

View File

@ -804,10 +804,10 @@ static PLI_INT32 sys_dumpvars_calltf(ICARUS_VPI_CONST PLI_BYTE8*name)
} }
if (!depth) depth = 10000; if (!depth) depth = 10000;
/* This dumps all the modules in the design if none are given. */ /* This dumps all the instances in the design if none are given. */
if (!argv || !(item = vpi_scan(argv))) { if (!argv || !(item = vpi_scan(argv))) {
argv = vpi_iterate(vpiModule, 0x0); argv = vpi_iterate(vpiInstance, 0x0);
assert(argv); /* There must be at least one top level module. */ assert(argv); /* There must be at least one top level instance. */
item = vpi_scan(argv); item = vpi_scan(argv);
} }