Handle function scopes in dumpvars scn (PR#95)

This commit is contained in:
steve 2001-01-01 08:10:35 +00:00
parent eda3c63f72
commit 5803e8c42c
2 changed files with 14 additions and 5 deletions

View File

@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/
#if !defined(WINNT) && !defined(macintosh)
#ident "$Id: sys_vcd.c,v 1.13 2000/11/01 06:05:44 steve Exp $"
#ident "$Id: sys_vcd.c,v 1.14 2001/01/01 08:10:35 steve Exp $"
#endif
/*
@ -333,6 +333,7 @@ static void scan_scope(unsigned depth, vpiHandle argv)
case vpiModule:
case vpiNamedBegin:
case vpiTask:
case vpiFunction:
sublist = vpi_iterate(vpiInternalScope, item);
if (sublist && (depth > 0)) {
vcd_info_post_process();
@ -341,7 +342,8 @@ static void scan_scope(unsigned depth, vpiHandle argv)
break;
default:
vpi_printf("ERROR: $dumpvars: Unsupported parameter type\n");
vpi_printf("ERROR: $dumpvars: Unsupported parameter "
"type (%d)\n", vpi_get(vpiType, item));
}
}
@ -430,6 +432,9 @@ void sys_vcd_register()
/*
* $Log: sys_vcd.c,v $
* Revision 1.14 2001/01/01 08:10:35 steve
* Handle function scopes in dumpvars scn (PR#95)
*
* Revision 1.13 2000/11/01 06:05:44 steve
* VCD scans tasks (PR#35)
*

View File

@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/
#if !defined(WINNT) && !defined(macintosh)
#ident "$Id: vpi_scope.c,v 1.10 2000/11/01 06:05:44 steve Exp $"
#ident "$Id: vpi_scope.c,v 1.11 2001/01/01 08:10:35 steve Exp $"
#endif
# include "vpi_priv.h"
@ -47,7 +47,8 @@ static vpiHandle module_iter(int code, vpiHandle obj)
struct __vpiScope*ref = (struct __vpiScope*)obj;
assert((obj->vpi_type->type_code == vpiModule)
|| (obj->vpi_type->type_code == vpiNamedBegin)
|| (obj->vpi_type->type_code == vpiTask));
|| (obj->vpi_type->type_code == vpiTask)
|| (obj->vpi_type->type_code == vpiFunction));
switch (code) {
case vpiInternalScope:
@ -83,7 +84,7 @@ static const struct __vpirt vpip_function_rt = {
0,
0,
0,
0
module_iter
};
static const struct __vpirt vpip_named_begin_rt = {
@ -149,6 +150,9 @@ void vpip_attach_to_scope(struct __vpiScope*ref, vpiHandle obj)
/*
* $Log: vpi_scope.c,v $
* Revision 1.11 2001/01/01 08:10:35 steve
* Handle function scopes in dumpvars scn (PR#95)
*
* Revision 1.10 2000/11/01 06:05:44 steve
* VCD scans tasks (PR#35)
*