Changeset 5e1797 in git for kernel/kutil.cc

Timestamp:

Jan 26, 2012, 7:39:25 PM (12 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

7453b439ec4021317ca8a5ccf6811c296e7708b0

Parents:

4fbc43cfe0d034a0bc31f3f17f00812926c1c4c1

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-01-26 19:39:25+01:00

git-committer:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-01-27 14:21:40+01:00

Message:

fix the segfault occuring only on 64 bit

FIX: exitBuchMora tried to free strat->sevS as if it is an array of ints (i.e. not longs!)

File:

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

kernel/kutil.cc

@@ -905 +905 @@
   memmove(&(strat->S[i]), &(strat->S[i+1]), (strat->sl - i)*sizeof(poly));
   memmove(&(strat->ecartS[i]),&(strat->ecartS[i+1]),(strat->sl - i)*sizeof(int));
-  memmove(&(strat->sevS[i]),&(strat->sevS[i+1]),(strat->sl - i)*sizeof(long));
+  memmove(&(strat->sevS[i]),&(strat->sevS[i+1]),(strat->sl - i)*sizeof(unsigned long));
   memmove(&(strat->S_2_R[i]),&(strat->S_2_R[i+1]),(strat->sl - i)*sizeof(int));
 #else
@@ -5976 +5976 @@
   omFreeSize(strat->sevT, (strat->tmax)*sizeof(unsigned long));
   omFreeSize(strat->ecartS,IDELEMS(strat->Shdl)*sizeof(int));
-  omFreeSize(strat->sevS,IDELEMS(strat->Shdl)*sizeof(int));
+  omFreeSize((ADDRESS)strat->sevS,IDELEMS(strat->Shdl)*sizeof(unsigned long));
   omFreeSize(strat->S_2_R,IDELEMS(strat->Shdl)*sizeof(int));
   /*- set L: should be empty -*/