Changeset caa9c4 in git

Timestamp:

Jun 22, 2021, 4:40:52 PM (3 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '98550b669234b32be762076c32b3be2c35188ac4')

Children:

9219133c463b1ef39cd6e6e9fe04673538fdd5e8

Parents:

da0c752a1b75564371344c430f1b1f95bb02fbaf

Message:

fix: conversion: longR ->Z

File:

• libpolys/coeffs/rintegers2.cc (modified) (2 diffs)

libpolys/coeffs/rintegers2.cc

@@ -374 +374 @@
 }
 
+static number nrzMaplongR(number from, const coeffs src, const coeffs dst)
+{
+  gmp_float *ff=(gmp_float*)from;
+  if (mpf_fits_slong_p(ff->t))
+  {
+    long l=mpf_get_si(ff->t);
+    return nrzInit(l,dst);
+  }
+  return nrzInit(0,dst);
+}
+
 static nMapFunc nrzSetMap(const coeffs src, const coeffs /*dst*/)
 {
@@ -398 +409 @@
   {
     return nrzMapQ;
+  }
+  if (nCoeff_is_long_R(src))
+  {
+    return nrzMaplongR;
   }
   return NULL;      // default