diff options
author | Eric Botcazou <ebotcazou@adacore.com> | 2007-09-27 16:28:50 +0000 |
---|---|---|
committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2007-09-27 16:28:50 +0000 |
commit | c304878307f81a770edb0ec08d88c73b5aed074a (patch) | |
tree | e54622c690bcc79a191af53be66102c651e122be /gcc/ada/utils.c | |
parent | 3c1eb9eb6c8cf087a78774d6f3a1d7e1eaf1d036 (diff) | |
download | gcc-c304878307f81a770edb0ec08d88c73b5aed074a.zip gcc-c304878307f81a770edb0ec08d88c73b5aed074a.tar.gz gcc-c304878307f81a770edb0ec08d88c73b5aed074a.tar.bz2 |
Mapped location support
Mapped location support
* back_end.adb (Call_Back_End): Pass information about source
files instead of units to gigi.
* gigi.h (struct File_Info_Type): New.
(gigi): Rename and change type of number_units parameter, change
type of file_info_ptr parameter.
* trans.c (number_files): New global variable.
(gigi): Rename and change type of number_units parameter, change
type of file_info_ptr parameter.
If mapped location support is enabled, create the isomorphic mapping
between source files and line maps.
(Sloc_to_locus): If mapped location support is enabled, translate
source location into mapped location.
(annotate_with_node): Rename into set_expr_location_from_node.
Call set_expr_location instead of annotate_with_locus.
(Pragma_to_gnu): Adjust for above change.
(Loop_Statement_to_gnu): Likewise.
(call_to_gnu): Likewise.
(Handled_Sequence_Of_Statements_to_gnu): Likewise.
(gnat_to_gnu): Likewise.
(add_stmt_with_node): Likewise.
(add_cleanup): Likewise.
* utils.c (gnat_init_decl_processing): Do not set input_line.
From-SVN: r128839
Diffstat (limited to 'gcc/ada/utils.c')
-rw-r--r-- | gcc/ada/utils.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c index e9adfa6..77be01d 100644 --- a/gcc/ada/utils.c +++ b/gcc/ada/utils.c @@ -478,8 +478,6 @@ gnat_pushdecl (tree decl, Node_Id gnat_node) void gnat_init_decl_processing (void) { - input_line = 0; - /* Make the binding_level structure for global names. */ current_function_decl = 0; current_binding_level = 0; |