Mercurial > octave
diff libinterp/parse-tree/pt-idx.h @ 23435:c452180ab672
begin refactoring parse tree evaluator
* libinterp/parse-tree/pt-tm-const.cc,
libinterp/parse-tree/pt-tm-const.h:
New files, extracted from pt-mat.h and pt-mat.cc.
* libinterp/parse-tree/module.mk: Update.
* interpreter.cc, ov-class.cc, ov-classdef.cc, ov-classdef.h,
ov-fcn-handle.cc, ov-fcn-handle.h, ov-usr-fcn.cc, oct-parse.in.yy,
pt-arg-list.cc, pt-arg-list.h, pt-array-list.h, pt-assign.cc,
pt-assign.h, pt-binop.cc, pt-binop.h, pt-cbinop.cc, pt-cbinop.h,
pt-cell.cc, pt-cell.h, pt-classdef.cc, pt-classdef.h, pt-cmd.cc,
pt-cmd.h, pt-colon.cc, pt-colon.h, pt-const.cc, pt-const.h,
pt-decl.cc, pt-decl.h, pt-eval.cc, pt-eval.h, pt-except.cc,
pt-except.h, pt-exp.cc, pt-exp.h, pt-fcn-handle.cc, pt-fcn-handle.h,
pt-funcall.cc, pt-funcall.h, pt-id.cc, pt-id.h, pt-idx.cc, pt-idx.h,
pt-jit.cc, pt-jump.cc, pt-jump.h, pt-loop.cc, pt-loop.h, pt-mat.cc,
pt-mat.h, pt-misc.cc, pt-misc.h, pt-select.cc, pt-select.h,
pt-stmt.cc, pt-stmt.h, pt-unop.cc, pt-unop.h:
Use tree_evaluator class to walk the parse tree instead of rvalue
methods in the parse tree classes. Maintain a stack in the evaluator
class to accumulate results.
Pass pointer to evaluator to function objects and other classes as
needed for evaluation.
This is a work in progress that is not yet complete. The ultimate
goal is to move all evaluation into the tree_evaluator class instead
of spreading that work among many different classes. The global
pointer to the current evaluator should also be eliminated.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Fri, 21 Apr 2017 18:07:40 -0400 |
parents | 092078913d54 |
children | cd4e1ee28716 |
line wrap: on
line diff
--- a/libinterp/parse-tree/pt-idx.h Mon Apr 24 21:03:38 2017 -0700 +++ b/libinterp/parse-tree/pt-idx.h Fri Apr 21 18:07:40 2017 -0400 @@ -35,13 +35,13 @@ #include "str-vec.h" #include "pt-exp.h" +#include "pt-walk.h" #include "symtab.h" namespace octave { class tree_argument_list; - - class tree_walker; + class tree_evaluator; // Index expressions. @@ -86,23 +86,26 @@ std::list<string_vector> arg_names (void) { return arg_nm; } + std::list<tree_expression *> dyn_fields (void) { return dyn_field; } + bool lvalue_ok (void) const { return expr->lvalue_ok (); } bool rvalue_ok (void) const { return true; } - octave_value rvalue1 (int nargout = 1); - - octave_value_list rvalue (int nargout); - - octave_value_list rvalue (int nargout, - const std::list<octave_lvalue> *lvalue_list); - - octave_lvalue lvalue (void); + octave_lvalue lvalue (tree_evaluator *tw); tree_index_expression *dup (symbol_table::scope_id scope, symbol_table::context_id context) const; - void accept (tree_walker& tw); + void accept (tree_walker& tw) + { + tw.visit_index_expression (*this); + } + + std::string + get_struct_index + (tree_evaluator *tw, std::list<string_vector>::const_iterator p_arg_nm, + std::list<tree_expression *>::const_iterator p_dyn_field) const; private: @@ -125,11 +128,6 @@ tree_index_expression (int l, int c); octave_map make_arg_struct (void) const; - - std::string - get_struct_index - (std::list<string_vector>::const_iterator p_arg_nm, - std::list<tree_expression *>::const_iterator p_dyn_field) const; }; }