[vms] Add missing vmsdbgout_early_finish

2017-11-19  Tom de Vries  <tom@codesourcery.com>

	PR target/82961
	* vmsdbgout.c (vmsdbgout_early_finish): New function.
	(vmsdbg_debug_hooks): Set early_finish field to vmsdbgout_early_finish.

From-SVN: r254920

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 60689054d05eab2f641ced023a3381f1c854de61..fa44fd5413dab7f0a35c584bac4d1b31058d66d8 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+2017-11-19  Tom de Vries  <tom@codesourcery.com>
+
+       PR target/82961
+       * vmsdbgout.c (vmsdbgout_early_finish): New function.
+       (vmsdbg_debug_hooks): Set early_finish field to vmsdbgout_early_finish.
+
 2017-11-18  Jan Hubicka  <hubicka@ucw.cz>
 
        * cgraphclones.c (cgraph_edge::clone): Rename gcov_count to prof_count.

diff --git a/gcc/vmsdbgout.c b/gcc/vmsdbgout.c
index 580dd2840162ae7c599e4ea9a17d59bef9bda46c..91dcd2e391096fbdcc8a6a147759d6236cb2b7dc 100644 (file)
--- a/gcc/vmsdbgout.c
+++ b/gcc/vmsdbgout.c
@@ -147,6 +147,7 @@ static int write_srccorrs (int);
 
 static void vmsdbgout_init (const char *);
 static void vmsdbgout_finish (const char *);
+static void vmsdbgout_early_finish (const char *);
 static void vmsdbgout_assembly_start (void);
 static void vmsdbgout_define (unsigned int, const char *);
 static void vmsdbgout_undef (unsigned int, const char *);
@@ -176,7 +177,7 @@ static void vmsdbgout_abstract_function (tree);
 const struct gcc_debug_hooks vmsdbg_debug_hooks
 = {vmsdbgout_init,
    vmsdbgout_finish,
-   debug_nothing_charstar,
+   vmsdbgout_early_finish,
    vmsdbgout_assembly_start,
    vmsdbgout_define,
    vmsdbgout_undef,
@@ -1556,6 +1557,13 @@ vmsdbgout_abstract_function (tree decl)
     (*dwarf2_debug_hooks.outlining_inline_function) (decl);
 }
 
+static void
+vmsdbgout_early_finish (const char *filename)
+{
+  if (write_symbols == VMS_AND_DWARF2_DEBUG)
+    (*dwarf2_debug_hooks.early_finish) (filename);
+}
+
 /* Output stuff that Debug requires at the end of every file and generate the
    VMS Debug debugging info.  */