Changeset 6180565 in git

Timestamp:

Aug 16, 2019, 2:10:20 PM (4 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'd1ba061a762c62d3a25159d8da8b6e17332291fa')

Children:

15939114b9999f8ea7042c064d7ce2c5b8d987df

Parents:

40b65a33b8f97714b624e53cd7ece1518afa831b

Message:

fix: numerator/denominator

File:

• Singular/iparith.cc (modified) (1 diff)

Singular/iparith.cc

@@ -3963 +3963 @@
 
 /// Return the denominator of the input number
-/// NOTE: the input number is normalized as a side effect
 static BOOLEAN jjDENOMINATOR(leftv res, leftv v)
 {
-  number n = reinterpret_cast<number>(v->Data());
+  number n = reinterpret_cast<number>(v->CopyD());
   res->data = reinterpret_cast<void*>(n_GetDenom(n, currRing->cf));
+  n_Delete(&n,currRing);
   return FALSE;
 }
 
 /// Return the numerator of the input number
-/// NOTE: the input number is normalized as a side effect
 static BOOLEAN jjNUMERATOR(leftv res, leftv v)
 {
-  number n = reinterpret_cast<number>(v->Data());
+  number n = reinterpret_cast<number>(v->CopyD());
   res->data = reinterpret_cast<void*>(n_GetNumerator(n, currRing->cf));
+  n_Delete(&n,currRing);
   return FALSE;
 }