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	Sun Jul 13 23:15:29 2003 +0000
+++ b/src/ChangeLog	Mon Jul 14 15:46:05 2003 +0000
@@ -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	Sun Jul 13 23:15:29 2003 +0000
+++ b/src/pt-misc.cc	Mon Jul 14 15:46:05 2003 +0000
@@ -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)
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/octave.test/eval/eval-11.m	Mon Jul 14 15:46:05 2003 +0000
@@ -0,0 +1,3 @@
+x = 1;
+y = eval ("x");
+y == 1
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/octave.test/eval/eval-12.m	Mon Jul 14 15:46:05 2003 +0000
@@ -0,0 +1,2 @@
+x = 1;
+y = eval ("x;")
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/octave.test/eval/eval-13.m	Mon Jul 14 15:46:05 2003 +0000
@@ -0,0 +1,3 @@
+x = 1;
+y = eval ("x;");
+y == 1
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/octave.test/eval/eval-14.m	Mon Jul 14 15:46:05 2003 +0000
@@ -0,0 +1,2 @@
+x = 1;
+y = eval ("x")