42 print_raw (os, pr_as_read_syntax, pr_orig_text);
49 os << ((pr_as_read_syntax || pr_orig_text) ?
"@" :
"") <<
nm;
64 error (
"invalid number of output arguments for function handle expression");
107 param_list ? param_list->
dup (new_scope, 0) : 0,
108 ret_list ? ret_list->
dup (new_scope, 0) : 0,
109 cmd_list ? cmd_list->
dup (new_scope, 0) : 0);
123 if (parent_scope < 0)
124 parent_scope = curr_fcn->scope ();
128 if (curr_fcn->is_class_method () || curr_fcn->is_class_constructor ())
183 error (
"invalid number of output arguments for anonymous function handle expression");
207 ret_list ? ret_list->
dup (new_scope, 0) : 0,
208 cmd_list ? cmd_list->
dup (new_scope, 0) : 0,
static scope_id dup_scope(scope_id scope)
tree_expression * dup(symbol_table::scope_id scope, symbol_table::context_id context) const
void accept(tree_walker &tw)
octave_value_list rvalue(int nargout)
void print(std::ostream &os, bool pr_as_read_syntax=false, bool pr_orig_txt=true)
octave_value_list rvalue(int nargout)
void error(const char *fmt,...)
static octave_function * current(void)
tree_fcn_handle(int l=-1, int c=-1)
tree_parameter_list * dup(symbol_table::scope_id scope, symbol_table::context_id context) const
virtual void copy_base(const tree_expression &e)
static octave_fcn_handle * maybe_binder(const octave_value &f)
void stash_dir_name(const std::string &dir)
void stash_fcn_location(int line, int col)
static context_id current_context(void)
tree_parameter_list * return_list(void) const
void stash_parent_fcn_scope(symbol_table::scope_id ps)
virtual int line(void) const
void print_raw(std::ostream &os, bool pr_as_read_syntax=false, bool pr_orig_txt=true)
octave_value rvalue1(int nargout=1)
tree_expression * dup(symbol_table::scope_id scope, symbol_table::context_id context) const
virtual void visit_fcn_handle(tree_fcn_handle &)=0
octave_value rvalue1(int nargout=1)
symbol_table::scope_id scope(void) const
static octave_value make_fcn_handle(octave_builtin::fcn ff, const std::string &nm)
tree_statement_list * body(void) const
tree_anon_fcn_handle(int l=-1, int c=-1)
void stash_dispatch_class(const std::string &nm)
static void inherit(scope_id scope, scope_id donor_scope, context_id donor_context)
void mark_as_anonymous_function(void)
tree_parameter_list * parameter_list(void) const
void stash_fcn_file_name(const std::string &nm)
void stash_parent_fcn_name(const std::string &p)
virtual int column(void) const
void accept(tree_walker &tw)
static scope_id current_scope(void)
virtual void visit_anon_fcn_handle(tree_anon_fcn_handle &)=0
tree_statement_list * dup(symbol_table::scope_id scope, symbol_table::context_id context) const