Mercurial > hg > octave-nkf
diff src/variables.cc @ 207:c8863fc976ee
[project @ 1993-11-10 21:42:04 by jwe]
author | jwe |
---|---|
date | Wed, 10 Nov 1993 21:42:04 +0000 |
parents | 13c6086c325c |
children | cd2e49fb4f6b |
line wrap: on
line diff
--- a/src/variables.cc +++ b/src/variables.cc @@ -350,7 +350,10 @@ { // Would be nice not to have this cast. XXX FIXME XXX tree_constant *tmp = (tree_constant *) sr->def (); - tmp = new tree_constant (*tmp); + if (tmp == NULL_TREE_CONST) + tmp = new tree_constant (); + else + tmp = new tree_constant (*tmp); gsr->define (tmp); } else