Changeset 51a346 in git

Timestamp:

Feb 1, 2016, 5:20:23 PM (8 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '38dfc5131670d387a89455159ed1e071997eec94')

Children:

1b979c2cba2ac17c32b8fbb4e1a2515ca5524eae

Parents:

bd4d6a648a716f248c2b06f6899e48fa9c2323b8

Message:

debug stuff: longrat

Location:

libpolys/coeffs

Files:

• longrat.cc (modified) (3 diffs)
• rmodulon.cc (modified) (2 diffs)

libpolys/coeffs/longrat.cc

@@ -1236 +1236 @@
   {
     result=ALLOC0_RNUMBER();
-    mpz_init(result->z);
-    mpz_gcd(result->z,a->z,b->z);
     result->s = 3;
   #ifdef LDEBUG
     result->debug=123456;
   #endif
+    mpz_init(result->z);
+    mpz_gcd(result->z,a->z,b->z);
     result=nlShort3(result);
   }
@@ -2580 +2580 @@
 {
   number z = ALLOC_RNUMBER();
+  z->s = 3;
+  #ifdef LDEBUG
+  z->debug=123456;
+  #endif
   mpz_init_set(z->z, m);
-  z->s = 3;
   return z;
 }
@@ -2718 +2721 @@
   number g=ALLOC_RNUMBER();
   mpz_init(g->z); g->s=3;
+  #ifdef LDEBUG
+  g->debug=123456;
+  (*s)->debug=123456;
+  (*t)->debug=123456;
+  #endif
   if (SR_HDL(a) & SR_INT)
   {

libpolys/coeffs/rmodulon.cc

@@ -63 +63 @@
 # define  nrnWrite      nrzWrite
 #else
-void nrnWrite (number &a, const coeffs);
+void nrnWrite (number a, const coeffs);
 #endif
 const char *  nrnRead  (const char *s, number *a, const coeffs r);
@@ -797 +797 @@
 #endif
 #if SI_INTEGER_VARIANT!=2
-void nrnWrite (number &a, const coeffs)
+void nrnWrite (number a, const coeffs)
 {
   char *s,*z;