Changeset d07137 in git for factory/NTLconvert.cc

Timestamp:

Oct 15, 2003, 7:19:41 PM (21 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

ecd23349865d588d280037e46df36f300536d5a2

Parents:

2499bf918092002632ace751f0bbae7bd5a2cccb

Message:

*hannes: faster conversions


git-svn-id: file:///usr/local/Singular/svn/trunk@6895 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• factory/NTLconvert.cc (modified) (5 diffs)

factory/NTLconvert.cc

@@ -1 @@
-/* $Id: NTLconvert.cc,v 1.11 2003-08-28 11:54:31 Singular Exp $ */
+/* $Id: NTLconvert.cc,v 1.12 2003-10-15 17:19:38 Singular Exp $ */
 #include <config.h>
 
@@ -453 +453 @@
   char dummy[2];
   int minusremainder=0;
+  char numbers[]="0123456789abcdef";
 
   coeff_long=to_long(coefficient);
@@ -479 +480 @@
 
     int l=0;
-    while (coefficient>9)
+    while (coefficient>15)
     {
       ZZ quotient,remaind;
-      ZZ ten;ten=10;
+      ZZ ten;ten=16;
       DivRem(quotient,remaind,coefficient,ten);
-      dummy[0]=(char)(to_long(remaind)+'0');
+      dummy[0]=numbers[to_long(remaind)];
       //tmp*=10; tmp+=to_long(remaind);
 
@@ -505 +506 @@
     }
     //built up the string in dummy[0]
-    dummy[0]=(char)(to_long(coefficient)+'0');
+    dummy[0]=numbers[to_long(coefficient)];
     strcat(cf_stringtemp,dummy);
     //tmp*=10; tmp+=to_long(coefficient);
@@ -526 +527 @@
 
   //convert the string to canonicalform using the char*-Constructor
-  return CanonicalForm(cf_stringtemp2);
+  return CanonicalForm(cf_stringtemp2,16);
   //return tmp;
 }