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

The ! expression returns 0 to x and z values.

This commit is contained in:
steve 2001-10-24 05:06:54 +00:00
parent 5a6cca33a0
commit d83fb10774
1 changed files with 29 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
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.51 2001/10/18 16:41:49 steve Exp $" #ident "$Id: eval_expr.c,v 1.52 2001/10/24 05:06:54 steve Exp $"
#endif #endif
# include "vvp_priv.h" # include "vvp_priv.h"
@ -1174,7 +1174,6 @@ static struct vector_info draw_unary_expr(ivl_expr_t exp, unsigned wid)
int inv = 0; int inv = 0;
switch (ivl_expr_opcode(exp)) { switch (ivl_expr_opcode(exp)) {
case '!': rop = "nor"; break;
case '&': rop = "and"; break; case '&': rop = "and"; break;
case '|': rop = "or"; break; case '|': rop = "or"; break;
case '^': rop = "xor"; break; case '^': rop = "xor"; break;
@ -1228,6 +1227,31 @@ static struct vector_info draw_unary_expr(ivl_expr_t exp, unsigned wid)
break; break;
case '!': case '!':
res = draw_eval_expr(sub);
if (res.wid > 1) {
/* a ! on a vector is implemented with a reduction
nor. Generate the result into the first bit of
the input vector and free the rest of the
vector. */
struct vector_info tmp;
assert(res.base >= 4);
tmp.base = res.base+1;
tmp.wid = res.wid - 1;
fprintf(vvp_out, " %%nor/r %u, %u, %u;\n",
res.base, res.base, res.wid);
clr_vector(tmp);
res.wid = 1;
} else {
unsigned label_out = local_count++;
fprintf(vvp_out, " %%mov 4, %u, 1;\n", res.base);
fprintf(vvp_out, " %%mov %u, 1, 1;\n", res.base);
fprintf(vvp_out, " %%jmp/0xz T_%u.%u, 4;\n",
thread_count, label_out);
fprintf(vvp_out, " %%mov %u, 0, 1;\n", res.base);
fprintf(vvp_out, "T_%u.%u ;\n", thread_count, label_out);
}
break;
case 'N': case 'N':
case 'A': case 'A':
case 'X': case 'X':
@ -1237,10 +1261,6 @@ static struct vector_info draw_unary_expr(ivl_expr_t exp, unsigned wid)
case '^': case '^':
res = draw_eval_expr(sub); res = draw_eval_expr(sub);
if (res.wid > 1) { if (res.wid > 1) {
/* a ! on a vector is implemented with a reduction
nor. Generate the result into the first bit of
the input vector and free the rest of the
vector. */
struct vector_info tmp; struct vector_info tmp;
assert(res.base >= 4); assert(res.base >= 4);
tmp.base = res.base+1; tmp.base = res.base+1;
@ -1333,6 +1353,9 @@ struct vector_info draw_eval_expr(ivl_expr_t exp)
/* /*
* $Log: eval_expr.c,v $ * $Log: eval_expr.c,v $
* Revision 1.52 2001/10/24 05:06:54 steve
* The ! expression returns 0 to x and z values.
*
* Revision 1.51 2001/10/18 16:41:49 steve * Revision 1.51 2001/10/18 16:41:49 steve
* Evaluate string expressions (Philip Blundell) * Evaluate string expressions (Philip Blundell)
* *