Mercurial > hg > octave-nkf
changeset 4465:8290e9c9d4f6
[project @ 2003-07-14 15:45:09 by jwe]
author | jwe |
---|---|
date | Mon, 14 Jul 2003 15:46:05 +0000 |
parents | 184fc19a7d99 |
children | b18007283045 |
files | src/ChangeLog src/pt-misc.cc test/octave.test/eval/eval-11.m test/octave.test/eval/eval-12.m test/octave.test/eval/eval-13.m test/octave.test/eval/eval-14.m |
diffstat | 6 files changed, 16 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2003-07-14 John W. Eaton <jwe@bevo.che.wisc.edu> + + * pt-misc.cc (tree_parameter_list::convert_to_const_vector): + Don't skip undefined elements. + 2003-07-13 John W. Eaton <jwe@bevo.che.wisc.edu> * octave.cc (maximum_braindamage): Don't set
--- a/src/pt-misc.cc +++ b/src/pt-misc.cc @@ -141,8 +141,7 @@ { tree_identifier *elt = *p; - if (elt->is_defined ()) - retval(i++) = elt->rvalue (); + retval(i++) = elt->is_defined () ? elt->rvalue () : octave_value (); } if (vr_list)
new file mode 100644 --- /dev/null +++ b/test/octave.test/eval/eval-11.m @@ -0,0 +1,3 @@ +x = 1; +y = eval ("x"); +y == 1
new file mode 100644 --- /dev/null +++ b/test/octave.test/eval/eval-12.m @@ -0,0 +1,2 @@ +x = 1; +y = eval ("x;")