Dump function call expression node.

This commit is contained in:
steve 2005-07-14 16:15:13 +00:00
parent 559a1fd359
commit 9cae53988a
1 changed files with 35 additions and 1 deletions

View File

@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/
#ifdef HAVE_CVS_IDENT
#ident "$Id: stub.c,v 1.130 2005/07/11 16:56:51 steve Exp $"
#ident "$Id: stub.c,v 1.131 2005/07/14 16:15:13 steve Exp $"
#endif
# include "config.h"
@ -83,6 +83,33 @@ unsigned width_of_nexus(ivl_nexus_t nex)
return 0;
}
void show_function_call(ivl_expr_t net, unsigned ind)
{
ivl_scope_t def = ivl_expr_def(net);
const char*vt = "??";
switch (ivl_expr_value(net)) {
case IVL_VT_NO_TYPE:
vt = "NO_TYPE";
break;
case IVL_VT_VOID:
vt = "void";
break;
case IVL_VT_BOOL:
vt = "bool";
break;
case IVL_VT_REAL:
vt = "real";
break;
case IVL_VT_LOGIC:
vt = "logic";
break;
}
fprintf(out, "%*s<%s function %s>\n", ind, "",
vt, ivl_scope_name(def));
}
void show_memory_expression(ivl_expr_t net, unsigned ind)
{
unsigned width = ivl_expr_width(net);
@ -230,6 +257,10 @@ void show_expression(ivl_expr_t net, unsigned ind)
show_expression(ivl_expr_oper1(net), ind+4);
break;
case IVL_EX_UFUNC:
show_function_call(net, ind);
break;
case IVL_EX_REALNUM:
{
int idx;
@ -1459,6 +1490,9 @@ int target_design(ivl_design_t des)
/*
* $Log: stub.c,v $
* Revision 1.131 2005/07/14 16:15:13 steve
* Dump function call expression node.
*
* Revision 1.130 2005/07/11 16:56:51 steve
* Remove NetVariable and ivl_variable_t structures.
*