Mercurial > hg > octave-lyh
comparison src/pt-assign.h @ 10313:f3b65e1ae355
untabify src header files
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 11 Feb 2010 12:16:43 -0500 |
parents | 0a5a769b8fc0 |
children | fd0a3ac60b0e |
comparison
equal
deleted
inserted
replaced
10312:cbc402e64d83 | 10313:f3b65e1ae355 |
---|---|
44 tree_simple_assignment : public tree_expression | 44 tree_simple_assignment : public tree_expression |
45 { | 45 { |
46 public: | 46 public: |
47 | 47 |
48 tree_simple_assignment (bool plhs = false, int l = -1, int c = -1, | 48 tree_simple_assignment (bool plhs = false, int l = -1, int c = -1, |
49 octave_value::assign_op t = octave_value::op_asn_eq) | 49 octave_value::assign_op t = octave_value::op_asn_eq) |
50 : tree_expression (l, c), lhs (0), rhs (0), preserve (plhs), etype (t), | 50 : tree_expression (l, c), lhs (0), rhs (0), preserve (plhs), etype (t), |
51 first_execution (true) { } | 51 first_execution (true) { } |
52 | 52 |
53 tree_simple_assignment (tree_expression *le, tree_expression *re, | 53 tree_simple_assignment (tree_expression *le, tree_expression *re, |
54 bool plhs = false, int l = -1, int c = -1, | 54 bool plhs = false, int l = -1, int c = -1, |
55 octave_value::assign_op t = octave_value::op_asn_eq); | 55 octave_value::assign_op t = octave_value::op_asn_eq); |
56 | 56 |
57 ~tree_simple_assignment (void); | 57 ~tree_simple_assignment (void); |
58 | 58 |
59 bool has_magic_end (void) const { return (rhs && rhs->has_magic_end ()); } | 59 bool has_magic_end (void) const { return (rhs && rhs->has_magic_end ()); } |
60 | 60 |
71 tree_expression *left_hand_side (void) { return lhs; } | 71 tree_expression *left_hand_side (void) { return lhs; } |
72 | 72 |
73 tree_expression *right_hand_side (void) { return rhs; } | 73 tree_expression *right_hand_side (void) { return rhs; } |
74 | 74 |
75 tree_expression *dup (symbol_table::scope_id scope, | 75 tree_expression *dup (symbol_table::scope_id scope, |
76 symbol_table::context_id context) const; | 76 symbol_table::context_id context) const; |
77 | 77 |
78 void accept (tree_walker& tw); | 78 void accept (tree_walker& tw); |
79 | 79 |
80 octave_value::assign_op op_type (void) const { return etype; } | 80 octave_value::assign_op op_type (void) const { return etype; } |
81 | 81 |
82 private: | 82 private: |
83 | 83 |
84 void do_assign (octave_lvalue& ult, const octave_value_list& args, | 84 void do_assign (octave_lvalue& ult, const octave_value_list& args, |
85 const octave_value& rhs_val); | 85 const octave_value& rhs_val); |
86 | 86 |
87 void do_assign (octave_lvalue& ult, const octave_value& rhs_val); | 87 void do_assign (octave_lvalue& ult, const octave_value& rhs_val); |
88 | 88 |
89 // The left hand side of the assignment. | 89 // The left hand side of the assignment. |
90 tree_expression *lhs; | 90 tree_expression *lhs; |
121 tree_multi_assignment (bool plhs = false, int l = -1, int c = -1) | 121 tree_multi_assignment (bool plhs = false, int l = -1, int c = -1) |
122 : tree_expression (l, c), lhs (0), rhs (0), preserve (plhs), | 122 : tree_expression (l, c), lhs (0), rhs (0), preserve (plhs), |
123 first_execution (true) { } | 123 first_execution (true) { } |
124 | 124 |
125 tree_multi_assignment (tree_argument_list *lst, tree_expression *r, | 125 tree_multi_assignment (tree_argument_list *lst, tree_expression *r, |
126 bool plhs = false, int l = -1, int c = -1); | 126 bool plhs = false, int l = -1, int c = -1); |
127 | 127 |
128 ~tree_multi_assignment (void); | 128 ~tree_multi_assignment (void); |
129 | 129 |
130 bool has_magic_end (void) const { return (rhs && rhs->has_magic_end ()); } | 130 bool has_magic_end (void) const { return (rhs && rhs->has_magic_end ()); } |
131 | 131 |
142 tree_argument_list *left_hand_side (void) { return lhs; } | 142 tree_argument_list *left_hand_side (void) { return lhs; } |
143 | 143 |
144 tree_expression *right_hand_side (void) { return rhs; } | 144 tree_expression *right_hand_side (void) { return rhs; } |
145 | 145 |
146 tree_expression *dup (symbol_table::scope_id scope, | 146 tree_expression *dup (symbol_table::scope_id scope, |
147 symbol_table::context_id context) const; | 147 symbol_table::context_id context) const; |
148 | 148 |
149 void accept (tree_walker& tw); | 149 void accept (tree_walker& tw); |
150 | 150 |
151 octave_value::assign_op op_type (void) const { return octave_value::op_asn_eq; } | 151 octave_value::assign_op op_type (void) const { return octave_value::op_asn_eq; } |
152 | 152 |