Mercurial > hg > octave-lojdl
changeset 1170:9963da2d3755
[project @ 1995-03-18 04:40:11 by jwe]
author | jwe |
---|---|
date | Sat, 18 Mar 1995 04:40:16 +0000 |
parents | 95a92c971e1e |
children | 1347a762f3a7 |
files | src/pt-const.cc src/tc-rep.cc |
diffstat | 2 files changed, 2 insertions(+), 18 deletions(-) [+] |
line wrap: on
line diff
--- a/src/pt-const.cc +++ b/src/pt-const.cc @@ -37,14 +37,11 @@ // tree_constant class. // Pointer to the blocks of memory we manage. -static tree_constant *newlist; +static tree_constant *newlist = 0; // Multiplier for allocating new blocks. static const int newlist_grow_size = 128; -// Pointer to the last element of the last block allocated. -static tree_constant *newlist_tail = 0; - Octave_map tree_constant::map_value (void) const { @@ -79,11 +76,6 @@ newlist[i].freeptr = &newlist[i+1]; newlist[i].freeptr = 0; - - if (newlist_tail) - newlist_tail->freeptr = newlist; - - newlist_tail = &newlist[i]; } tree_constant *tmp = newlist;
--- a/src/tc-rep.cc +++ b/src/tc-rep.cc @@ -53,14 +53,11 @@ // TC_REP class. // Pointer to the blocks of memory we manage. -static TC_REP *newlist; +static TC_REP *newlist = 0; // Multiplier for allocating new blocks. static const int newlist_grow_size = 128; -// Pointer to the last element of the last block allocated. -static TC_REP *newlist_tail = 0; - static int any_element_is_complex (const ComplexMatrix& a) { @@ -472,11 +469,6 @@ newlist[i].freeptr = &newlist[i+1]; newlist[i].freeptr = 0; - - if (newlist_tail) - newlist_tail->freeptr = newlist; - - newlist_tail = &newlist[i]; } TC_REP *tmp = newlist;