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

Evaluate === and !==

This commit is contained in:
steve 2001-03-27 06:43:27 +00:00
parent 61e3eed49c
commit c8d9ade58c
1 changed files with 28 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
tgt-vvp/eval_expr.c
View File

@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/
#if !defined(WINNT)
#ident "$Id: eval_expr.c,v 1.2 2001/03/23 01:10:24 steve Exp $"
#ident "$Id: eval_expr.c,v 1.3 2001/03/27 06:43:27 steve Exp $"
#endif
# include "vvp_priv.h"
@ -94,6 +94,16 @@ static struct vector_info draw_binary_expr_eq(ivl_expr_t exp)
rv = draw_eval_expr_wid(re, wid);
switch (ivl_expr_opcode(exp)) {
case 'E': /* === */
assert(lv.wid == rv.wid);
fprintf(vvp_out, " %%cmp/u %u, %u, %u;\n", lv.base,
rv.base, lv.wid);
clr_vector(lv);
clr_vector(rv);
lv.base = 6;
lv.wid = 1;
break;
case 'e': /* == */
assert(lv.wid == rv.wid);
fprintf(vvp_out, " %%cmp/u %u, %u, %u;\n", lv.base,
@ -104,6 +114,18 @@ static struct vector_info draw_binary_expr_eq(ivl_expr_t exp)
lv.wid = 1;
break;
case 'N': /* !== */
assert(lv.wid == rv.wid);
fprintf(vvp_out, " %%cmp/u %u, %u, %u;\n", lv.base,
rv.base, lv.wid);
fprintf(vvp_out, " %%inv 6, 1;\n");
clr_vector(lv);
clr_vector(rv);
lv.base = 6;
lv.wid = 1;
break;
case 'n': /* != */
assert(lv.wid == rv.wid);
fprintf(vvp_out, " %%cmp/u %u, %u, %u;\n", lv.base,
@ -128,7 +150,9 @@ static struct vector_info draw_binary_expr(ivl_expr_t exp, unsigned wid)
struct vector_info rv;
switch (ivl_expr_opcode(exp)) {
case 'E': /* === */
case 'e': /* == */
case 'N': /* !== */
case 'n': /* != */
assert(wid == 1);
rv = draw_binary_expr_eq(exp);
@ -278,6 +302,9 @@ struct vector_info draw_eval_expr(ivl_expr_t exp)
/*
* $Log: eval_expr.c,v $
* Revision 1.3 2001/03/27 06:43:27 steve
* Evaluate === and !==
*
* Revision 1.2 2001/03/23 01:10:24 steve
* Assure that operands are the correct width.
*