Changeset 9bb5457 in git for libpolys/coeffs/rmodulo2m.cc

Timestamp:

May 27, 2011, 2:56:51 PM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

2c7f28850c274452c6d4f324225864e2331412ed

Parents:

7af488ec51790060979537b35a03fb345e053f90

git-author:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2011-05-27 14:56:51+02:00

git-committer:

Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 12:39:06+01:00

Message:

fixed warning about unused paramaters in coeffs

File:

• libpolys/coeffs/rmodulo2m.cc (modified) (13 diffs)

libpolys/coeffs/rmodulo2m.cc

@@ -53 +53 @@
 
   r->ringtype = 1;
-  
+
   /* next cast may yield an overflow as mod2mMask is an unsigned long */
   r->ch = (int)r->mod2mMask + 1;
@@ -110 +110 @@
  * Give the smallest k, such that a * x = k = b * y has a solution
  */
-number nr2mLcm(number a, number b, const coeffs r)
+number nr2mLcm(number a, number b, const coeffs)
 {
   NATNUMBER res = 0;
@@ -133 +133 @@
  * a solution.
  */
-number nr2mGcd(number a, number b, const coeffs r)
+number nr2mGcd(number a, number b, const coeffs)
 {
   NATNUMBER res = 0;
@@ -240 +240 @@
 }
 
-BOOLEAN nr2mIsUnit(number a, const coeffs r)
+BOOLEAN nr2mIsUnit(number a, const coeffs)
 {
   return ((NATNUMBER)a % 2 == 1);
 }
 
-number nr2mGetUnit(number k, const coeffs r)
+number nr2mGetUnit(number k, const coeffs)
 {
   if (k == NULL) return (number)1;
@@ -253 +253 @@
 }
 
-BOOLEAN nr2mIsZero(number a, const coeffs r)
+BOOLEAN nr2mIsZero(number a, const coeffs)
 {
   return 0 == (NATNUMBER)a;
 }
 
-BOOLEAN nr2mIsOne(number a, const coeffs r)
+BOOLEAN nr2mIsOne(number a, const coeffs)
 {
   return 1 == (NATNUMBER)a;
@@ -268 +268 @@
 }
 
-BOOLEAN nr2mEqual(number a, number b, const coeffs r)
+BOOLEAN nr2mEqual(number a, number b, const coeffs)
 {
   return (a == b);
@@ -310 +310 @@
 }
 
-int nr2mDivComp(number as, number bs, const coeffs r)
+int nr2mDivComp(number as, number bs, const coeffs)
 {
   NATNUMBER a = (NATNUMBER)as;
@@ -474 +474 @@
   NATNUMBER g = 1;
   NATNUMBER b_div = (NATNUMBER)b;
-  if (b_div < 0) b_div = -b_div; // b_div now represents |b|
+  if (b_div < 0) b_div = -b_div; // b_div now represents |b|, BUT b_div is unsigned!
   NATNUMBER rr = 0;
   while ((g < r->mod2mMask ) && (b_div > 0) && (b_div % 2 == 0))
@@ -532 +532 @@
 }
 
-number nr2mMapMachineInt(number from, const coeffs src, const coeffs dst)
+number nr2mMapMachineInt(number from, const coeffs /*src*/, const coeffs dst)
 {
   NATNUMBER i = ((NATNUMBER)from) % dst->mod2mMask ;
@@ -538 +538 @@
 }
 
-number nr2mMapZp(number from, const coeffs src, const coeffs dst)
+number nr2mMapZp(number from, const coeffs /*src*/, const coeffs dst)
 {
   NATNUMBER j = (NATNUMBER)1;
@@ -549 +549 @@
 }
 
-number nr2mMapQ(number from, const coeffs src, const coeffs dst)
+number nr2mMapQ(number from, const coeffs /*src*/, const coeffs dst)
 {
   int_number erg = (int_number)omAllocBin(gmp_nrz_bin);
@@ -566 +566 @@
 }
 
-number nr2mMapGMP(number from, const coeffs src, const coeffs dst)
+number nr2mMapGMP(number from, const coeffs /*src*/, const coeffs dst)
 {
   int_number erg = (int_number)omAllocBin(gmp_nrz_bin);
@@ -659 +659 @@
 
 #ifdef LDEBUG
-BOOLEAN nr2mDBTest (number a, const char *f, const int l, const coeffs r)
-{
-  if ((NATNUMBER)a < 0) return FALSE;
+BOOLEAN nr2mDBTest (number a, const char *, const int, const coeffs r)
+{
+  //if ((NATNUMBER)a < 0) return FALSE; // is unsigned!
   if (((NATNUMBER)a & r->mod2mMask) != (NATNUMBER)a) return FALSE;
   return TRUE;