toplev.c (debug_args): Add entry for VMS_DEBUG.

	* toplev.c (debug_args): Add entry for VMS_DEBUG.
	* vmsdbgout.c (vmsdbgout_init): Fix typo in call to xmalloc.

From-SVN: r50573

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index d01c087820872b9491704b9059e0acc8284b3757..bf15ce96fab78bf44f9f68e1656215477c3262a4 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2002-03-11  Douglas B Rupp  <rupp@gnat.com>
+
+       * toplev.c (debug_args): Add entry for VMS_DEBUG.
+       * vmsdbgout.c (vmsdbgout_init): Fix typo in call to xmalloc.
+
 2002-03-11  Richard Sandiford  <rsandifo@redhat.com>
 
        * defaults.h (LARGEST_EXPONENT_IS_NORMAL, ROUND_TOWARDS_ZERO): New.

diff --git a/gcc/toplev.c b/gcc/toplev.c
index 740bf89221940572b588cd2165d1c138e98abc87..2e120f85b41a5051f80cd53c5570bfc1a78ac3fe 100644 (file)
--- a/gcc/toplev.c
+++ b/gcc/toplev.c
@@ -929,6 +929,9 @@ debug_args[] =
 #endif
 #ifdef SDB_DEBUGGING_INFO
   { "coff", SDB_DEBUG, 0, N_("Generate COFF format debug info") },
+#endif
+#ifdef VMS_DEBUGGING_INFO
+  { "vms", VMS_DEBUG, 0, N_("Generate VMS format debug info") },
 #endif
   { 0, 0, 0, 0 }
 };

diff --git a/gcc/vmsdbgout.c b/gcc/vmsdbgout.c
index cad6323f3b47ebc0dd601a71ccf32291740adf11..15318ed14dfd01dbc33ea2ce851ee5e1222569e6 100644 (file)
--- a/gcc/vmsdbgout.c
+++ b/gcc/vmsdbgout.c
@@ -1636,7 +1636,7 @@ vmsdbgout_init (main_input_filename)
 
   module_producer
     = (char *) xmalloc (strlen (language_string) + 1
-                       + strlen (version_string + 1));
+                       + strlen (version_string) + 1);
   sprintf (module_producer, "%s %s", language_string, version_string);
 
   ASM_GENERATE_INTERNAL_LABEL (text_end_label, TEXT_END_LABEL, 0);