Mercurial > hg > octave-lyh

changeset 9418:f008a3a1bcb0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add missing unwind_protect::run in pt-eval.cc
author Jaroslav Hajek <highegg@gmail.com>
date Sat, 04 Jul 2009 12:25:07 +0200
parents 5d46c4a894e8
children 0dd3c7a2ba19
files src/ChangeLog src/ov-fcn-handle.cc src/pt-eval.cc
diffstat 3 files changed, 8 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2009-07-04  Jaroslav Hajek  <highegg@gmail.com>
+
+	* pt-eval.cc (do_unwind_protect_cleanup_code): Add missing
+	unwind_protect::run.
+
 2009-07-02  Jaroslav Hajek  <highegg@gmail.com>
 
 	* help.cc (do_which): Also look for files.
--- a/src/ov-fcn-handle.cc
+++ b/src/ov-fcn-handle.cc
@@ -1349,10 +1349,7 @@
 
   octave_value f = symbol_table::find_function (tnm);
 
-  if (f.is_defined ())
-    retval = octave_value (new octave_fcn_handle (f, tnm));
-  else
-    error ("error creating function handle \"@%s\"", nm.c_str ());
+  retval = octave_value (new octave_fcn_handle (f, tnm));
 
   return retval;
 }
--- a/src/pt-eval.cc
+++ b/src/pt-eval.cc
@@ -970,6 +970,8 @@
     unwind_protect::discard ();
   else
     unwind_protect::run ();
+
+  unwind_protect::run ();
 }
 
 void