Mercurial > octave

comparison libinterp/parse-tree/pt-eval.h @ 27204:9a3e92d02a03

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
eliminate direct access to call stack in variables functions * pt-eval.h, pt-eval.cc (tree_evaluator::caller_function, tree_evaluator::curr_fcn_unwind_protect_frame): New functions. * variables.cc (curr_fcn_unwind_protect_frame, Fmlock, Fmunlock, Fmislocked, F__varval__): Eliminate direct access to call stack.
author John W. Eaton <jwe@octave.org>
date Mon, 01 Apr 2019 18:21:27 +0000
parents 79065f9d5553
children 6648d1ae05fe
comparison
equal deleted inserted replaced
27203:79065f9d5553 27204:9a3e92d02a03
486 // Current column in current function. 486 // Current column in current function.
487 int current_column (void) const; 487 int current_column (void) const;
488 488
489 octave_user_code * current_user_code (void) const; 489 octave_user_code * current_user_code (void) const;
490 490
491 // Line in user code caller. 491 unwind_protect * curr_fcn_unwind_protect_frame (void) const;
492 int caller_user_code_line (void) const;
493
494 // Column in user code caller.
495 int caller_user_code_column (void) const;
496
497 octave_user_code * caller_user_code (size_t nskip = 0) const;
498 492
499 // Current function that we are debugging. 493 // Current function that we are debugging.
500 octave_user_code * debug_user_code (void) const; 494 octave_user_code * debug_user_code (void) const;
501 495
502 octave_function * current_function (void) const; 496 octave_function * current_function (void) const;
497
498 octave_function * caller_function (void) const;
503 499
504 bool goto_frame (size_t n = 0, bool verbose = false); 500 bool goto_frame (size_t n = 0, bool verbose = false);
505 501
506 void restore_frame (size_t n); 502 void restore_frame (size_t n);
507 503