Mercurial > hg > octave-lyh

diff src/error.cc @ 5744:1c36a2e82266

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-04-06 19:38:34 by jwe]
author jwe
date Thu, 06 Apr 2006 19:38:35 +0000
parents a527e0f77aa5
children 7ba9ad1fec11
line wrap: on
line diff
--- a/src/error.cc
+++ b/src/error.cc
@@ -378,7 +378,8 @@
       int l = -1;
       int c = -1;
 
-      octave_user_function *fcn = octave_call_stack::caller_script ();
+      octave_function *fcn
+	= octave_call_stack::caller_user_script_or_function ();
 
       if (fcn)
 	{
@@ -545,7 +546,7 @@
 
       if ((interactive || forced_interactive)
 	  && Vdebug_on_warning
-	  && octave_call_stack::caller_script ())
+	  && octave_call_stack::caller_user_script_or_function ())
 	{
 	  unwind_protect_bool (Vdebug_on_warning);
 	  Vdebug_on_warning = false;
@@ -584,7 +585,7 @@
 
   if ((interactive || forced_interactive)
       && Vdebug_on_error && init_state == 0
-      && octave_call_stack::caller_script ())
+      && octave_call_stack::caller_user_script_or_function ())
     {
       unwind_protect_bool (Vdebug_on_error);
       Vdebug_on_error = false;