Mercurial > hg > CbC > CbC_gcc
comparison gcc/cbc-tree.h @ 99:98e1e78a6b5a
modify implementation of selftype
author | Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Tue, 24 Jan 2012 18:11:15 +0900 |
parents | 5211b774b8b5 |
children | 5c3ad79fc15b |
comparison
equal
deleted
inserted
replaced
98:5211b774b8b5 | 99:98e1e78a6b5a |
---|---|
12 extern tree cbc_return_f; | 12 extern tree cbc_return_f; |
13 extern tree cbc_env; | 13 extern tree cbc_env; |
14 extern location_t cbc_return; | 14 extern location_t cbc_return; |
15 | 15 |
16 /* flag of selftype is lang_flag_3. */ | 16 /* flag of selftype is lang_flag_3. */ |
17 #define IS_SELFTYPE(NODE) TYPE_LANG_FLAG_3 (RECORD_OR_UNION_CHECK (NODE)) | 17 #define IS_SELFTYPE(NODE) ((NODE)->type.lang_flag_3) |
18 | 18 |
19 //#define CbC_TYPE_LANG_FLAG_3(NODE) (RECORD_OR_POINTER_CHECK (NODE)->type.lang_flag_3) | |
20 //#define RECORD_OR_POINTER_CHECK(NODE) TYPE_CHECK2 (T, POINTER_TYPE, RECORD_TYPE) | |
21 | |
22 //#define TYPE_LANG_FLAG_3(NODE) (TYPE_CHECK (NODE)->type.lang_flag_3) |