From 16fa8d7cc8c92f5ab879e4cf9c6c0bbb3567860f Mon Sep 17 00:00:00 2001 From: Gabe Black Date: Thu, 24 May 2018 01:37:55 -0700 Subject: systemc: Import tests from the Accellera systemc distribution. Change-Id: Iad76b398949a55d768a34d027a2d8e3739953da6 Reviewed-on: https://gem5-review.googlesource.com/10845 Reviewed-by: Giacomo Travaglini Maintainer: Gabe Black --- .../datatypes/int/arith/arith06/arith06.cpp | 147 +++++++++++++++++++++ 1 file changed, 147 insertions(+) create mode 100644 src/systemc/tests/systemc/datatypes/int/arith/arith06/arith06.cpp (limited to 'src/systemc/tests/systemc/datatypes/int/arith/arith06/arith06.cpp') diff --git a/src/systemc/tests/systemc/datatypes/int/arith/arith06/arith06.cpp b/src/systemc/tests/systemc/datatypes/int/arith/arith06/arith06.cpp new file mode 100644 index 000000000..0eebbcd79 --- /dev/null +++ b/src/systemc/tests/systemc/datatypes/int/arith/arith06/arith06.cpp @@ -0,0 +1,147 @@ +/***************************************************************************** + + 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. + + *****************************************************************************/ + +/***************************************************************************** + + arith06.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 +#include "systemc.h" +#include "isaac.h" + +QTIsaac<8> rng; // Platform independent random number generator. + +int +sc_main( int argc, char* argv[] ) +{ + signed int vali[5] = { 0, 1, -1, 7, -8 }; + signed int valj[5] = { 0, 1, -1, 7, -8 }; + + for (int i = 3; i < 32; ++i) { + for (int j = 3; j < 32; ++j) { + cout << "i = " << i << ", j = " << j << endl; + + sc_signed 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) { + signed int 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; + sc_assert( x == qi ); + y = qj; + sc_assert( y == qj ); + sc_assert((x == qj) == (qi == qj)); + sc_assert((x == qj) == (qj == x)); + sc_assert((x != qj) == (qi != qj)); + sc_assert((x != qj) == (qj != x)); + sc_assert((x < qj) == (qi < qj)); + sc_assert((x < qj) == (qj > x)); + sc_assert((x <= qj) == (qi <= qj)); + sc_assert((x <= qj) == (qj >= x)); + sc_assert((x > qj) == (qi > qj)); + sc_assert((x > qj) == (qj < x)); + sc_assert((x >= qj) == (qi >= qj)); + sc_assert((x >= qj) == (qj <= x)); + z = x + qj; + sc_assert( static_cast >( z.range(31,0) ) == + (qi + qj) ); + z = qi + y; + sc_assert( static_cast >( z.range(31,0) ) == + (qi + qj) ); + z = x - qj; + sc_assert( static_cast >( z.range(31,0) ) == + (qi - qj) ); + z = qi - y; + sc_assert( static_cast >( z.range(31,0) ) == + (qi - qj) ); + z = x * qj; + sc_assert( static_cast >( z.range(31,0) ) == + (qi * qj) ); + z = qi * y; + sc_assert( static_cast >( z.range(31,0) ) == + (qi * qj) ); + if (qj != 0) { + z = x / qj; + sc_assert( static_cast >( z.range(31,0) ) == + (qi / qj) ); + z = qi / y; + sc_assert( static_cast >( z.range(31,0) ) == + (qi / qj) ); + z = x % qj; + sc_assert( static_cast >( z.range(31,0) ) == + (qi % qj) ); + z = qi % y; + sc_assert( static_cast >( z.range(31,0) ) == + (qi % qj) ); + } + z = x & qj; + sc_assert( static_cast >( z.range(31,0) ) == + (qi & qj) ); + z = qi & y; + sc_assert( static_cast >( z.range(31,0) ) == + (qi & qj) ); + z = x | qj; + sc_assert( static_cast >( z.range(31,0) ) == + (qi | qj) ); + z = qi | y; + sc_assert( static_cast >( z.range(31,0) ) == + (qi | qj) ); + z = x ^ qj; + sc_assert( static_cast >( z.range(31,0) ) == + (qi ^ qj) ); + z = qi ^ y; + sc_assert( static_cast >( z.range(31,0) ) == + (qi ^ qj) ); + } + } + } + } + return 0; +} -- cgit v1.2.3