mirror of
https://github.com/steveicarus/iverilog.git
synced 2026-08-22 13:57:18 +02:00
Implement .arith/sub subtraction.
This commit is contained in:
+64
-3
@@ -17,7 +17,7 @@
|
||||
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
|
||||
*/
|
||||
#if !defined(WINNT)
|
||||
#ident "$Id: arith.cc,v 1.1 2001/06/05 03:05:41 steve Exp $"
|
||||
#ident "$Id: arith.cc,v 1.2 2001/06/07 03:09:03 steve Exp $"
|
||||
#endif
|
||||
|
||||
# include "arith.h"
|
||||
@@ -26,12 +26,12 @@
|
||||
|
||||
# include <stdio.h>
|
||||
|
||||
vvp_arith_sum::vvp_arith_sum(vvp_ipoint_t b, unsigned w)
|
||||
vvp_arith_::vvp_arith_(vvp_ipoint_t b, unsigned w)
|
||||
: base_(b), wid_(w)
|
||||
{
|
||||
}
|
||||
|
||||
void vvp_arith_sum::output_x_(bool push)
|
||||
void vvp_arith_::output_x_(bool push)
|
||||
{
|
||||
for (unsigned idx = 0 ; idx < wid_ ; idx += 1) {
|
||||
vvp_ipoint_t ptr = ipoint_index(base_,idx);
|
||||
@@ -48,6 +48,11 @@ void vvp_arith_sum::output_x_(bool push)
|
||||
}
|
||||
}
|
||||
|
||||
vvp_arith_sum::vvp_arith_sum(vvp_ipoint_t b, unsigned w)
|
||||
: vvp_arith_(b, w)
|
||||
{
|
||||
}
|
||||
|
||||
void vvp_arith_sum::set(vvp_ipoint_t i, functor_t f, bool push)
|
||||
{
|
||||
assert(wid_ <= sizeof(unsigned long));
|
||||
@@ -96,8 +101,64 @@ void vvp_arith_sum::set(vvp_ipoint_t i, functor_t f, bool push)
|
||||
}
|
||||
}
|
||||
|
||||
vvp_arith_sub::vvp_arith_sub(vvp_ipoint_t b, unsigned w)
|
||||
: vvp_arith_(b, w)
|
||||
{
|
||||
}
|
||||
|
||||
void vvp_arith_sub::set(vvp_ipoint_t i, functor_t f, bool push)
|
||||
{
|
||||
assert(wid_ <= sizeof(unsigned long));
|
||||
|
||||
unsigned long sum = 0;
|
||||
|
||||
for (unsigned idx = 0 ; idx < wid_ ; idx += 1) {
|
||||
vvp_ipoint_t ptr = ipoint_index(base_,idx);
|
||||
functor_t obj = functor_index(ptr);
|
||||
|
||||
unsigned ival = obj->ival;
|
||||
if (ival & 0xaa) {
|
||||
output_x_(push);
|
||||
return;
|
||||
}
|
||||
|
||||
unsigned tmp = 0;
|
||||
if (ival & 0x01)
|
||||
tmp += 1;
|
||||
if (ival & 0x04)
|
||||
tmp -= 1;
|
||||
if (ival & 0x10)
|
||||
tmp -= 1;
|
||||
if (ival & 0x40)
|
||||
tmp -= 1;
|
||||
|
||||
sum += (tmp << idx);
|
||||
}
|
||||
|
||||
for (unsigned idx = 0 ; idx < wid_ ; idx += 1) {
|
||||
vvp_ipoint_t ptr = ipoint_index(base_,idx);
|
||||
functor_t obj = functor_index(ptr);
|
||||
|
||||
unsigned oval = sum & 1;
|
||||
sum >>= 1;
|
||||
|
||||
if (obj->oval == oval)
|
||||
continue;
|
||||
|
||||
|
||||
obj->oval = oval;
|
||||
if (push)
|
||||
functor_propagate(ptr);
|
||||
else
|
||||
schedule_functor(ptr, 0);
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* $Log: arith.cc,v $
|
||||
* Revision 1.2 2001/06/07 03:09:03 steve
|
||||
* Implement .arith/sub subtraction.
|
||||
*
|
||||
* Revision 1.1 2001/06/05 03:05:41 steve
|
||||
* Add structural addition.
|
||||
*
|
||||
|
||||
Reference in New Issue
Block a user