112855Sgabeblack@google.com/***************************************************************************** 212855Sgabeblack@google.com 312855Sgabeblack@google.com Licensed to Accellera Systems Initiative Inc. (Accellera) under one or 412855Sgabeblack@google.com more contributor license agreements. See the NOTICE file distributed 512855Sgabeblack@google.com with this work for additional information regarding copyright ownership. 612855Sgabeblack@google.com Accellera licenses this file to you under the Apache License, Version 2.0 712855Sgabeblack@google.com (the "License"); you may not use this file except in compliance with the 812855Sgabeblack@google.com License. You may obtain a copy of the License at 912855Sgabeblack@google.com 1012855Sgabeblack@google.com http://www.apache.org/licenses/LICENSE-2.0 1112855Sgabeblack@google.com 1212855Sgabeblack@google.com Unless required by applicable law or agreed to in writing, software 1312855Sgabeblack@google.com distributed under the License is distributed on an "AS IS" BASIS, 1412855Sgabeblack@google.com WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or 1512855Sgabeblack@google.com implied. See the License for the specific language governing 1612855Sgabeblack@google.com permissions and limitations under the License. 1712855Sgabeblack@google.com 1812855Sgabeblack@google.com *****************************************************************************/ 1912855Sgabeblack@google.com 2012855Sgabeblack@google.com/***************************************************************************** 2112855Sgabeblack@google.com 2212855Sgabeblack@google.com test.cpp -- 2312855Sgabeblack@google.com 2412855Sgabeblack@google.com Original Author: Martin Janssen, Synopsys, Inc., 2002-02-15 2512855Sgabeblack@google.com 2612855Sgabeblack@google.com *****************************************************************************/ 2712855Sgabeblack@google.com 2812855Sgabeblack@google.com/***************************************************************************** 2912855Sgabeblack@google.com 3012855Sgabeblack@google.com MODIFICATION LOG - modifiers, enter your name, affiliation, date and 3112855Sgabeblack@google.com changes you are making here. 3212855Sgabeblack@google.com 3312855Sgabeblack@google.com Name, Affiliation, Date: 3412855Sgabeblack@google.com Description of Modification: 3512855Sgabeblack@google.com 3612855Sgabeblack@google.com *****************************************************************************/ 3712855Sgabeblack@google.com 3812855Sgabeblack@google.com// 3912855Sgabeblack@google.com// Verifies the functionality of concanetation operation. 4012855Sgabeblack@google.com// Operands are arguments to a function 4112855Sgabeblack@google.com// 4212855Sgabeblack@google.com// Author: PRP 4312855Sgabeblack@google.com// Date Created: 19 Feb 99 4412855Sgabeblack@google.com// 4512855Sgabeblack@google.com 4612855Sgabeblack@google.com 4712855Sgabeblack@google.com#include "systemc.h" 4812855Sgabeblack@google.com#include "test.h" 4912855Sgabeblack@google.com 5012855Sgabeblack@google.comsc_lv_base AND_fn (const sc_lv_base &a, const sc_lv_base &b) 5112855Sgabeblack@google.com{ 5212855Sgabeblack@google.com return a | b; 5312855Sgabeblack@google.com} 5412855Sgabeblack@google.com 5512855Sgabeblack@google.comsc_lv_base OR_fn (const sc_lv_base &a, const sc_lv_base &b) 5612855Sgabeblack@google.com{ 5712855Sgabeblack@google.com return a & b; 5812855Sgabeblack@google.com} 5912855Sgabeblack@google.com 6012855Sgabeblack@google.comvoid test::entry() 6112855Sgabeblack@google.com{ 6212855Sgabeblack@google.com sc_lv<8> a; 6312855Sgabeblack@google.com sc_lv<8> b; 6412855Sgabeblack@google.com sc_lv<8> c; 6512855Sgabeblack@google.com sc_lv<8> d; 6612855Sgabeblack@google.com sc_lv<24> e; 6712855Sgabeblack@google.com sc_lv<24> f; 6812855Sgabeblack@google.com 6912855Sgabeblack@google.com sc_logic k; 7012855Sgabeblack@google.com sc_logic n; 7112855Sgabeblack@google.com sc_logic m, o, p, q, r, s, t, u; 7212855Sgabeblack@google.com 7312855Sgabeblack@google.com sc_lv<32> x; 7412855Sgabeblack@google.com sc_lv<32> y; 7512855Sgabeblack@google.com sc_lv<32> z; 7612855Sgabeblack@google.com sc_lv<32> z1; 7712855Sgabeblack@google.com 7812855Sgabeblack@google.com 7912855Sgabeblack@google.com while (true) { 8012855Sgabeblack@google.com 8112855Sgabeblack@google.com wait (); 8212855Sgabeblack@google.com 8312855Sgabeblack@google.com a = "00000000"; // 0 8412855Sgabeblack@google.com b = "00000001"; // 1 8512855Sgabeblack@google.com c = "00000011"; // 3 8612855Sgabeblack@google.com d = "00001111"; // 15 8712855Sgabeblack@google.com e = "000000000000000000000001"; // 1 8812855Sgabeblack@google.com f = "000000000000000000001010"; // 10 8912855Sgabeblack@google.com 9012855Sgabeblack@google.com // =============== Array + Array ==================================== 9112855Sgabeblack@google.com // variable + variable, cascading 9212855Sgabeblack@google.com x = OR_fn ((a, b, c, d), (d, c, b, a)); 9312855Sgabeblack@google.com // x = 00001111 00000011 00000011 00001111 9412855Sgabeblack@google.com 9512855Sgabeblack@google.com // variable + constant, cascading, composition 9612855Sgabeblack@google.com y = AND_fn (((a, b, c), "00000000"), (d, "00000000", b, a)); 9712855Sgabeblack@google.com // y = 00000000 00000000 00000001 00000000 9812855Sgabeblack@google.com 9912855Sgabeblack@google.com // constant + constant 10012855Sgabeblack@google.com z = OR_fn (( sc_lv_base( "0000000000000000" ), "1000000000000000"), x); 10112855Sgabeblack@google.com // z = 00001111 00000011 10000011 00001111 10212855Sgabeblack@google.com 10312855Sgabeblack@google.com z = z & (~y); 10412855Sgabeblack@google.com // z = 00001111 00000011 10000010 00001111 10512855Sgabeblack@google.com 10612855Sgabeblack@google.com // =============== Array (variable) + Scalar ============================== 10712855Sgabeblack@google.com 10812855Sgabeblack@google.com n = '1'; 10912855Sgabeblack@google.com o = '0'; 11012855Sgabeblack@google.com z = OR_fn (z, ( sc_lv_base( n ), "000000000000000", "0000000000000000")); 11112855Sgabeblack@google.com // z = 10001111 00000011 10000010 00001111 11212855Sgabeblack@google.com 11312855Sgabeblack@google.com z = OR_fn (z, ( sc_lv_base( "00000000" ), o, n, d, "00000000000000")); 11412855Sgabeblack@google.com // z = 10001111 01000011 11000010 00001111 11512855Sgabeblack@google.com 11612855Sgabeblack@google.com k = '1'; 11712855Sgabeblack@google.com z = OR_fn (z, ( sc_lv_base( "00000000" ), "00", k, "00000", "0000000000000000")); 11812855Sgabeblack@google.com // z = 10001111 01100011 11000010 00001111 11912855Sgabeblack@google.com 12012855Sgabeblack@google.com // =============== Null Vector ==================================== 12112855Sgabeblack@google.com 12212855Sgabeblack@google.com z = AND_fn (z, (( sc_lv_base( o ), sc_lv_base( k ), "111111"), "111111111111111111111111")); 12312855Sgabeblack@google.com // z = 00001111 01100011 11000010 00001111 12412855Sgabeblack@google.com 12512855Sgabeblack@google.com // =============== LHS/RHS of different widths ============================== 12612855Sgabeblack@google.com 12712855Sgabeblack@google.com z1 = OR_fn (z, sc_lv_base( "00000000000000000000000000000000" )); // length of string = 32 12812855Sgabeblack@google.com 12912855Sgabeblack@google.com o1 = z.to_int(); // o1 = 00001111 01100011 11000010 00001111 13012855Sgabeblack@google.com wait(); 13112855Sgabeblack@google.com 13212855Sgabeblack@google.com } 13312855Sgabeblack@google.com} 13412855Sgabeblack@google.com 135