1 files changed, 138 insertions, 0 deletions
diff --git a/src/systemc/tests/systemc/misc/stars/star130782/test.cpp b/src/systemc/tests/systemc/misc/stars/star130782/test.cpp
new file mode 100644
index 000000000..8d28c00bc
--- /dev/null
+++ b/src/systemc/tests/systemc/misc/stars/star130782/test.cpp
@@ -0,0 +1,138 @@
+/*****************************************************************************
+
+  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.
+
+ *****************************************************************************/
+
+/*****************************************************************************
+
+  test.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:
+
+ *****************************************************************************/
+
+/*
+Subject: range() of sc_biguint
+From: "Masahiro Taniguchi" <taniguchi.masahiro@lsi.melco.co.jp>
+Date: Mon, 12 Nov 2001 16:29:04 +0900
+To: "systemc-forum" <systemc-forum@systemc.org>
+
+Hi all,
+
+I found a strange simulation result regarding sc_biguint.
+I attached the example about it.
+The example described 3 case.
+ 1. Write non-0
+ 2. Write 0 without cast
+ 3. Write 0 with cast (sc_biguint<8>)
+The wrong result appears in the 2nd case.
+Is this a bug of SystemC?
+
+-------Environment-------
+ SystemC V1.0.2 and V2.0
+ GCC 2.95.2
+ Sun Solaris
+-------------------------
+
+Regards,
+
+Masahiro Taniguchi
+Mitsubishi Electric Corporation
+JAPAN
+
+------------------------------------------------------------
+*/
+
+#include "systemc.h"
+ 
+int
+sc_main( int, char*[] )
+{
+    int i;
+    int index0,index1;
+    sc_biguint<128> A;
+    sc_uint<16> B;
+    sc_biguint<128> Y;
+ 
+    A = 0;
+    Y = 0;
+    cout << "A = " << A.to_string(SC_HEX) << endl;
+    cout << "Y = " << Y.to_string(SC_HEX) << endl << endl;
+
+    // 1st Case 
+    A = "0xffffffffffffffffffffffffffffffff";
+    B = 0;
+ 
+    for(i=15;i>=0;i--)
+    {
+        index0 = 8*(i+1)-1;
+        index1 = 8* i;
+        if(B[i] == 0) {
+            Y.range(index0,index1) = A.range(index0,index1);
+        }
+    }
+ 
+    cout << "A = " << A.to_string(SC_HEX) << endl;
+    cout << "B = " << hex << B << endl;
+    cout << "Y = " << Y.to_string(SC_HEX) << endl << endl;
+
+    // 2nd Case 
+    A = 0;
+    B = 0;
+
+    for(i=15;i>=0;i--)
+    {
+        index0 = 8*(i+1)-1;
+        index1 = 8* i;
+        if(B[i] == 0) {
+            Y.range(index0,index1) = A.range(index0,index1);
+        }
+    }
+ 
+    cout << "A = " << A.to_string(SC_HEX) << endl;
+    cout << "B = " << hex << B << endl;
+    cout << "Y = " << Y.to_string(SC_HEX) << endl << endl;
+
+    // 3rd Case
+    A = 0;
+    B = 0;
+ 
+    for(i=15;i>=0;i--)
+    {
+        index0 = 8*(i+1)-1;
+        index1 = 8* i;
+        if(B[i] == 0) {
+            Y.range(index0,index1) = (sc_biguint<8>)A.range(index0,index1);
+        }
+    }
+ 
+    cout << "A = " << A.to_string(SC_HEX) << endl;
+    cout << "B = " << hex << B << endl;
+    cout << "Y = " << Y.to_string(SC_HEX) << endl << endl;
+ 
+    return(0);
+}