Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
R
riscv-gcc-1
Overview
Overview
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
lvzhengyang
riscv-gcc-1
Commits
7773063f
Commit
7773063f
authored
Jun 09, 2010
by
Eric Botcazou
Committed by
Eric Botcazou
Jun 09, 2010
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
* gcc-interface/ada-tree.h: Fix formatting nits.
From-SVN: r160491
parent
06795261
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
21 additions
and
16 deletions
+21
-16
gcc/ada/ChangeLog
+4
-0
gcc/ada/gcc-interface/ada-tree.h
+17
-16
No files found.
gcc/ada/ChangeLog
View file @
7773063f
2010-06-09 Eric Botcazou <ebotcazou@adacore.com>
* gcc-interface/ada-tree.h: Fix formatting nits.
2010-06-08 Laurynas Biveinis <laurynas.biveinis@gmail.com>
* gcc-interface/utils.c (init_gnat_to_gnu): Use typed GC
...
...
gcc/ada/gcc-interface/ada-tree.h
View file @
7773063f
...
...
@@ -33,9 +33,10 @@ union GTY((desc ("0"),
};
/* Ada uses the lang_decl and lang_type fields to hold a tree.
FIXME: the variable_size annotation here is needed because these types are
variable-sized in some other front
ends. Due to gengtype deficiency the GTY
options of such types have to agree across all frontends.
*/
variable-sized in some other front
-ends. Due to gengtype deficiency, the
GTY options of such types have to agree across all front-ends.
*/
struct
GTY
((
variable_size
))
lang_type
{
tree
t
;
};
struct
GTY
((
variable_size
))
lang_decl
{
tree
t
;
};
...
...
@@ -43,26 +44,26 @@ struct GTY((variable_size)) lang_decl { tree t; };
#define GET_TYPE_LANG_SPECIFIC(NODE) \
(TYPE_LANG_SPECIFIC (NODE) ? TYPE_LANG_SPECIFIC (NODE)->t : NULL_TREE)
#define SET_TYPE_LANG_SPECIFIC(NODE, X)
\
do {
\
tree tmp = (X);
\
if (!TYPE_LANG_SPECIFIC (NODE))
\
TYPE_LANG_SPECIFIC (NODE)
= ggc_alloc_lang_type
\
(sizeof (struct lang_type));
\
TYPE_LANG_SPECIFIC (NODE)->t = tmp;
\
#define SET_TYPE_LANG_SPECIFIC(NODE, X)
\
do {
\
tree tmp = (X);
\
if (!TYPE_LANG_SPECIFIC (NODE))
\
TYPE_LANG_SPECIFIC (NODE)
\
= ggc_alloc_lang_type (sizeof (struct lang_type));
\
TYPE_LANG_SPECIFIC (NODE)->t = tmp;
\
} while (0)
/* Macros to get and set the tree in DECL_LANG_SPECIFIC. */
#define GET_DECL_LANG_SPECIFIC(NODE) \
(DECL_LANG_SPECIFIC (NODE) ? DECL_LANG_SPECIFIC (NODE)->t : NULL_TREE)
#define SET_DECL_LANG_SPECIFIC(NODE, X)
\
do {
\
tree tmp = (X);
\
if (!DECL_LANG_SPECIFIC (NODE))
\
DECL_LANG_SPECIFIC (NODE)
= ggc_alloc_lang_decl
\
(sizeof (struct lang_decl));
\
DECL_LANG_SPECIFIC (NODE)->t = tmp;
\
#define SET_DECL_LANG_SPECIFIC(NODE, X)
\
do {
\
tree tmp = (X);
\
if (!DECL_LANG_SPECIFIC (NODE))
\
DECL_LANG_SPECIFIC (NODE)
\
= ggc_alloc_lang_decl (sizeof (struct lang_decl));
\
DECL_LANG_SPECIFIC (NODE)->t = tmp;
\
} while (0)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment