Changeset cae6d8 in git


Ignore:
Timestamp:
Jan 21, 2004, 10:10:08 AM (21 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'd25190065115c859833252500a64cfb7b11e3a50')
Children:
cfbb3403b7e97a25133a0a9d42e16013b3c1803a
Parents:
0ae61c6dbdc8ee3e150c56f17b9989cada5fd83c
Message:
*hannes: fix for 0-ideal


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

Legend:

Unmodified
Added
Removed
  • kernel/hutil.cc

    r0ae61c6 rcae6d8  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: hutil.cc,v 1.1.1.1 2003-10-06 12:15:53 Singular Exp $ */
     4/* $Id: hutil.cc,v 1.2 2004-01-21 09:09:12 Singular Exp $ */
    55/*
    66* ABSTRACT: Utilities for staircase operations
     
    138138  int i;
    139139
    140   for (i=0;i<ev_length;i++)
    141     omFreeSize(hsecure[i],(pVariables+1)*sizeof(int));
    142   omFreeSize(hsecure, ev_length*sizeof(scmon));
    143   omFreeSize(ev,  ev_length*sizeof(scmon));
     140  if (ev_length>0)
     141  {
     142    for (i=ev_length-1;i>=0;i--)
     143      omFreeSize(hsecure[i],(pVariables+1)*sizeof(Exponent_t));
     144    omFreeSize(hsecure, ev_length*sizeof(scmon));
     145    omFreeSize(ev,  ev_length*sizeof(scmon));
     146  }
    144147}
    145148
Note: See TracChangeset for help on using the changeset viewer.