23 #if !defined (octave_pt_decl_h)
24 #define octave_pt_decl_h 1
47 : id (i), expr (e) { }
53 bool is_defined (
void) {
return id ?
id->is_defined () :
false; }
55 bool is_variable (
void) {
return id ?
id->is_variable () :
false; }
60 id->mark_as_formal_parameter ();
63 bool lvalue_ok (
void) {
return id ?
id->lvalue_ok () :
false; }
76 error (
"invalid number of output arguments in declaration list");
78 retval = rvalue1 (nargout);
87 std::string
name (
void) {
return id ?
id->name () :
""; }
155 int l = -1,
int c = -1)
162 std::string
name (
void) {
return cmd_name; }
tree_global_command(tree_decl_init_list *t, int l=-1, int c=-1)
tree_decl_command(const std::string &n, tree_decl_init_list *t, int l=-1, int c=-1)
tree_decl_init_list(void)
~tree_global_command(void)
tree_persistent_command(tree_decl_init_list *t, int l=-1, int c=-1)
tree_decl_init_list(tree_decl_elt *t)
void error(const char *fmt,...)
octave_value rvalue1(int nargout=1)
tree_identifier * ident(void)
tree_decl_init_list * initializer_list(void)
~tree_decl_init_list(void)
tree_decl_command(const std::string &n, int l=-1, int c=-1)
std::list< tree_decl_elt * >::iterator iterator
static llvm::LLVMContext & context
tree_persistent_command(int l=-1, int c=-1)
tree_global_command(int l=-1, int c=-1)
tree_decl_init_list * init_list
octave_lvalue lvalue(void)
void mark_as_formal_parameter(void)
tree_expression * expression(void)
tree_decl_elt(tree_identifier *i=0, tree_expression *e=0)
~tree_persistent_command(void)
octave_value storable_value(void) const
tree_walker & operator=(const tree_walker &)
octave_value_list rvalue(int nargout)
return octave_value(v1.char_array_value().concat(v2.char_array_value(), ra_idx),((a1.is_sq_string()||a2.is_sq_string())? '\'': '"'))