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

Handle certain special cases of stime.

This commit is contained in:
steve 2002-01-11 05:23:05 +00:00
parent dee52dd2d0
commit 5840368f2d
2 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
tgt-vvp/eval_expr.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: eval_expr.c,v 1.53 2001/11/19 04:25:46 steve Exp $" #ident "$Id: eval_expr.c,v 1.54 2002/01/11 05:23:05 steve Exp $"
#endif #endif
# include "vvp_priv.h" # include "vvp_priv.h"
@ -1109,6 +1109,8 @@ static struct vector_info draw_sfunc_expr(ivl_expr_t exp, unsigned wid)
case IVL_EX_SFUNC: case IVL_EX_SFUNC:
if (strcmp("$time", ivl_expr_name(expr)) == 0) if (strcmp("$time", ivl_expr_name(expr)) == 0)
fprintf(vvp_out, ", $time"); fprintf(vvp_out, ", $time");
else if (strcmp("$stime", ivl_expr_name(expr)) == 0)
fprintf(vvp_out, ", $stime");
else else
fprintf(vvp_out, ", ?"); fprintf(vvp_out, ", ?");
continue; continue;
@ -1448,6 +1450,9 @@ struct vector_info draw_eval_expr(ivl_expr_t exp)
/* /*
* $Log: eval_expr.c,v $ * $Log: eval_expr.c,v $
* Revision 1.54 2002/01/11 05:23:05 steve
* Handle certain special cases of stime.
*
* Revision 1.53 2001/11/19 04:25:46 steve * Revision 1.53 2001/11/19 04:25:46 steve
* Handle padding out of logical values. * Handle padding out of logical values.
* *

7
tgt-vvp/vvp_process.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: vvp_process.c,v 1.51 2001/12/05 05:41:20 steve Exp $" #ident "$Id: vvp_process.c,v 1.52 2002/01/11 05:23:05 steve Exp $"
#endif #endif
# include "vvp_priv.h" # include "vvp_priv.h"
@ -877,6 +877,8 @@ static int show_system_task_call(ivl_statement_t net)
case IVL_EX_SFUNC: case IVL_EX_SFUNC:
if (strcmp("$time", ivl_expr_name(expr)) == 0) if (strcmp("$time", ivl_expr_name(expr)) == 0)
fprintf(vvp_out, ", $time"); fprintf(vvp_out, ", $time");
else if (strcmp("$stime", ivl_expr_name(expr)) == 0)
fprintf(vvp_out, ", $time");
else else
fprintf(vvp_out, ", ?"); fprintf(vvp_out, ", ?");
continue; continue;
@ -1100,6 +1102,9 @@ int draw_func_definition(ivl_scope_t scope)
/* /*
* $Log: vvp_process.c,v $ * $Log: vvp_process.c,v $
* Revision 1.52 2002/01/11 05:23:05 steve
* Handle certain special cases of stime.
*
* Revision 1.51 2001/12/05 05:41:20 steve * Revision 1.51 2001/12/05 05:41:20 steve
* Make sure fork labels are globally unique. * Make sure fork labels are globally unique.
* *