Mercurial > hg > CbC > CbC_gcc
annotate gcc/cbc-tree.h @ 5:a4c410aa4714
modifing gimple.[ch], cfgexpand.c
to make gimple to support cbc goto flags.
author | kent <kent@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Thu, 30 Jul 2009 19:22:01 +0900 |
parents | caeb520cebed |
children | 959d4c8c8abc |
rev | line source |
---|---|
1 | 1 /* Set if the fntype is code segment on CbC language. */ |
2 // flag3,5,6 has been used by c-tree.h | |
3 #define CbC_IS_CODE_SEGMENT(TYPE) TYPE_LANG_FLAG_5 ( FUNCTION_TYPE_CHECK(TYPE)) | |
4 #define CbC_HAVE_CbC_GOTO(EXP) DECL_LANG_FLAG_4 (FUNCTION_DECL_CHECK (EXP)) | |
5 | |
6 /* Set if the CALL_EXPR NODE is goto statement on CbC language. */ | |
7 //#define CbC_IS_CbC_GOTO(NODE) (CALL_EXPR_CHECK(NODE)->common.lang_flag_5) | |
8 | |
9 // old difinition | |
10 //#define CbC_IS_CODE_SEGMENT(EXP) DECL_LANG_FLAG_7 (FUNCTION_DECL_CHECK (EXP)) | |
11 //#define CbC_IS_CODE_SEGMENT(NODE) (TYPE_CHECK (NODE)->type.lang_flag_5) | |
12 #define CbC_IS_CbC_GOTO(NODE) TREE_LANG_FLAG_5 (CALL_EXPR_CHECK(NODE)) | |
5
a4c410aa4714
modifing gimple.[ch], cfgexpand.c
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
1
diff
changeset
|
13 #define CALL_EXPR_CBC_GOTO(NODE) TREE_LANG_FLAG_5 (CALL_EXPR_CHECK(NODE)) |
1 | 14 |
15 extern tree cbc_return_f; | |
16 extern tree cbc_env; | |
17 extern location_t cbc_return; |