modula-2: Handle pass '-v' option to the compiler.
authorIain Sandoe <iain@sandoe.co.uk>
Thu, 12 Jan 2023 23:50:53 +0000 (23:50 +0000)
committerIain Sandoe <iain@sandoe.co.uk>
Fri, 13 Jan 2023 21:06:05 +0000 (21:06 +0000)
Somehow this setting had been missed, and we really need the verbose
flag to enable useful debug output.

Signed-off-by: Iain Sandoe <iain@sandoe.co.uk>
gcc/m2/ChangeLog:

* gm2-gcc/m2options.h (M2Options_SetVerbose): Export the
function.
* gm2-lang.cc: Handle OPT_v, passing it to the compiler.
* lang-specs.h: Pass -v to cc1gm2.

gcc/m2/gm2-gcc/m2options.h
gcc/m2/gm2-lang.cc
gcc/m2/lang-specs.h

index 4b32c91..beaa460 100644 (file)
@@ -106,6 +106,7 @@ EXTERN int M2Options_GetCpp (void);
 EXTERN int M2Options_GetM2g (void);
 EXTERN void M2Options_SetM2g (int value);
 EXTERN void M2Options_SetLowerCaseKeywords (int value);
+EXTERN void M2Options_SetVerbose (int value);
 EXTERN void M2Options_SetUnusedVariableChecking (int value);
 EXTERN void M2Options_SetUnusedParameterChecking (int value);
 EXTERN void M2Options_SetStrictTypeChecking (int value);
index 5814ebf..4f49d07 100644 (file)
@@ -407,6 +407,9 @@ gm2_langhook_handle_option (
     case OPT_save_temps_:
       M2Options_SetSaveTempsDir (arg);
       return 1;
+    case OPT_v:
+      M2Options_SetVerbose (value);
+      return 1;
     default:
       if (insideCppArgs)
         {
index 706064f..44e5b34 100644 (file)
@@ -33,6 +33,6 @@ along with GCC; see the file COPYING3.  If not see
       "cc1gm2 " M2CPP
       "      %(cc1_options) %{B*} %{c*} %{f*} %{+e*} %{I*} "
       "      %{MD} %{MMD} %{M} %{MM} %{MA} %{MT*} %{MF*} %V"
-      "      %{save-temps*}"
+      "      %{save-temps*} %{v} "
       "      %i %{!fsyntax-only:%(invoke_as)}",
       0, 0, 0},