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

acc_fetch_type supports module.

This commit is contained in:
steve 2003-05-29 02:35:41 +00:00
parent 8cfef65bd8
commit bf664c67b4
2 changed files with 20 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
acc_user.h
View File

@ -19,7 +19,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/
#ifdef HAVE_CVS_IDENT
#ident "$Id: acc_user.h,v 1.14 2003/05/29 02:21:45 steve Exp $"
#ident "$Id: acc_user.h,v 1.15 2003/05/29 02:35:41 steve Exp $"
#endif
/*
@ -59,6 +59,8 @@ typedef struct __vpiHandle *handle;
#define accReg 30
#define accStringParam 204
#define accParameter 220
#define accTopModule 224
#define accModuleInstance 226
#define accIntegerVar 281
#define accIntVar 281
#define accScalar 300
@ -245,6 +247,9 @@ EXTERN_C_END
/*
* $Log: acc_user.h,v $
* Revision 1.15 2003/05/29 02:35:41 steve
* acc_fetch_type supports module.
*
* Revision 1.14 2003/05/29 02:21:45 steve
* Implement acc_fetch_defname and its infrastructure in vvp.
*

15
libveriuser/a_fetch_type.c
View File

@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/
#ifdef HAVE_CVS_IDENT
#ident "$Id: a_fetch_type.c,v 1.4 2003/04/24 18:57:06 steve Exp $"
#ident "$Id: a_fetch_type.c,v 1.5 2003/05/29 02:35:41 steve Exp $"
#endif
# include <acc_user.h>
@ -54,6 +54,9 @@ PLI_INT32 acc_fetch_type(handle obj)
case vpiIntegerVar:
return accIntegerVar;
case vpiModule:
return accModule;
default:
vpi_printf("acc_fetch_type: vpiType %d is what accType?\n",
vpi_get(vpiType, obj));
@ -76,6 +79,13 @@ PLI_INT32 acc_fetch_fulltype(handle obj)
case vpiIntegerVar:
return accIntegerVar;
case vpiModule:
if (!vpi_handle(vpiScope, obj))
return accTopModule;
else
return accModuleInstance;
// FIXME accCellInstance
default:
vpi_printf("acc_fetch_fulltype: vpiType %d is what accType?\n",
vpi_get(vpiType, obj));
@ -85,6 +95,9 @@ PLI_INT32 acc_fetch_fulltype(handle obj)
/*
* $Log: a_fetch_type.c,v $
* Revision 1.5 2003/05/29 02:35:41 steve
* acc_fetch_type supports module.
*
* Revision 1.4 2003/04/24 18:57:06 steve
* Add acc_fetch_fulltype function.
*