Changeset b59aae in git

Timestamp:

Feb 4, 2008, 2:18:02 PM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '91fdef05f09f54b8d58d92a472e9c4a43aa4656f')

Children:

8373a71d6a2983af32cc5cf5277712fe65db7b37

Parents:

03387712e9aa1a0f1f773de125478cd7799366a4

Message:

*hannes: fix undef vars


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

File:

• kernel/ring.cc (modified) (2 diffs)

kernel/ring.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ring.cc,v 1.74 2008-02-04 09:41:44 Singular Exp $ */
+/* $Id: ring.cc,v 1.75 2008-02-04 13:18:02 Singular Exp $ */
 
 /*
@@ -3580 +3580 @@
 ring rAssure_HasComp(ring r)
 {
-  int last_block = rBlocks(r) - 2;
-  int i=last_block;
+  int last_block;
+  int i=0;
   do
   { 
      if (r->order[i] == ringorder_c ||
         r->order[i] == ringorder_C) return r;
-     i--;
-  } while (i>=0);
+     if (r->order[i] == 0)
+        break;
+     i++;
+  } while (1);
+  last_block=i-1;
   
   ring new_r = rCopy0(r, FALSE, FALSE);
-  i=last_block+3;
+  i+=2;
   new_r->wvhdl=(int **)omAlloc0(i * sizeof(int_ptr));
-  new_r->order   = (int *) omAlloc(i * sizeof(int));
-  new_r->block0   = (int *) omAlloc(i * sizeof(int));
-  new_r->block1   = (int *) omAlloc(i * sizeof(int));
+  new_r->order   = (int *) omAlloc0(i * sizeof(int));
+  new_r->block0   = (int *) omAlloc0(i * sizeof(int));
+  new_r->block1   = (int *) omAlloc0(i * sizeof(int));
   memcpy4(new_r->order,r->order,(i-1) * sizeof(int));
   memcpy4(new_r->block0,r->block0,(i-1) * sizeof(int));