diff libinterp/parse-tree/oct-parse.in.yy @ 20756:200ae1d650b7

propagate octave_execution_exception objects through try/catch blocks * gripes.h, gripes.cc (gripe_user_supplied_eval, gripe_wrong_type_arg): New overloaded functions that accept octave_execution_exception objects. * error.h, error.cc (error, verror, error_1, usage_1, debug_or_throw_exception): New overloaded functions that accept * octave_execution_exception objects. * __qp__.cc, cellfun.cc, daspk.cc, dasrt.cc, dassl.cc, data.cc, file-io.cc, graphics.cc, graphics.in.h, input.cc, load-path.cc, ls-mat-ascii.cc, lsode.cc, mex.cc, oct-handle.h, oct-map.cc, oct-stream.cc, quad.cc, rand.cc, toplev.cc, utils.cc, variables.cc, __eigs__.cc, ov-base.cc, ov-class.cc, ov-fcn-handle.cc, ov-oncleanup.cc, ov.cc, octave.cc, oct-parse.in.yy: Propagate octave_execution_exception objects through try/catch blocks.
author John W. Eaton <jwe@octave.org>
date Wed, 25 Nov 2015 15:27:48 -0500
parents 2469d78a1d8b
children 58e79b0078e4
line wrap: on
line diff
--- a/libinterp/parse-tree/oct-parse.in.yy	Wed Nov 25 11:32:28 2015 -0800
+++ b/libinterp/parse-tree/oct-parse.in.yy	Wed Nov 25 15:27:48 2015 -0500
@@ -4494,9 +4494,9 @@
       fcn = parse_fcn_file (file_full_name, file_name, "", "",
                             require_file, true, false, false, warn_for);
     }
-  catch (const octave_execution_exception&)
+  catch (const octave_execution_exception& e)
     {
-      error ("source: error sourcing file '%s'", file_full_name.c_str ());
+      error (e, "source: error sourcing file '%s'", file_full_name.c_str ());
     }
 
   if (fcn && fcn->is_user_script ())
@@ -4634,9 +4634,9 @@
         {
           maybe_missing_function_hook (name);
         }
-      catch (const octave_execution_exception&)
+      catch (const octave_execution_exception& e)
         {
-          error ("feval: function '%s' not found", name.c_str ());
+          error (e, "feval: function '%s' not found", name.c_str ());
         }
     }