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

Support named begin scope at run time.

This commit is contained in:
steve 1999-12-15 18:21:20 +00:00
parent e7e58cdd71
commit 40ca71b10b
1 changed files with 19 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
vvm/vpi_scope.c
View File

@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/ */
#if !defined(WINNT) #if !defined(WINNT)
#ident "$Id: vpi_scope.c,v 1.3 1999/12/15 04:01:14 steve Exp $" #ident "$Id: vpi_scope.c,v 1.4 1999/12/15 18:21:20 steve Exp $"
#endif #endif
# include "vpi_priv.h" # include "vpi_priv.h"
@ -27,7 +27,8 @@
static vpiHandle module_iter(int code, vpiHandle obj) static vpiHandle module_iter(int code, vpiHandle obj)
{ {
struct __vpiScope*ref = (struct __vpiScope*)obj; struct __vpiScope*ref = (struct __vpiScope*)obj;
assert(obj->vpi_type->type_code == vpiModule); assert((obj->vpi_type->type_code == vpiModule)
|| (obj->vpi_type->type_code == vpiNamedBegin));
switch (code) { switch (code) {
case vpiInternalScope: case vpiInternalScope:
@ -46,6 +47,16 @@ static const struct __vpirt vpip_module_rt = {
module_iter module_iter
}; };
static const struct __vpirt vpip_named_begin_rt = {
vpiNamedBegin,
0,
0,
0,
0,
0,
module_iter
};
vpiHandle vpip_make_scope(struct __vpiScope*ref, int type, const char*name) vpiHandle vpip_make_scope(struct __vpiScope*ref, int type, const char*name)
{ {
ref->intern = 0; ref->intern = 0;
@ -55,6 +66,9 @@ vpiHandle vpip_make_scope(struct __vpiScope*ref, int type, const char*name)
case vpiModule: case vpiModule:
ref->base.vpi_type = &vpip_module_rt; ref->base.vpi_type = &vpip_module_rt;
break; break;
case vpiNamedBegin:
ref->base.vpi_type = &vpip_named_begin_rt;
break;
default: default:
assert(0); assert(0);
} }
@ -76,6 +90,9 @@ void vpip_attach_to_scope(struct __vpiScope*ref, vpiHandle obj)
/* /*
* $Log: vpi_scope.c,v $ * $Log: vpi_scope.c,v $
* Revision 1.4 1999/12/15 18:21:20 steve
* Support named begin scope at run time.
*
* Revision 1.3 1999/12/15 04:01:14 steve * Revision 1.3 1999/12/15 04:01:14 steve
* Add the VPI implementation of $readmemh. * Add the VPI implementation of $readmemh.
* *