Changeset dc07cbe in git


Ignore:
Timestamp:
Dec 17, 2012, 5:05:36 PM (12 years ago)
Author:
Martin Lee <martinlee84@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'd25190065115c859833252500a64cfb7b11e3a50')
Children:
c3304a34da2cc67bb85650a60b9083e6ab03631b
Parents:
5a0b785558595817048e1eed869a46cafea30cb8
Message:
chg: memory management
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • Singular/ipshell.cc

    r5a0b78 rdc07cbe  
    20802080           depending on the size of a long on the respective platform */
    20812081      R->cf=nInitChar(n_Z2m,(void*)(long)modExponent);       // Use Z/2^ch
     2082      omFreeSize (modBase, sizeof(mpz_t));
    20822083    }
    20832084    else
     
    52255226        //ringtype = 1;       // Use Z/2^ch
    52265227        cf=nInitChar(n_Z2m,(void*)(long)modExponent);
    5227         //TODO free modBase -> will be set inside nInitChar
     5228        omFreeSize (modBase, sizeof (mpz_t));
    52285229      }
    52295230      else
     
    52345235        info.exp= modExponent;
    52355236        cf=nInitChar(n_Znm,(void*) &info); //exponent is missing
    5236         //TODO free modBase -> will be set inside nInitChar
    52375237      }
    52385238    }
     
    52455245      info.exp= modExponent;
    52465246      cf=nInitChar(n_Zn,(void*) &info);
    5247         //TODO free modBase -> will be set inside nInitChar
    52485247    }
    52495248    assume( cf != NULL );
  • libpolys/coeffs/rmodulon.cc

    r5a0b78 rdc07cbe  
    5151  assume( (getCoeffType(r) == ID) || (getCoeffType (r) == ID2) );
    5252  ZnmInfo * info= (ZnmInfo *) p;
    53   r->modBase = (int_number) omAllocBin (gmp_nrz_bin);
    54   mpz_init_set (r->modBase, info->base);
     53  r->modBase= info->base;
    5554
    5655  nrnInitExp (info->exp, r);
Note: See TracChangeset for help on using the changeset viewer.