Changeset 6f1441 in git

Timestamp:

Dec 2, 2005, 1:25:43 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

3b8b56c35cf3cb763e89ec0a52ba75f41460b30d

Parents:

e75f9dbd20aeef404f5279bdc4661926f84c912f

Message:

*hannes: 64bit fixes


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

File:

• kernel/polys-impl.cc (modified) (2 diffs)

kernel/polys-impl.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: polys-impl.cc,v 1.1.1.1 2003-10-06 12:16:01 Singular Exp $ */
+/* $Id: polys-impl.cc,v 1.2 2005-12-02 12:25:43 Singular Exp $ */
 
 /***************************************************************
@@ -65 +65 @@
                                          unsigned int s, unsigned int n)
 {
-  unsigned int i = 0, ev = 0;
+#define Sy_bit_L(x)     (((unsigned long)1L)<<(x))
+  unsigned int i = 0;
+  unsigned long  ev = 0L;
   assume(n > 0 && s < BIT_SIZEOF_LONG);
   do
   {
     assume(s+i < BIT_SIZEOF_LONG);
-    if (e > (Exponent_t) i) ev |= Sy_bit(s+i);
+    if (e > (Exponent_t) i) ev |= Sy_bit_L(s+i);
     else break;
     i++;