diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-11-12 11:55:37 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-11-12 11:55:37 +0100 |
| commit | 1d4b96e007641088199133bb37a13338eb4fb2ff (patch) | |
| tree | 34ae13ea914b1a19196c1f49ae686f6b549cc8aa /gcc/ada/gcc-interface/gigi.h | |
| parent | 81501d2b45d990aaab9c0c3b85a13b4315ed567e (diff) | |
| download | gcc-1d4b96e007641088199133bb37a13338eb4fb2ff.zip gcc-1d4b96e007641088199133bb37a13338eb4fb2ff.tar.gz gcc-1d4b96e007641088199133bb37a13338eb4fb2ff.tar.bz2 | |
decl.c (gnat_to_gnu_entity): Create IMPORTED_DECL nodes to describe the subprogram renamings which are...
2015-11-12 Pierre-Marie de Rodat <derodat@adacore.com>
* gcc-interface/decl.c (gnat_to_gnu_entity): Create
IMPORTED_DECL nodes to describe the subprogram renamings which
are relevant at debug time.
* gcc-interface/gigi.h (get_debug_scope): Add declaration.
* gcc-interface/trans.c (Identifier_to_gnu): Consider
N_Defining_Operator_Symbol as valid entities.
(gnat_to_gnu): Handle N_Defining_Operator_Symbol the same way as
other entities. Introduce a specific handling for
N_Subprogram_Renaming_Declaration: call gnat_to_gnu_entity on
the entity defined for relevant ones.
(process_decls): Process subprogram renaming declarations during
the second pass only.
* gcc-interface/utils.c (get_debug_scope): Make it external.
Consider N_Defining_Operator_Symbol as valid entities.
(gnat_write_global_declarations): Output debugging information
for top-level imported declarations.
* gcc-interface/Makefile.in: Fix typo.
From-SVN: r230227
Diffstat (limited to 'gcc/ada/gcc-interface/gigi.h')
| -rw-r--r-- | gcc/ada/gcc-interface/gigi.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/ada/gcc-interface/gigi.h b/gcc/ada/gcc-interface/gigi.h index d7a2566..e6fff1e 100644 --- a/gcc/ada/gcc-interface/gigi.h +++ b/gcc/ada/gcc-interface/gigi.h @@ -1004,6 +1004,11 @@ extern bool renaming_from_generic_instantiation_p (Node_Id gnat_node); don't have a GNU translation. */ extern void process_deferred_decl_context (bool force); +/* Return the innermost scope, starting at GNAT_NODE, we are be interested in + the debug info, or Empty if there is no such scope. If not NULL, set + IS_SUBPROGRAM to whether the returned entity is a subprogram. */ +extern Entity_Id get_debug_scope (Node_Id gnat_node, bool *is_subprogram); + #ifdef __cplusplus extern "C" { #endif |