Mercurial > hg > CbC > CbC_gcc
annotate gcc/cbc-tree.h @ 98:5211b774b8b5
implemeted selftype expression. add CbC-exanples/selftype.c
author | Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Tue, 24 Jan 2012 03:25:13 +0900 |
parents | 6381ea127240 |
children | 98e1e78a6b5a |
rev | line source |
---|---|
76
6381ea127240
call argument iterator fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
61
diff
changeset
|
1 /* #define CbC_PRETENDED_STACK_SIZE 256 */ |
21 | 2 #define CbC_PRETENDED_STACK_SIZE 1024 |
3 | |
1 | 4 /* Set if the fntype is code segment on CbC language. */ |
76
6381ea127240
call argument iterator fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
61
diff
changeset
|
5 /* flag3,5,6 has been used by c-tree.h */ |
1 | 6 #define CbC_IS_CODE_SEGMENT(TYPE) TYPE_LANG_FLAG_5 ( FUNCTION_TYPE_CHECK(TYPE)) |
7 | |
8 /* Set if the CALL_EXPR NODE is goto statement on CbC language. */ | |
9 #define CbC_IS_CbC_GOTO(NODE) TREE_LANG_FLAG_5 (CALL_EXPR_CHECK(NODE)) | |
21 | 10 #define CALL_EXPR_CbC_GOTO(NODE) TREE_LANG_FLAG_5 (CALL_EXPR_CHECK(NODE)) |
1 | 11 |
12 extern tree cbc_return_f; | |
13 extern tree cbc_env; | |
14 extern location_t cbc_return; | |
98
5211b774b8b5
implemeted selftype expression. add CbC-exanples/selftype.c
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
76
diff
changeset
|
15 |
5211b774b8b5
implemeted selftype expression. add CbC-exanples/selftype.c
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
76
diff
changeset
|
16 /* flag of selftype is lang_flag_3. */ |
5211b774b8b5
implemeted selftype expression. add CbC-exanples/selftype.c
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
76
diff
changeset
|
17 #define IS_SELFTYPE(NODE) TYPE_LANG_FLAG_3 (RECORD_OR_UNION_CHECK (NODE)) |
5211b774b8b5
implemeted selftype expression. add CbC-exanples/selftype.c
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
76
diff
changeset
|
18 |