Changeset bfdab9 in git
- Timestamp:
- Jun 8, 2005, 2:34:59 PM (18 years ago)
- Branches:
- (u'spielwiese', 'f6c3dc58b0df4bd712574325fe76d0626174ad97')
- Children:
- 261735d407471bf3413150f3179011e8eca56bd3
- Parents:
- 17b33e97f355a2a8bc79faaa436017f0dfdae51c
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/hutil.cc
r17b33e rbfdab9 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: hutil.cc,v 1. 5 2005-04-26 17:14:36Singular Exp $ */4 /* $Id: hutil.cc,v 1.6 2005-06-08 12:34:59 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT: Utilities for staircase operations … … 81 81 } 82 82 *Nexist = k; 83 if ( !k)83 if (k==0) 84 84 return NULL; 85 ek = ex = (scfmon)omAlloc (k * sizeof(scmon));86 hsecure = (scfmon) omAlloc (k * sizeof(scmon));85 ek = ex = (scfmon)omAlloc0(k * sizeof(scmon)); 86 hsecure = (scfmon) omAlloc0(k * sizeof(scmon)); 87 87 for (i = sl; i>0; i--) 88 88 { … … 141 141 { 142 142 for (i=ev_length-1;i>=0;i--) 143 omFreeSize(hsecure[i],(pVariables+1)*sizeof( scmon));143 omFreeSize(hsecure[i],(pVariables+1)*sizeof(int)); 144 144 omFreeSize(hsecure, ev_length*sizeof(scmon)); 145 145 omFreeSize(ev, ev_length*sizeof(scmon));
Note: See TracChangeset
for help on using the changeset viewer.