Changeset a7a94ed in git for kernel/hilb.cc

Timestamp:

Jan 6, 2010, 1:27:29 PM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

b46774f2ffde4294abff59d9fdb51d1914924c72

Parents:

8cc23471085d8b316b9e069e3af261cb141cccea

Message:

HAVE_IDI is now standard

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

File:

• kernel/hilb.cc (modified) (4 diffs)

kernel/hilb.cc

@@ -217 +217 @@
   intvec *work, *hseries1=NULL;
   int  mc;
-  int  *p0;
+  int  p0;
   int  i, j, k, l, ii, mw;
   hexist = hInit(S, Q, &hNexist, tailRing);
@@ -237 +237 @@
   #endif
 
-  p0 = (int *)omAllocBin(int_bin);
-  *p0 = 1;
+  p0 = 1;
   hwork = (scfmon)omAlloc(hNexist * sizeof(scmon));
   hvar = (varset)omAlloc((pVariables + 1) * sizeof(int));
@@ -285 +284 @@
         hLexS(hstc, hNstc, hvar, hNvar);
         Q0[hNvar] = 0;
-        hHilbStep(hpure, hstc, hNstc, hvar, hNvar, p0, 1);
+        hHilbStep(hpure, hstc, hNstc, hvar, hNvar, &p0, 1);
       }
     }
@@ -361 +360 @@
   omFreeSize((ADDRESS)hwork, hNexist * sizeof(scmon));
   hDelete(hexist, hNexist);
-  omFreeBin((ADDRESS)p0,  int_bin);
   if (hisModule!=0)
     omFreeSize((ADDRESS)hstc, hNexist * sizeof(scmon));