summaryrefslogtreecommitdiff
path: root/src/systemc/tests/systemc/datatypes/int/arith/arith08/arith08.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/systemc/tests/systemc/datatypes/int/arith/arith08/arith08.cpp')
-rw-r--r--src/systemc/tests/systemc/datatypes/int/arith/arith08/arith08.cpp123
1 files changed, 123 insertions, 0 deletions
diff --git a/src/systemc/tests/systemc/datatypes/int/arith/arith08/arith08.cpp b/src/systemc/tests/systemc/datatypes/int/arith/arith08/arith08.cpp
new file mode 100644
index 000000000..d44dda816
--- /dev/null
+++ b/src/systemc/tests/systemc/datatypes/int/arith/arith08/arith08.cpp
@@ -0,0 +1,123 @@
+/*****************************************************************************
+
+ Licensed to Accellera Systems Initiative Inc. (Accellera) under one or
+ more contributor license agreements. See the NOTICE file distributed
+ with this work for additional information regarding copyright ownership.
+ Accellera licenses this file to you under the Apache License, Version 2.0
+ (the "License"); you may not use this file except in compliance with the
+ License. You may obtain a copy of the License at
+
+ http://www.apache.org/licenses/LICENSE-2.0
+
+ Unless required by applicable law or agreed to in writing, software
+ distributed under the License is distributed on an "AS IS" BASIS,
+ WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+ implied. See the License for the specific language governing
+ permissions and limitations under the License.
+
+ *****************************************************************************/
+
+/*****************************************************************************
+
+ arith08.cpp --
+
+ Original Author: Martin Janssen, Synopsys, Inc., 2002-02-15
+
+ *****************************************************************************/
+
+/*****************************************************************************
+
+ MODIFICATION LOG - modifiers, enter your name, affiliation, date and
+ changes you are making here.
+
+ Name, Affiliation, Date:
+ Description of Modification:
+
+ *****************************************************************************/
+
+#include "systemc.h"
+#include "isaac.h"
+
+QTIsaac<8> rng; // Platform independent random number generator.
+
+#define TEST(A,B) \
+{ \
+ if ( A != B ) \
+ cout << #A << " (" << A << ") != " << #B << "(" << B << ")" << endl; \
+}
+
+int
+sc_main(int, char**)
+{
+ unsigned vali[5] = { 0, 1, (unsigned)-1, 7, (unsigned)-8 };
+ signed int valj[5] = { 0, 1, -1, 7, -8 };
+
+ for (int i = 3; i < 30; ++i) {
+ for (int j = 3; j < 30; ++j) {
+ cout << "i = " << i << ", j = " << j << endl;
+ sc_unsigned x(i);
+ sc_signed y(j);
+ sc_signed z(64);
+
+ vali[3] = (1 << (i - 1)) - 1;
+ vali[4] = - (1 << (i - 1));
+
+ valj[3] = (1 << (j - 1)) - 1;
+ valj[4] = - (1 << (j - 1));
+
+ for (int ii = 0; ii < 100; ++ii) {
+ for (int jj = 0; jj < 100; ++jj) {
+ unsigned qi = (ii < 5) ? vali[ii] :
+ (rng.rand() & ((1 << i) - 1));
+ signed int qj = (jj < 5) ? valj[jj] :
+ (rng.rand() & ((1 << j) - 1));
+
+ if (qi & (1 << (i - 1))) {
+ qi = (qi << (32 - i)) >> (32 - i);
+ }
+ if (qj & (1 << (j - 1))) {
+ qj = (qj << (32 - j)) >> (32 - j);
+ }
+
+ x = qi;
+ y = qj;
+
+ sc_signed ty(x);
+ TEST(x,ty );
+ sc_assert( ty >= 0 );
+ sc_assert((! x[i-1]) || (ty.length() == i+1) );
+
+ z = x + y;
+ TEST(static_cast<sc_bigint<32> >( z.range(31,0) ),
+ int(int(qi) + qj) );
+ z = x - y;
+ TEST(static_cast<sc_bigint<32> >( z.range(31,0) ),
+ int(int(qi) - qj) );
+ z = x * y;
+ TEST(static_cast<sc_bigint<32> >( z.range(31,0) ),
+ int(int(qi) * qj) );
+ sc_unsigned xx(i);
+ xx = x;
+ xx *= y;
+ sc_unsigned xx2(i);
+ xx2 = z.range(i - 1, 0);
+ TEST(xx,xx2);
+
+ if (y != 0) {
+ z = x / y;
+ TEST(static_cast<sc_bigint<32> >( z.range(31,0) ), int(int(qi) / qj) );
+ z = x % y;
+ TEST(static_cast<sc_bigint<32> >( z.range(31,0) ), int(int(qi) % qj) );
+ }
+ z = x & y;
+ TEST(static_cast<sc_bigint<32> >( z.range(31,0) ), int(int(qi) & qj) );
+ z = x | y;
+ TEST(static_cast<sc_bigint<32> >( z.range(31,0) ), int(int(qi) | qj) );
+ z = x ^ y;
+ TEST(static_cast<sc_bigint<32> >( z.range(31,0) ), int(int(qi) ^ qj) );
+ }
+ }
+ }
+ }
+ return 0;
+}