diff options
Diffstat (limited to 'gcc/ada/gcc-interface/utils.c')
| -rw-r--r-- | gcc/ada/gcc-interface/utils.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c index 0ae381f..3cda631 100644 --- a/gcc/ada/gcc-interface/utils.c +++ b/gcc/ada/gcc-interface/utils.c @@ -666,7 +666,8 @@ get_global_context (void) { if (!global_context) { - global_context = build_translation_unit_decl (NULL_TREE); + global_context + = build_translation_unit_decl (get_identifier (main_input_filename)); debug_hooks->register_main_translation_unit (global_context); } |