luke
/
iverilog
mirror of https://github.com/steveicarus/iverilog.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

V0.9 back port of dumpers only sort scope list when needed. 

We need a slightly different patch for V0.9 than development. The fst
patch already has this change and the lxt2 file in V0.9 also needs
this change. See the development patch for more information.
This commit is contained in:
Cary R 2010-05-29 22:09:27 -07:00 committed by Stephen Williams
parent a346507e93
commit fbaecdff87
3 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
vpi/sys_lxt.c
View File

@ -759,8 +759,9 @@ static PLI_INT32 sys_dumpvars_calltf(PLI_BYTE8*name)
int dep = draw_scope(item); int dep = draw_scope(item);
vcd_names_sort(&lxt_tab);
scan_item(depth, item, 0); scan_item(depth, item, 0);
/* The scope list must be sorted after we scan an item. */
vcd_names_sort(&lxt_tab);
while (dep--) pop_scope(); while (dep--) pop_scope();
} }
@ -780,10 +781,10 @@ void sys_lxt_register()
s_vpi_systf_data tf_data; s_vpi_systf_data tf_data;
/* Scan the extended arguments, looking for lxt optimization /* Scan the extended arguments, looking for lxt optimization flags. */
flags. */
vpi_get_vlog_info(&vlog_info); vpi_get_vlog_info(&vlog_info);
/* The "speed" option is not used in this dumper. */
for (idx = 0 ; idx < vlog_info.argc ; idx += 1) { for (idx = 0 ; idx < vlog_info.argc ; idx += 1) {
if (strcmp(vlog_info.argv[idx],"-lxt-space") == 0) { if (strcmp(vlog_info.argv[idx],"-lxt-space") == 0) {
lxm_optimum_mode = LXM_SPACE; lxm_optimum_mode = LXM_SPACE;

3
vpi/sys_lxt2.c
View File

@ -770,8 +770,9 @@ static PLI_INT32 sys_dumpvars_calltf(PLI_BYTE8*name)
int dep = draw_scope(item); int dep = draw_scope(item);
vcd_names_sort(&lxt_tab);
scan_item(depth, item, 0); scan_item(depth, item, 0);
/* The scope list must be sorted after we scan an item. */
vcd_names_sort(&lxt_tab);
while (dep--) pop_scope(); while (dep--) pop_scope();
} }

3
vpi/sys_vcd.c
View File

@ -691,7 +691,6 @@ static void scan_item(unsigned depth, vpiHandle item, int skip)
"previously scanned scope %s.\n", fullname); "previously scanned scope %s.\n", fullname);
} else { } else {
vcd_names_add(&vcd_tab, fullname); vcd_names_add(&vcd_tab, fullname);
vcd_names_sort(&vcd_tab);
} }
name = vpi_get_str(vpiName, item); name = vpi_get_str(vpiName, item);
@ -822,6 +821,8 @@ static PLI_INT32 sys_dumpvars_calltf(PLI_BYTE8*name)
dep = draw_scope(item, callh); dep = draw_scope(item, callh);
scan_item(depth, item, 0); scan_item(depth, item, 0);
/* The scope list must be sorted after we scan an item. */
vcd_names_sort(&vcd_tab);
while (dep--) fprintf(dump_file, "$upscope $end\n"); while (dep--) fprintf(dump_file, "$upscope $end\n");