Mercurial > hg > octave-nkf

comparison src/debug.cc @ 7923:c3d21b9b94b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
eliminate octave_call_stack member functions caller_user_script and caller_user_function, and unused difference_type args
author John W. Eaton <jwe@octave.org>
date Fri, 11 Jul 2008 15:43:10 -0400
parents 3e4c9b69069d
children 0ef13e15319b
comparison
equal deleted inserted replaced
7922:935be827eaf8 7923:c3d21b9b94b6
65 get_user_code (const std::string& fname = std::string ()) 65 get_user_code (const std::string& fname = std::string ())
66 { 66 {
67 octave_user_code *dbg_fcn = 0; 67 octave_user_code *dbg_fcn = 0;
68 68
69 if (fname.empty ()) 69 if (fname.empty ())
70 dbg_fcn = octave_call_stack::caller_user_function (); 70 dbg_fcn = octave_call_stack::caller_user_code ();
71 else 71 else
72 { 72 {
73 octave_value fcn = symbol_table::find_function (fname); 73 octave_value fcn = symbol_table::find_function (fname);
74 74
75 if (fcn.is_defined ()) 75 if (fcn.is_defined ())
879 879
880 tree::break_next = 0; 880 tree::break_next = 0;
881 881
882 tree::last_line = -1; 882 tree::last_line = -1;
883 883
884 // Next to skip 2 here. One for the oct-file dbstep and
885 // another for the function we actually want to step out of.
886 tree::break_function = 884 tree::break_function =
887 octave_call_stack::caller_user_code (2); 885 octave_call_stack::caller_user_code (1);
888 886
889 tree::last_break_function = 887 tree::last_break_function =
890 octave_call_stack::caller_user_code (); 888 octave_call_stack::caller_user_code ();
891 } 889 }
892 else 890 else