diff options
Diffstat (limited to 'gcc/ada/gcc-interface/utils.c')
| -rw-r--r-- | gcc/ada/gcc-interface/utils.c | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c index 307a841..e24a295 100644 --- a/gcc/ada/gcc-interface/utils.c +++ b/gcc/ada/gcc-interface/utils.c @@ -5182,13 +5182,11 @@ smaller_form_type_p (tree type, tree orig_type) return tree_int_cst_lt (size, osize) != 0; } -/* Perform final processing on global variables. */ - -static GTY (()) tree dummy_global; - /* Keep track of types used at the global level and emit debug info for all global types. */ +static GTY (()) tree dummy_global; + void note_types_used_by_globals (void) { @@ -5219,10 +5217,10 @@ note_types_used_by_globals (void) } } - /* Output debug information for all global type declarations first. This - ensures that global types whose compilation haven't been finalized yet, - for example pointers to Taft amendment types, have their compilation - finalized in the right context. */ + /* Output debug information for all global type declarations. This ensures + that global types whose compilation cannot been finalized earlier, e.g. + pointers to Taft amendment types, have their compilation finalized in + the right context. */ FOR_EACH_VEC_SAFE_ELT (type_decls, i, iter) if (!DECL_IGNORED_P (iter)) debug_hooks->type_decl (iter, false); |