Changeset abca391 in git

Timestamp:

Jun 21, 2010, 8:10:38 PM (13 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'f875bbaccd0831e36aaed09ff6adeb3eb45aeb94')

Children:

d4531110717a559c771df1b82982574879ac0fc5

Parents:

f1c465fbf33937cf812c6bfc9bdc7a4e5c585fd4

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2010-06-21 20:10:38+02:00

git-committer:

Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 11:55:16+01:00

Message:

Rings are compilable, but to be checked due to runtime errors.

File:

• coeffs/test.cc (modified) (1 diff)

coeffs/test.cc

@@ -140 +140 @@
     c ++;
 
+
+#ifdef HAVE_RINGS
+  type = nRegister( n_Z2m, nr2mInitChar); assume( type == n_Z2m );
+  if( Test(type) )
+    c ++;
+#endif
+
+
 #ifdef HAVE_RINGS
   type = nRegister( n_Zn, nrnInitChar); assume( type == n_Zn );
   if( Test(type) )
     c ++;
+/* BUG: 
+Program received signal SIGSEGV, Segmentation fault.
+0x00007ffff7b91f1b in __gmpz_set () from /usr/lib/libgmp.so.10
+(gdb) bt
+#0  0x00007ffff7b91f1b in __gmpz_set () from /usr/lib/libgmp.so.10
+#1  0x00000000004177a5 in nrnSetExp (m=0, r=0x7ffff7f44ae8) at rmodulon.cc:549
+#2  0x0000000000417814 in nrnInitExp (m=0, r=0x7ffff7f44ae8) at rmodulon.cc:556
+#3  0x0000000000416122 in nrnInitChar (r=0x7ffff7f44ae8) at rmodulon.cc:34
+#4  0x0000000000413278 in nInitChar (t=n_Zn, parameter=0x0) at numbers.cc:146
+#5  0x0000000000402f10 in Test (type=n_Zn) at test.cc:47
+rmodulon.cc:549       mpz_set(r->nrnModul, r->ringflaga);
+(gdb) l
+544         r->nrnModul = (int_number) omAllocBin(gmp_nrz_bin);
+545         mpz_init(r->nrnModul);
+546         nrnMinusOne = (int_number) omAllocBin(gmp_nrz_bin);
+547         mpz_init(nrnMinusOne);
+548       }
+rmodulon.cc:549       mpz_set(r->nrnModul, r->ringflaga);
+550       mpz_pow_ui(r->nrnModul, r->nrnModul, nrnExponent);
+551       mpz_sub_ui(nrnMinusOne, r->nrnModul, 1);
+552     }
+553
+(gdb) p r->nrnModul
+$1 = (int_number) 0x7ffff7f461a8
+(gdb) p r->ringflaga
+$2 = (int_number) 0x0
+*/  
+
+#endif
 
   
-  type = nRegister( n_Z2m, nr2mInitChar); assume( type == n_Z2m );
-  if( Test(type) )
-    c ++;
-#endif
   
   return c;