Backport "[vms] Add missing vmsdbgout_early_finish"

2018-11-22  Tom de Vries  <tdevries@suse.de>

	backport from trunk:
	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: r266375

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 67e86809b4d24b86ed5ebb859cf4fa421feab11b..fac752d2fe818fe5efa224d88bfb158e4c279587 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,12 @@
+2018-11-22  Tom de Vries  <tom@codesourcery.com>
+
+       backport from trunk:
+       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.
+
 2018-11-21  Mihail Ionescu  <mihail.ionescu@arm.com>
 
        PR target/87867

diff --git a/gcc/vmsdbgout.c b/gcc/vmsdbgout.c
index 41928a400a921434db0183764907f3e9a38cd3d6..aef4013d1f4b62924fec49792ece9185facc0acf 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,
@@ -1554,6 +1555,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.  */