diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2011-04-02 08:28:21 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2011-04-02 08:28:21 +0000 |
| commit | 1aeb40dd6d0e8d5a62d25679fa6b0533d72fd4dd (patch) | |
| tree | d56f7d3a44278a2ed83858803463e8d2b84bb2c4 /gcc/ada/gcc-interface/gigi.h | |
| parent | 80ec8b4cf19ac985c95e2a222d84e48324cb8994 (diff) | |
| download | gcc-1aeb40dd6d0e8d5a62d25679fa6b0533d72fd4dd.zip gcc-1aeb40dd6d0e8d5a62d25679fa6b0533d72fd4dd.tar.gz gcc-1aeb40dd6d0e8d5a62d25679fa6b0533d72fd4dd.tar.bz2 | |
gigi.h (record_builtin_type): Add ARTIFICIAL_P param.
* gcc-interface/gigi.h (record_builtin_type): Add ARTIFICIAL_P param.
* gcc-interface/utils.c (gnat_pushdecl): If this is a non-artificial
declaration of an array type, then set DECL_ORIGINAL_TYPE to a distinct
copy.
(record_builtin_type): Add ARTIFICIAL_P parameter. Set DECL_ARTIFICIAL
flag of the type accordingly.
* gcc-interface/trans.c (gigi): Adjust calls to record_builtin_type.
From-SVN: r171880
Diffstat (limited to 'gcc/ada/gcc-interface/gigi.h')
| -rw-r--r-- | gcc/ada/gcc-interface/gigi.h | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/ada/gcc-interface/gigi.h b/gcc/ada/gcc-interface/gigi.h index a50010c..fbf8a0b 100644 --- a/gcc/ada/gcc-interface/gigi.h +++ b/gcc/ada/gcc-interface/gigi.h @@ -504,8 +504,10 @@ extern void init_dummy_type (void); /* Make a dummy type corresponding to GNAT_TYPE. */ extern tree make_dummy_type (Entity_Id gnat_type); -/* Record TYPE as a builtin type for Ada. NAME is the name of the type. */ -extern void record_builtin_type (const char *name, tree type); +/* Record TYPE as a builtin type for Ada. NAME is the name of the type. + ARTIFICIAL_P is true if it's a type that was generated by the compiler. */ +extern void record_builtin_type (const char *name, tree type, + bool artificial_p); /* Given a record type RECORD_TYPE and a list of FIELD_DECL nodes FIELD_LIST, finish constructing the record or union type. If REP_LEVEL is zero, this |