diff options
| author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-12-12 09:48:08 +0000 |
|---|---|---|
| committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-12-12 09:48:08 +0000 |
| commit | a08c9086662af01e9b45c14a9254a9f8c8ed2c57 (patch) | |
| tree | e100d0deea8e73f61b639ceca819feeedad88a45 /gcc/fortran/trans.h | |
| parent | 30be4b5bc2781a437162c35b2d95672ce77cc6c5 (diff) | |
| download | gcc-a08c9086662af01e9b45c14a9254a9f8c8ed2c57.tar.gz | |
2011-12-12 Basile Starynkevitch <basile@starynkevitch.net>
MELT branch merged with trunk rev 182221 using svnmerge
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@182223 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/trans.h')
| -rw-r--r-- | gcc/fortran/trans.h | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/gcc/fortran/trans.h b/gcc/fortran/trans.h index 8fc7599473d..259a08aae06 100644 --- a/gcc/fortran/trans.h +++ b/gcc/fortran/trans.h @@ -333,6 +333,14 @@ typedef struct } gfc_wrapped_block; +/* Class API functions. */ +tree gfc_class_data_get (tree); +tree gfc_class_vptr_get (tree); +tree gfc_vtable_hash_get (tree); +tree gfc_vtable_size_get (tree); +tree gfc_vtable_extends_get (tree); +tree gfc_vtable_def_init_get (tree); +tree gfc_vtable_copy_get (tree); /* Initialize an init/cleanup block. */ void gfc_start_wrapped_block (gfc_wrapped_block* block, tree code); @@ -803,6 +811,7 @@ struct GTY((variable_size)) lang_decl { #define GFC_DECL_RESULT(node) DECL_LANG_FLAG_5(node) #define GFC_DECL_SUBREF_ARRAY_P(node) DECL_LANG_FLAG_6(node) #define GFC_DECL_PUSH_TOPLEVEL(node) DECL_LANG_FLAG_7(node) +#define GFC_DECL_CLASS(node) DECL_LANG_FLAG_8(node) /* An array descriptor. */ #define GFC_DESCRIPTOR_TYPE_P(node) TYPE_LANG_FLAG_1(node) |