1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
|
/* This file is part of GCC.
GCC is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3, or (at your option)
any later version.
GCC is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GCC; see the file COPYING3. If not see
<http://www.gnu.org/licenses/>. */
#ifndef __PY_TREE_H__
#define __PY_TREE_H__
extern VEC(tree,gc) * gpy_builtin_types_vec;
#define gpy_object_type_ptr VEC_index(tree,gpy_builtin_types_vec,0)
#define gpy_object_type_ptr_ptr VEC_index(tree,gpy_builtin_types_vec,1)
#define gpy_const_char_ptr VEC_index(tree,gpy_builtin_types_vec,2)
extern VEC(tree,gc) * gpy_stmt_pass_generate_types (VEC(gpydot,gc) *);
extern VEC(tree,gc) * gpy_stmt_pass_lower (VEC(tree,gc) *, VEC(gpydot,gc) *);
extern tree gpy_stmt_decl_lower_expr (gpy_dot_tree_t *, tree *, VEC(gpy_ctx_t,gc) *);
// extern tree gpy_stmt_decl_lower_functor (gpy_dot_tree_t *, gpy_hash_tab_t *);
extern tree gpy_stmt_decl_lower_scalar (gpy_dot_tree_t *, tree *);
extern tree gpy_stmt_decl_lower_modify (gpy_dot_tree_t *, tree *, VEC(gpy_ctx_t,gc) *);
extern tree gpy_stmt_decl_lower_binary_op (gpy_dot_tree_t *, tree *, VEC(gpy_ctx_t,gc) *);
extern tree gpy_stmt_pass_lower_functor (gpy_dot_tree_t *, gpy_hash_tab_t *);
extern gpy_dot_tree_t * gpy_stmt_process_AST_Align (gpy_dot_tree_t **);
extern void gpy_types_init (void);
extern void gpy_initilize_types (void);
extern void gpy_stmt_process_decl (gpy_dot_tree_t * const);
/* Appends vector y on x */
#define GPY_VEC_stmts_append(T,x,y) \
do { \
int x_ = 0; tree t_ = NULL_TREE; \
for (; VEC_iterate (T,y,x_,t_); ++x_) \
{ \
VEC_safe_push(T,gc,x,t_); \
} \
} while (0); \
#endif //__PYPY_TREE_H__
|