Mercurial > octave-nkf
comparison libinterp/parse-tree/pt-loop.h @ 20654:b65888ec820e draft default tip gccjit
dmalcom gcc jit import
author | Stefan Mahr <dac922@gmx.de> |
---|---|
date | Fri, 27 Feb 2015 16:59:36 +0100 |
parents | 4197fc428c7d |
children |
comparison
equal
deleted
inserted
replaced
20653:9cef0a1207e4 | 20654:b65888ec820e |
---|---|
46 public: | 46 public: |
47 | 47 |
48 tree_while_command (int l = -1, int c = -1) | 48 tree_while_command (int l = -1, int c = -1) |
49 : tree_command (l, c), expr (0), list (0), lead_comm (0), | 49 : tree_command (l, c), expr (0), list (0), lead_comm (0), |
50 trail_comm (0) | 50 trail_comm (0) |
51 #ifdef HAVE_LLVM | 51 #ifdef HAVE_JIT |
52 , compiled (0) | 52 , compiled (0) |
53 #endif | 53 #endif |
54 { } | 54 { } |
55 | 55 |
56 tree_while_command (tree_expression *e, | 56 tree_while_command (tree_expression *e, |
57 octave_comment_list *lc = 0, | 57 octave_comment_list *lc = 0, |
58 octave_comment_list *tc = 0, | 58 octave_comment_list *tc = 0, |
59 int l = -1, int c = -1) | 59 int l = -1, int c = -1) |
60 : tree_command (l, c), expr (e), list (0), lead_comm (lc), | 60 : tree_command (l, c), expr (e), list (0), lead_comm (lc), |
61 trail_comm (tc) | 61 trail_comm (tc) |
62 #ifdef HAVE_LLVM | 62 #ifdef HAVE_JIT |
63 , compiled (0) | 63 , compiled (0) |
64 #endif | 64 #endif |
65 { } | 65 { } |
66 | 66 |
67 tree_while_command (tree_expression *e, tree_statement_list *lst, | 67 tree_while_command (tree_expression *e, tree_statement_list *lst, |
68 octave_comment_list *lc = 0, | 68 octave_comment_list *lc = 0, |
69 octave_comment_list *tc = 0, | 69 octave_comment_list *tc = 0, |
70 int l = -1, int c = -1) | 70 int l = -1, int c = -1) |
71 : tree_command (l, c), expr (e), list (lst), lead_comm (lc), | 71 : tree_command (l, c), expr (e), list (lst), lead_comm (lc), |
72 trail_comm (tc) | 72 trail_comm (tc) |
73 #ifdef HAVE_LLVM | 73 #ifdef HAVE_JIT |
74 , compiled (0) | 74 , compiled (0) |
75 #endif | 75 #endif |
76 { } | 76 { } |
77 | 77 |
78 ~tree_while_command (void); | 78 ~tree_while_command (void); |
88 tree_command *dup (symbol_table::scope_id scope, | 88 tree_command *dup (symbol_table::scope_id scope, |
89 symbol_table::context_id context) const; | 89 symbol_table::context_id context) const; |
90 | 90 |
91 void accept (tree_walker& tw); | 91 void accept (tree_walker& tw); |
92 | 92 |
93 #ifdef HAVE_LLVM | 93 #ifdef HAVE_JIT |
94 // some functions use by tree_jit | 94 // some functions use by tree_jit |
95 jit_info *get_info (void) const | 95 jit_info *get_info (void) const |
96 { | 96 { |
97 return compiled; | 97 return compiled; |
98 } | 98 } |
117 // Comment preceding ENDWHILE token. | 117 // Comment preceding ENDWHILE token. |
118 octave_comment_list *trail_comm; | 118 octave_comment_list *trail_comm; |
119 | 119 |
120 private: | 120 private: |
121 | 121 |
122 #ifdef HAVE_LLVM | 122 #ifdef HAVE_JIT |
123 // compiled version of the loop | 123 // compiled version of the loop |
124 jit_info *compiled; | 124 jit_info *compiled; |
125 #endif | 125 #endif |
126 | 126 |
127 // No copying! | 127 // No copying! |
177 public: | 177 public: |
178 | 178 |
179 tree_simple_for_command (int l = -1, int c = -1) | 179 tree_simple_for_command (int l = -1, int c = -1) |
180 : tree_command (l, c), parallel (false), lhs (0), expr (0), | 180 : tree_command (l, c), parallel (false), lhs (0), expr (0), |
181 maxproc (0), list (0), lead_comm (0), trail_comm (0) | 181 maxproc (0), list (0), lead_comm (0), trail_comm (0) |
182 #ifdef HAVE_LLVM | 182 #ifdef HAVE_JIT |
183 , compiled (0) | 183 , compiled (0) |
184 #endif | 184 #endif |
185 { } | 185 { } |
186 | 186 |
187 tree_simple_for_command (bool parallel_arg, tree_expression *le, | 187 tree_simple_for_command (bool parallel_arg, tree_expression *le, |
192 octave_comment_list *tc = 0, | 192 octave_comment_list *tc = 0, |
193 int l = -1, int c = -1) | 193 int l = -1, int c = -1) |
194 : tree_command (l, c), parallel (parallel_arg), lhs (le), | 194 : tree_command (l, c), parallel (parallel_arg), lhs (le), |
195 expr (re), maxproc (maxproc_arg), list (lst), | 195 expr (re), maxproc (maxproc_arg), list (lst), |
196 lead_comm (lc), trail_comm (tc) | 196 lead_comm (lc), trail_comm (tc) |
197 #ifdef HAVE_LLVM | 197 #ifdef HAVE_JIT |
198 , compiled (0) | 198 , compiled (0) |
199 #endif | 199 #endif |
200 { } | 200 { } |
201 | 201 |
202 ~tree_simple_for_command (void); | 202 ~tree_simple_for_command (void); |
218 tree_command *dup (symbol_table::scope_id scope, | 218 tree_command *dup (symbol_table::scope_id scope, |
219 symbol_table::context_id context) const; | 219 symbol_table::context_id context) const; |
220 | 220 |
221 void accept (tree_walker& tw); | 221 void accept (tree_walker& tw); |
222 | 222 |
223 #ifdef HAVE_LLVM | 223 #ifdef HAVE_JIT |
224 // some functions use by tree_jit | 224 // some functions use by tree_jit |
225 jit_info *get_info (void) const | 225 jit_info *get_info (void) const |
226 { | 226 { |
227 return compiled; | 227 return compiled; |
228 } | 228 } |