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

Better handling of select width of shifters.

This commit is contained in:
steve 2002-11-21 18:08:09 +00:00
parent b9188ad0ca
commit 2fafe6866f
1 changed files with 20 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
tgt-vvp/vvp_scope.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
*/ */
#ifdef HAVE_CVS_IDENT #ifdef HAVE_CVS_IDENT
#ident "$Id: vvp_scope.c,v 1.80 2002/10/23 04:39:35 steve Exp $" #ident "$Id: vvp_scope.c,v 1.81 2002/11/21 18:08:09 steve Exp $"
#endif #endif
# include "vvp_priv.h" # include "vvp_priv.h"
@ -1367,10 +1367,21 @@ static void draw_lpm_ff(ivl_lpm_t net)
static void draw_lpm_shiftl(ivl_lpm_t net) static void draw_lpm_shiftl(ivl_lpm_t net)
{ {
unsigned idx, width, selects; unsigned idx, width, selects;
unsigned selwid;
width = ivl_lpm_width(net); width = ivl_lpm_width(net);
selects = ivl_lpm_selects(net); selects = ivl_lpm_selects(net);
/* The .shift device can only take as many select inputs as
the width of the device.
XXXX I should make some sort of overflow gate for this? If
any high bits are set, then the shift is certain to be
*way* beyond the width of the left shifted value. XXXX */
selwid = selects;
if (selwid > width)
selwid = width;
if (ivl_lpm_type(net) == IVL_LPM_SHIFTR) if (ivl_lpm_type(net) == IVL_LPM_SHIFTR)
fprintf(vvp_out, "L_%s .shift/r %u", fprintf(vvp_out, "L_%s .shift/r %u",
vvp_mangle_id(ivl_lpm_name(net)), width); vvp_mangle_id(ivl_lpm_name(net)), width);
@ -1383,11 +1394,15 @@ static void draw_lpm_shiftl(ivl_lpm_t net)
draw_input_from_net(ivl_lpm_data(net, idx)); draw_input_from_net(ivl_lpm_data(net, idx));
} }
for (idx = 0 ; idx < selects ; idx += 1) { for (idx = 0 ; idx < selwid ; idx += 1) {
fprintf(vvp_out, ", "); fprintf(vvp_out, ", ");
draw_input_from_net(ivl_lpm_select(net, idx)); draw_input_from_net(ivl_lpm_select(net, idx));
} }
for (idx = selwid ; idx < width ; idx += 1) {
fprintf(vvp_out, ", C<0>");
}
fprintf(vvp_out, ";\n"); fprintf(vvp_out, ";\n");
} }
@ -1592,6 +1607,9 @@ int draw_scope(ivl_scope_t net, ivl_scope_t parent)
/* /*
* $Log: vvp_scope.c,v $ * $Log: vvp_scope.c,v $
* Revision 1.81 2002/11/21 18:08:09 steve
* Better handling of select width of shifters.
*
* Revision 1.80 2002/10/23 04:39:35 steve * Revision 1.80 2002/10/23 04:39:35 steve
* draw lpm ff with aset_expr taken into account. * draw lpm ff with aset_expr taken into account.
* *