Report a package connot be dumped with most dumpers

This commit is contained in:
Cary R 2020-11-29 12:41:34 -08:00
parent 1b4244474c
commit a7ce4ec110
4 changed files with 26 additions and 8 deletions

View File

@ -1,5 +1,5 @@
/* /*
* Copyright (c) 1999-2016 Stephen Williams (steve@icarus.com) * Copyright (c) 1999-2020 Stephen Williams (steve@icarus.com)
* *
* This source code is free software; you can redistribute it * This source code is free software; you can redistribute it
* and/or modify it in source code form under the terms of the GNU * and/or modify it in source code form under the terms of the GNU
@ -533,11 +533,12 @@ static void scan_item(unsigned depth, vpiHandle item, int skip)
case vpiFunction: stype = FST_ST_VCD_FUNCTION; break; case vpiFunction: stype = FST_ST_VCD_FUNCTION; break;
case vpiGenScope: stype = FST_ST_VCD_GENERATE; break; case vpiGenScope: stype = FST_ST_VCD_GENERATE; break;
case vpiModule: stype = FST_ST_VCD_MODULE; break; case vpiModule: stype = FST_ST_VCD_MODULE; break;
case vpiPackage: stype = FST_ST_VCD_PACKAGE; break;
case vpiTask: stype = FST_ST_VCD_TASK; break; case vpiTask: stype = FST_ST_VCD_TASK; break;
default: default:
vpi_printf("FST warning: $dumpvars: Unsupported argument " vpi_printf("FST warning: $dumpvars: Unsupported argument "
"type (%s)\n", vpi_get_str(vpiType, item)); "type (%s).\n", vpi_get_str(vpiType, item));
return; return;
} }
@ -662,6 +663,7 @@ static void scan_item(unsigned depth, vpiHandle item, int skip)
break; break;
case vpiModule: case vpiModule:
case vpiPackage:
case vpiGenScope: case vpiGenScope:
case vpiFunction: case vpiFunction:
case vpiTask: case vpiTask:

View File

@ -1,5 +1,5 @@
/* /*
* Copyright (c) 2002-2018 Stephen Williams (steve@icarus.com) * Copyright (c) 2002-2020 Stephen Williams (steve@icarus.com)
* *
* This source code is free software; you can redistribute it * This source code is free software; you can redistribute it
* and/or modify it in source code form under the terms of the GNU * and/or modify it in source code form under the terms of the GNU
@ -709,9 +709,14 @@ static void scan_item(unsigned depth, vpiHandle item, int skip)
} }
break; break;
case vpiPackage: /* Skipped */
vpi_printf("LXT warning: $dumpvars: Package (%s) is not dumpable "
"with LXT.\n", vpi_get_str(vpiFullName, item));
break;
default: default:
vpi_printf("LXT warning: $dumpvars: Unsupported parameter " vpi_printf("LXT warning: $dumpvars: Unsupported parameter "
"type (%s)\n", vpi_get_str(vpiType, item)); "type (%s).\n", vpi_get_str(vpiType, item));
} }
} }

View File

@ -1,5 +1,5 @@
/* /*
* Copyright (c) 2003-2018 Stephen Williams (steve@icarus.com) * Copyright (c) 2003-2020 Stephen Williams (steve@icarus.com)
* *
* This source code is free software; you can redistribute it * This source code is free software; you can redistribute it
* and/or modify it in source code form under the terms of the GNU * and/or modify it in source code form under the terms of the GNU
@ -761,9 +761,14 @@ static void scan_item(unsigned depth, vpiHandle item, int skip)
} }
break; break;
case vpiPackage:
vpi_printf("LXT2 warning: $dumpvars: Package (%s) is not dumpable "
"with LXT2.\n", vpi_get_str(vpiFullName, item));
break;
default: default:
vpi_printf("LXT2 warning: $dumpvars: Unsupported parameter " vpi_printf("LXT2 warning: $dumpvars: Unsupported parameter "
"type (%s)\n", vpi_get_str(vpiType, item)); "type (%s).\n", vpi_get_str(vpiType, item));
} }
} }

View File

@ -1,5 +1,5 @@
/* /*
* Copyright (c) 1999-2016 Stephen Williams (steve@icarus.com) * Copyright (c) 1999-2020 Stephen Williams (steve@icarus.com)
* *
* This source code is free software; you can redistribute it * This source code is free software; you can redistribute it
* and/or modify it in source code form under the terms of the GNU * and/or modify it in source code form under the terms of the GNU
@ -561,11 +561,12 @@ static void scan_item(unsigned depth, vpiHandle item, int skip)
case vpiNamedFork: type = "fork"; break; case vpiNamedFork: type = "fork"; break;
case vpiFunction: type = "function"; break; case vpiFunction: type = "function"; break;
case vpiModule: type = "module"; break; case vpiModule: type = "module"; break;
case vpiPackage: type = "package"; break;
case vpiTask: type = "task"; break; case vpiTask: type = "task"; break;
default: default:
vpi_printf("VCD warning: $dumpvars: Unsupported argument " vpi_printf("VCD warning: $dumpvars: Unsupported argument "
"type (%s)\n", vpi_get_str(vpiType, item)); "type (%s).\n", vpi_get_str(vpiType, item));
return; return;
} }
@ -731,6 +732,11 @@ static void scan_item(unsigned depth, vpiHandle item, int skip)
fprintf(dump_file, "$upscope $end\n"); fprintf(dump_file, "$upscope $end\n");
} }
break; break;
case vpiPackage:
vpi_printf("VCD warning: $dumpvars: Package (%s) is not dumpable "
"with VCD.\n", vpi_get_str(vpiFullName, item));
break;
} }
} }