Changeset 7df7dc in git

Timestamp:

Feb 6, 2022, 4:13:51 PM (2 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

3ee006a5c95e63a43566c66506a72128b3c79f66

Parents:

55567a3a63e03547212343713b04aadd7a42212c

Message:

fix: p_Setm_General for ringorder_a64 on 64bit long

File:

• libpolys/polys/monomials/p_polys.cc (modified) (2 diffs)

libpolys/polys/monomials/p_polys.cc

@@ -275 +275 @@
             }
           }
+          #if SIZEOF_LONG == 4
           int64 mask=(int64)0x7fffffff;
           long a_0=(long)(ord&mask); //2^31
@@ -285 +286 @@
           p->exp[o->data.wp64.place]=a_1;
           p->exp[o->data.wp64.place+1]=a_0;
+          #elif SIZEOF_LONG == 8
+          p->exp[o->data.wp64.place]=ord;
+          #endif
 //            if(p_Setm_error) PrintS("***************************\n"
 //                                    "***************************\n"